Método Enumerator.ReadItem

Recupera um item do recurso e retorna uma representação XML do item.

Sintaxe

Enumerator.ReadItem( _
  ByVal resource _
)

Parâmetros

recurso

O URI do item.

Valor retornado

A representação XML do item.

Comentários

Para limitar o número de itens lidos, defina a propriedade Session.BatchItems .

Observe que a liberação do objeto de enumeração limpa todas as solicitações de enumeração pendentes.

O método Session.Enumerate não obtém uma coleção da mesma forma que uma consulta WMI, como SELECT * from Win32_LogicalDisk, retorna uma coleção em um SWbemObjectSet. Para ler um arquivo como um fluxo de texto, crie o objeto TextStream de script e chame o método TextStream.Readline para ler cada linha do arquivo. De maneira semelhante, você chama o método Session.Enumerate para obter um objeto Enumerator e, em seguida, chama o método Enumerator.ReadItem . Assim como na leitura do arquivo de texto, você pode marcar a propriedade Enumerator.AtEndOfStream para marcar se você atingiu o final dos itens de dados.

Exemplos

O exemplo de VBScript a seguir chama o método Session.Enumerate para obter uma lista de trabalhos agendados. A sub-rotina DisplayOutput usa o arquivo de transformação XML da ferramenta de linha de comando Winrm (WsmTxt.xsl) para gerar os dados em um formulário tabular.

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_ScheduledJob"

Set objResultSet = objSession.Enumerate( strResource )
NumOfJobs = 0

While Not objResultSet.AtEndOfStream
    NumOfJobs = NumOfJobs + 1
    DisplayOutput( objResultSet.ReadItem ) 
Wend

Wscript.Echo "There are " & NumOfJobs & " jobs scheduled."

'****************************************************
' 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

Enumerador

Enumerando ou listando todas as instâncias de um recurso