This read-only property specifies the status code of the catalog.
Syntax
IBuildCatalog.StatusCode
Remarks
The following status codes are defined:
0
Idle
1
Crawling
2
Paused
3
Throtted
4
Initializing
5
Shut down
6
Crawling incrementally
32
(Index) Crawling
64
Compiling the catalog
128
Propagating the catalog
320
Paused (disk full)
640
Retrying propagation
1024
Flushing
Example
The following example displays the status code of all catalogs.
Option Explicit
On Error Resume Next
Dim objSearchAdmin, objBuildServer, objCatalogs, objCatalog
Set objSearchAdmin = CreateObject("Search.SearchAdmin.1")
Set objBuildServer = objSearchAdmin.BuildServer
Set objCatalogs = objBuildServer.BuildCatalogs
For Each objCatalog in objCatalogs
Wscript.Echo "Status code For " & objCatalog.Name & ": " _
& objCatalog.StatusCode
Next
'Release objects
Set objCatalogs = Nothing
Set objBuildServer = Nothing
Set objSearchAdmin = Nothing
See Also