This property specifies whether Search crawls or avoids the site when crawling.
Syntax
SiteResriction.Included
Remarks
If True, Search crawls the site; if False, Search does not crawl the site.
Example
The following example displays whether Search crawls the sites in the restriction list for the KMSampleCatalog1 catalog definition.
Option Explicit
On Error Resume Next
Dim objSearchAdmin, objBuildServer, objCatalogs, objCatalog, objSites, objSite
Set objSearchAdmin = CreateObject("Search.SearchAdmin.1")
Set objBuildServer = objSearchAdmin.BuildServer
Set objCatalogs = objBuildServer.BuildCatalogs
Set objCatalog = objCatalogs("KMSampleCatalog1")
Set objSites = objCatalog.objSites
Wscript.Echo objCatalog.Name & " has the following site restrictions:"
For Each objSite in objSites
If objSite.Included Then
Wscript.Echo " " & objSite.Name & " is crawled."
Else
Wscript.Echo " " & objSite.Name & " is avoided."
End If
Next
'Release objects
Set objSite = Nothing
Set objSites = Nothing
Set objCatalog = Nothing
Set objCatalogs = Nothing
Set objBuildServer = Nothing
Set objSearchAdmin = Nothing
See Also