Enumerator (objeto)

Artículo
06/13/2023

Representa una secuencia de resultados devueltos por las operaciones, como una operación de extracción. Por ejemplo, el método Session.Enumerate devuelve varios resultados.

Miembros

El objeto Enumerador tiene estos tipos de miembros:

Métodos
Propiedades

Métodos

El objeto Enumerador tiene estos métodos.

Método	Descripción
ReadItem	Recupera un elemento del recurso y devuelve una representación XML del elemento.

Propiedades

El objeto Enumerador tiene estas propiedades.

Propiedad	Descripción
AtEndOfStream	Obtiene un valor booleano que indica si hay más elementos en la colección.
Error	Obtiene una representación XML de información de error adicional.

Observaciones

Para iniciar una enumeración, use Session.Enumerate. Para realizar una operación WS-Enumeration:Pull que continúe leyendo elementos en la enumeración, use Enumerator.ReadItem.

El objeto Enumerador corresponde a la interfaz IWSManEnumerator .

Ejemplos

En el siguiente ejemplo de código VBScript se enumeran todos los discos de un equipo remoto especificado por el nombre de dominio completo (servername.domain.com). La subrutina DisplayOutput da formato a la salida de datos de la misma manera que la herramienta 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

Requisitos

Requisito	Value
Cliente mínimo compatible	Windows Vista
Servidor mínimo compatible	Windows Server 2008
Encabezado	WSManDisp.h
IDL	WSManDisp.idl
Biblioteca	WSManDisp.tlb
Archivo DLL	WSMAuto.dll

Consulte también

WinRM Scripting API
Enumerar o enumerar todas las instancias de un recurso
Scripting en administración remota de Windows