The Disable method disables searching on the catalog.
Syntax
ISearchCatalog.Disable
Remarks
If True, Search will not access the catalog when searching; if False, Search can access the catalog when searching.
Example
The following example disables searching on the catalog KMSampleCatalog1.
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.Disable
'Release objects
Set objCatalog = Nothing
Set objCatalogs = Nothing
Set objSearchServer = Nothing
Set objSearchAdmin = Nothing
See Also