Name Property

This read-only property specifies the name of the site.

Syntax

ISiteResriction.Name

Example

The following example displays the names of the restricted sites 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 & " restricts the following sites:"

For Each objSite in objSites
  Wscript.Echo "  " & objSite.Name
Next

'Release objects
Set objSite     = Nothing 
Set objSites    = Nothing 
Set objCatalog  = Nothing 
Set objCatalogs = Nothing 
Set objBuildServer = Nothing 
Set objSearchAdmin = Nothing 
 

See Also

SetAccount


© 1997-1998 Microsoft Corporation. All rights reserved.