_NewEnum Property of the IFPCIPsOnNetworks Interface

Article
08/13/2010

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

C++

HRESULT get__NewEnum(
    IUnknown* ppEnum
);

Parameters

ppEnum
Address of an interface pointer that on return points to the IUnknown interface of an enumerator object that implements an IEnumVARIANT interface for the collection. An interface pointer to the IEnumVARIANT interface of the enumerator object can be retrieved by calling QueryInterface on the IUnknown interface returned.

Return Value

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

Visual Basic

Property _NewEnum As IUnknown

Property Value

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

Example Code

This VBScript script displays all of the IP addresses on which a specific Web listener listens. This example does not include complete 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 webListeners  ' An FPCWebListeners collection
Dim webListener   ' An FPCWebListener object
Dim iponNetwork   ' An FPCIPOnNetwork object
Dim ipAddresses   ' An FPCIPAddresses collection
Dim ipAddress     ' A string
' Get references to the array object 
' and the IP addresses collection.
Set isaArray = root.GetContainingArray()
Set webListeners = isaArray.RuleElements.WebListeners
' If at least one Web listener is defined in the Web 
' listeners collection, display all the IP addresses on
' which the first Web listener found listens.
On Error Resume Next
Set webListener = webListeners.Item(1)
If Err.Number = 0 Then
    For Each iponNetwork In webListener.IPsOnNetworks
        Set ipAddresses = iponNetwork.IPAddresses
        For Each ipAddress In ipAddresses
            WScript.Echo "IP Address: " & ipAddress 
        Next
    Next
End If

Remarks

This property is read-only.

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

Requirements

Client	Requires Windows 7 or Windows Vista.
Server	Requires Windows Server 2008 R2 or Windows Server 2008 x64 Edition with SP2.
Version	Requires Forefront Threat Management Gateway (TMG) 2010.
IDL	Declared in Msfpccom.idl.
DLL	Requires Msfpccom.dll.

Share via