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

要求

要求
最低受支持的客户端
Windows Vista
最低受支持的服务器
Windows Server 2008
标头
WSManDisp.h
IDL
WSManDisp.idl

WSManDisp.tlb
DLL
WSMAuto.dll

另请参阅

枚举器

枚举或列出资源的所有实例