Objek enumerator

Artikel
06/12/2023

Mewakili aliran hasil yang dikembalikan dari operasi, seperti operasi Pull. Misalnya, metode Session.Enumerate mengembalikan beberapa hasil.

Anggota

Objek Enumerator memiliki jenis anggota ini:

Metode
Properti

Metode

Objek Enumerator memiliki metode ini.

Metode	Deskripsi
ReadItem	Mengambil item dari sumber daya dan mengembalikan representasi XML item.

Properti

Objek Enumerator memiliki properti ini.

Properti	Deskripsi
AtEndOfStream	Mendapatkan nilai Boolean yang menunjukkan apakah ada lebih banyak item dalam koleksi.
Kesalahan	Mendapatkan representasi XML dari informasi kesalahan tambahan.

Keterangan

Untuk memulai enumerasi, gunakan Session.Enumerate. Untuk melakukan operasi WS-Enumeration:Pull yang terus membaca item dalam enumerasi, gunakan Enumerator.ReadItem.

Objek Enumerator sesuai dengan antarmuka IWSManEnumerator .

Contoh

Contoh kode VBScript berikut menghitung semua disk pada komputer jarak jauh yang ditentukan oleh nama domain yang sepenuhnya memenuhi syarat (servername.domain.com). Subroutine DisplayOutput memformat output data dengan cara yang sama seperti alat 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

Persyaratan

Persyaratan	Nilai
Klien minimum yang didukung	Windows Vista
Server minimum yang didukung	Windows Server 2008
Header	WSManDisp.h
IDL	WSManDisp.idl
Pustaka	WSManDisp.tlb
DLL	WSMAuto.dll

Lihat juga

API Pembuatan Skrip WinRM
Menghitung atau Mencantumkan Semua Instans Sumber Daya
Pembuatan skrip di Manajemen Jarak Jauh Windows