This method removes a site from the site restriction list.
Syntax
ISiteRestrictions.Remove(Name)
Parameters
Name
The name of the site to remove from the list.
Example
The following example removes the site Microsoft.com from the list of sites with restrictions for the KMSampleCatalog2 catalog definition.
Option Explicit
On Error Resume Next
Dim objSearchAdmin, objBuildServer, objCatalogs, objCatalog, objSites
Set objSearchAdmin = CreateObject("Search.SearchAdmin.1")
Set objBuildServer = objSearchAdmin.BuildServer
Set objCatalogs = objBuildServer.BuildCatalogs
Set objCatalog = objCatalogs("KMSampleCatalog2")
Set objSites = objCatalog.objSites
objSites.Remove("Microsoft.com")
'Release objects
Set objSites = Nothing
Set objCatalog = Nothing
Set objCatalogs = Nothing
Set objBuildServer = Nothing
Set objSearchAdmin = Nothing
See Also