Enumerator.AtEndOfStream, propriété
Obtient une valeur booléenne qui indique s’il y a d’autres éléments dans la collection.
Cette propriété est en lecture seule.
Syntaxe
Enumerator.AtEndOfStream As BOOLEAN
Valeur de la propriété
Vrai
Il n’y a plus d’éléments dans la collection.
Faux
D’autres éléments sont disponibles.
Notes
Si vous libérez l’objet Enumerator après avoir obtenu toutes les données requises, toutes les demandes d’énumération en attente sont supprimées. Pour plus d’informations, consultez Énumération ou liste de toutes les instances d’une ressource.
Exemples
L’exemple VBScript suivant énumère les instances de système d’exploitation. Notez que la libération de l’objet d’énumération nettoie toutes les demandes d’énumération en attente. La sous-routine DisplayOutput met en forme la sortie des données de la même façon que l’outil WinRM.cmd.
Const RemoteComputer = "servername.domain.com"
Set objWsman = CreateObject( "WSMan.Automation" )
Set objSession = objWsman.CreateSession( "https://" & _
RemoteComputer )
strResource = "http://schemas.microsoft.com/wbem/wsman/1/" &_
"wmi/root/cimv2/Win32_OperatingSystem"
Set objResultSet = objSession.Enumerate( strResource )
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
Spécifications
Condition requise | Valeur |
---|---|
Client minimal pris en charge |
Windows Vista |
Serveur minimal pris en charge |
Windows Server 2008 |
En-tête |
|
IDL |
|
Bibliothèque |
|
DLL |
|