Propiedad Enumerator.AtEndOfStream

Obtiene un valor booleano que indica si hay más elementos en la colección.

Esta propiedad es de solo lectura.

Sintaxis

Enumerator.AtEndOfStream As BOOLEAN

Valor de propiedad

Comentarios

Si libera el objeto Enumerador después de haber obtenido todos los datos necesarios, se quitarán las solicitudes de enumeración pendientes. Para obtener más información, vea Enumerar o enumerar todas las instancias de un recurso.

Ejemplos

En el siguiente ejemplo de VBScript se enumeran las instancias del sistema operativo. Tenga en cuenta que la liberación del objeto de enumeración limpia las solicitudes de enumeración pendientes. La subrutina DisplayOutput da formato a la salida de datos de la misma manera que la herramienta 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

Requisitos

Consulte también

Enumerador

Enumerar o enumerar todas las instancias de un recurso