Partilhar via


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

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