This property specifies the maximum frequency that Search is allowed to access a site.
Syntax
IServer.HitInterval
Example
The following example displays how often Search accesses the site Microsoft.com.
Option Explicit
On Error Resume Next
Dim objSearchAdmin, objBuildServer, objCatalogs, objCatalog, objServers, objServer
Set objSearchAdmin = CreateObject("Search.SearchAdmin.1")
Set objBuildServer = objSearchAdmin.BuildServer
Set objCatalogs = objBuildServer.BuildCatalogs
Set objCatalog = objCatalogs("KMSampleCatalog1")
Set objServers = objCatalog.Sites
For Each objServer in objServers
If objServer.Name = "Microsoft.com" Then
Wscript.Echo "Search accesses " & objServer.Name & " every "
& objServer.HitInterval & " seconds."
End If
Next
'Release objects
Set objServer = Nothing
Set objServers = Nothing
Set objCatalog = Nothing
Set objCatalogs = Nothing
Set objBuildServer = Nothing
Set objSearchAdmin = Nothing
See Also