IFPCDomainNameSet::_NewEnum property

Applies to: desktop apps only

The _NewEnum property gets an enumerator object for the collection. An enumerator object provides serial access to the elements of the collection.

This property is read-only.


HRESULT get__NewEnum(
  IUnknown *ppEnum
' Data type: IUnknown

Property _NewEnum( _
  ByVal ppEnum As IUnknown _
) As IUnknown

Property value

Reference to an enumerator object that provides serial access to the elements of the collection.

Error codes

This property method returns S_OK if the call is successful; otherwise, it returns an error code.


This property is read-only.

In Visual Basic and VBScript, this property is used implicitly in For Each...In...Next constructs.


This VBScript script displays all of the domain names in a specific domain name set. This example does not include error handling.

' Create the root object.
Dim root  ' The FPCLib.FPC root object
Set root = CreateObject("FPC.Root")
' Declare the other objects needed and a string.
Dim isaArray         ' An FPCArray object
Dim domainNameSets   ' An FPCDomainNameSets collection
Dim domainNameSet    ' An FPCDomainNameSet collection
Dim domainName       ' A string
' Get references to the array object 
' and the domain name sets collection.
Set isaArray = root.GetContainingArray()
Set domainNameSets = isaArray.RuleElements.DomainNameSets
' If at least one domain name set is defined in the domain 
' name sets collection, display the domain names in the first
' domain name set found.
On Error Resume Next
Set domainNameSet = domainNameSets.Item(1)
If Err.Number = 0 Then
    For Each domainName In domainNameSet
        WScript.Echo "Domain name: " & domainName 
End If


Minimum supported client

Windows Vista

Minimum supported server

Windows Server 2008 R2, Windows Server 2008 with SP2 (64-bit only)


Forefront Threat Management Gateway (TMG) 2010





See also




Build date: 7/12/2010