This method clears the schema stop lists.
Syntax
IStoplists.Clear
Remarks
This method is not permanent unless you subsequently call the Schema.Save method on the catalog.
Example
The following example clears the stop lists for the KMSampleCatalog1 catalog definition.
Option Explicit
On Error Resume Next
Dim objSearchAdmin, objBuildServer, objCatalogs, objCatalog, objSchema, objStoplists
Set objSearchAdmin = CreateObject("Search.SearchAdmin.1")
Set objBuildServer = objSearchAdmin.BuildServer
Set objCatalogs = objBuildServer.BuildCatalogs
Set objCatalog = objCatalogs("KMSampleCatalog1")
Set objSchema = objCatalog.objSchema
Set objStoplists = objSchema.objStoplists
objStoplists.Clear
'Release objects
Set objStoplists = Nothing
Set objSchema = Nothing
Set objCatalog = Nothing
Set objCatalogs = Nothing
Set objBuildServer = Nothing
Set objSearchAdmin = Nothing
See Also