Enumerator.AtEndOfStream プロパティ

コレクション内に項目がこれ以上存在するかどうかを示すブール値を取得します。

このプロパティは読み取り専用です。

構文

Enumerator.AtEndOfStream As BOOLEAN

プロパティ値

注釈

必要なすべてのデータを取得した後に Enumerator オブジェクトを解放すると、保留中の列挙要求はすべて削除されます。 詳細については、「 リソースのすべてのインスタンスの列挙または一覧表示」を参照してください。

例

次の VBScript の例では、オペレーティング システム インスタンスを列挙します。 列挙オブジェクトを解放すると、保留中の列挙要求がクリーンアップされることに注意してください。 DisplayOutput サブルーチンは、WinRM.cmd ツールと同じ方法でデータ出力をフォーマットします。

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

Set objResultSet = objSession.Enumerate( strResource )

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

要件

こちらもご覧ください

列挙子

リソースのすべてのインスタンスの列挙または一覧表示