_NewEnum Property of the IFPCAppliedSSLCertificates Interface

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

HRESULT get__NewEnum(
	IUnknown* 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 the names of all the SSL server certificates that are available for a specific Web listener. 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 appliedSslCertificates  ' An FPCAppliedSSLCertificates collection
Dim appliedSslCertificate   ' An FPCAppliedSSLCertificate object
Dim webListeners			' An FPCWebListeners collection
Dim webListener			 ' An FPCWebListener object
' Get references to the array object 
' and the Web listeners collection.
Set isaArray = root.GetContainingArray()
Set webListeners = isaArray.RuleElements.WebListeners
' If at least one Web listener is defined in the Web listeners 
' collection, display the names of the SSL server certificates
' that are available for the first Web listener found.
On Error Resume Next
Set webListener = webListeners.Item(1)
Set appliedSslCertificates = webListener.Properties.AppliedSSLCertificates
If Err.Number = 0 Then
	For Each appliedSslCertificate In appliedSslCertificates
		WScript.Echo "Applied SSL certificate name: " & appliedSslCertificate.SSLCertificate.FriendlyName 
End If


This property is read-only.

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


Client Requires Windows Vista or Windows XP.
Server Requires Windows Server 2008.
Version Requires Forefront Threat Management Gateway (TMG).

Declared in Msfpccom.idl.


Requires Msfpccom.dll.

See Also


Send comments about this topic to Microsoft

Build date: 11/30/2009

© 2008 Microsoft Corporation. All rights reserved.