This read-only property accesses a site in the list of sites.
Syntax
IServers[.Item(Site)]
Settings
Site
The site to access.
Remarks
Since IServers is a collection, you need only include Item to access an IServers object by name (see the following Example).
Example
The following example displays the names of the sites in the list.
Option Explicit
On Error Resume Next
Dim objSearchAdmin, objBuildServer, objServers, objServer
Set objSearchAdmin = CreateObject("Search.SearchAdmin.1")
Set objBuildServer = objSearchAdmin.BuildServer
Set objServers = objBuildServer.Sites
Wscript.Echo "The sites with hit frequency rules are:"
For Each objServer in objServers
Wscript.Echo " " & objServer.Name
Next
'Release objects
Set objServer = Nothing
Set objServers = Nothing
Set objBuildServer = Nothing
Set objSearchAdmin = Nothing
See Also