This read-only property specifies information about the previous build (as an ICatalogProperties interface).
Syntax
IBuildCatalog.ICatalogProperties
Example
The following example displays the previous build properties for the KMSampleCatalog1 catalog definition.
Option Explicit
On Error Resume Next
Dim objSearchAdmin, objBuildServer, objCatalogs, objCatalog, objPrevBldProps
Set objSearchAdmin = CreateObject("Search.SearchAdmin.1")
Set objBuildServer = objSearchAdmin.BuildServer
Set objCatalogs = objBuildServer.BuildCatalogs
Set objCatalog = objCatalogs("KMSampleCatalog1")
Set objPrevBldProps = objCatalog.PreviousBuildProperties
'Show the properties
Wscript.echo "objCatalog " & objCatalog.Name & " properties:"
Wscript.echo " Build date: " & objPrevBldProps.BuildDate
Wscript.echo " # docs: " & objPrevBldProps.NumberOfDocuments
Wscript.echo " Size of index: " & objPrevBldProps.IndexSize _
& " (MBytes)"
Wscript.echo " Size of property store " _
& objPrevBldProps.PropertyStoreSize & " (MBytes)"
Wscript.echo " # unique keys: " & objPrevBldProps.UniqueKeyCount
Wscript.echo " Crawl number: " & Prop objPrevBldProps erty.PropSeqNum
Wscript.Echo ""
'Release objects
Set objPrevBldProps = Nothing
Set objCatalog = Nothing
Set objCatalogs = Nothing
Set objBuildServer = Nothing
Set objSearchAdmin = Nothing
See Also