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 |
标头 |
|
IDL |
|
库 |
|
DLL |
|