Properties Property

This read-only property specifes the catalog build properties (ICatalogProperties interface).

Syntax

ISearchCatalog.Properties

Remarks

See ICatalogProperties for a description of the catalog build properties.

Example

The following example displays the properties for all catalogs.

Option Explicit
On Error Resume Next

Dim objSearchAdmin, objSearchServer, objCatalogs, objCatalog, Property 

Err.Clear

Set objSearchAdmin  = CreateObject("Search.SearchAdmin.1")
Set objSearchServer = objSearchAdmin.SearchServer
Set objCatalogs  = objSearchServer.SearchCatalogs

For Each objCatalog in objCatalogs
  Wscript.echo "objCatalog " & objCatalog.Name & " properties:"
  Set Property = objCatalog.Properties
  Wscript.echo "  Build date:             " & Property.BuildDate
  Wscript.echo "  # docs:                 " & Property.NumberOfDocuments 
  Wscript.echo "  Size of index:          " & Property.IndexSize 
    & " (MBytes)"
  Wscript.echo "  Size of property store: " 
    & Property.PropertyStoreSize & " (MBytes)"
  Wscript.echo "  # unique keys:          " & Property.UniqueKeyCount 
  Wscript.echo "  Crawl number:           " & Property.PropSeqNum 
     Wscript.Echo ""
Next

'Release objects
Set objCatalog    = Nothing
Set objSearchServer  = Nothing
Set objSearchAdmin   = Nothing
 

See Also

Name


© 1997-1998 Microsoft Corporation. All rights reserved.