Enumerator (objet)
Représente un flux de résultats retourné par des opérations, telles qu’une opération d’extraction. Par exemple, la méthode session. Enumerate retourne plusieurs résultats.
Membres
L’objet énumérateur possède les types de membres suivants :
Méthodes
L’objet énumérateur possède ces méthodes.
| Méthode | Description |
|---|---|
| ReadItem | Récupère un élément de la ressource et retourne une représentation XML de l’élément. |
Propriétés
L’objet énumérateur a ces propriétés.
| Propriété | Description |
|---|---|
| AtEndOfStream |
Obtient une valeur booléenne qui indique s’il y a plus d’éléments dans la collection. |
| Erreur |
Obtient une représentation XML des informations d’erreur supplémentaires. |
Remarques
Pour démarrer une énumération, utilisez session. Enumerate. Pour effectuer une opération WS-Enumeration :pull qui poursuit la lecture des éléments dans l’énumération, utilisez Enumerator. ReadItem.
L’objet énumérateur correspond à l’interface IWSManEnumerator .
Exemples
L’exemple de code VBScript suivant énumère tous les disques sur un ordinateur distant spécifié par le nom de domaine complet (servername.domain.com). La sous-routine DisplayOutput met en forme la sortie des données de la même façon que l’outil WinRM. cmd.
Option Explicit
Const RemoteComputer = "MIG50-64D.mig.net"
Dim objWsman, objSession, strResource
Dim objResultSet
Set objWsman = CreateObject( "WSMan.Automation" )
Set objSession = objWsman.CreateSession( "https://" _
& RemoteComputer )
strResource = "http://schemas.microsoft.com/wbem/wsman/1/" _
& "wmi/root/cimv2/Win32_OperatingSystem"
Dim iFlag
iFlag = objWsman.EnumerationFlagReturnObjectAndEPR or _
objWsman.EnumerationFlagHierarchyDeep
Set objResultSet = _
objSession.Enumerate( strResource, "", "", iFlag)
While Not objResultSet.AtEndOfStream
DisplayOutput( objResultSet.ReadItem )
Wend
'****************************************************
' Displays WinRM XML message using built-in XSL
'****************************************************
Sub DisplayOutput( strWinRMXml )
Dim xmlFile, xslFile
Set xmlFile = CreateObject( "MSXml2.DOMDocument.3.0" )
Set xslFile = CreateObject( "MSXml2.DOMDocument.3.0" )
xmlFile.LoadXml( strWinRMXml )
xslFile.Load( "WsmTxt.xsl" )
Wscript.Echo xmlFile.TransformNode( xslFile )
End Sub
Configuration requise
| Condition requise | Valeur |
|---|---|
| Client minimal pris en charge |
Windows Vista |
| Serveur minimal pris en charge |
Windows Server 2008 |
| En-tête |
|
| MIDL |
|
| Bibliothèque |
|
| DLL |
|