Objeto Enumerator

Representa um fluxo de resultados retornados de operações, como uma operação de pull. Por exemplo, o método Session.Enumerate retorna vários resultados.

Membros

O objeto Enumerator tem estes tipos de membros:

• Métodos
• Propriedades

Métodos

O objeto Enumerator tem esses métodos.

Método	Descrição
Readitem	Recupera um item do recurso e retorna uma representação XML do item.

Propriedades

O objeto Enumerator tem essas propriedades.

Propriedade	Descrição
AtEndOfStream	Obtém um valor booliano que indica se há mais itens na coleção.
Erro do	Obtém uma representação XML de informações de erro adicionais.

Comentários

Para iniciar uma enumeração, use Session.Enumerate. Para fazer uma operação WS-Enumeration:Pull que continua lendo itens na enumeração, use Enumerator.ReadItem.

O objeto Enumerator corresponde à interface IWSManEnumerator .

Exemplos

O exemplo de código VBScript a seguir enumera todos os discos em um computador remoto especificado pelo nome de domínio totalmente qualificado (servername.domain.com). A sub-rotina DisplayOutput formata a saída de dados da mesma forma que a ferramenta 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	Valor
Cliente mínimo com suporte	Windows Vista
Servidor mínimo com suporte	Windows Server 2008
Cabeçalho	WSManDisp.h
IDL	WSManDisp.idl
Biblioteca	WSManDisp.tlb
DLL	WSMAuto.dll

Confira também

API de script do WinRM

Enumerando ou listando todas as instâncias de um recurso

Scripts no Gerenciamento Remoto do Windows