IFPCAccounts::_NewEnum property

[アーティクル]
08/27/2012

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.

Syntax

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.

Remarks

This property is read-only.

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

Examples

This VBScript script displays the names of all the accounts in a specified user set. It 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.
Dim isaArray  ' An FPCArray object
Dim accounts  ' An FPCAccounts collection
Dim account   ' An FPCAccount object
Dim usersets  ' An FPCUserSets collection
Dim userset   ' An FPCUserSet object
' Get references to the array object 
' and the user sets collection.
Set isaArray = root.GetContainingArray()
Set usersets = isaArray.RuleElements.UserSets
' If a user set named "System and Network Service" exists,
' display the names of the accounts in it.
On Error Resume Next
Set userset = usersets.Item("System and Network Service")
Set accounts = userset.Accounts
If Err.Number = 0 Then
    For Each account In accounts
        WScript.Echo "Account name: " + account.Account 
    Next
End If

Requirements

Minimum supported client	Windows Vista
Minimum supported server	Windows Server 2008 R2, Windows Server 2008 with SP2 (64-bit only)
Version	Forefront Threat Management Gateway (TMG) 2010
IDL	Msfpccom.idl
DLL	Msfpccom.dll

次の方法で共有