Enable Method

This method enables searching on the catalog.

Syntax

ISearchCatalog.Enable

Example

The following example enables searching on the KMSampleCatalog1 catalog.

Option Explicit 
On Error Resume Next

Dim objSearchAdmin, objSearchServer, objCatalogs, objCatalog 

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

objCatalog.Enable 

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

See Also

Disable, Update


© 1997-1998 Microsoft Corporation. All rights reserved.