This method adds an item to the list of how frequently Search accesses a site.
Syntax
IServers.Add(Site)
Parameters
Site
The site that is added to the list of how frequently Search accesses a site.
Example
The following example adds the Microsoft.com site to the list of sites.
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
Set objServer = objServers.Add("Microsoft.com")
...
'Release objects
Set objServer = Nothing
Set objServers = Nothing
Set objBuildServer = Nothing
Set objSearchAdmin = Nothing
See Also