Свойство Enumerator.AtEndOfStream

Статья
06/12/2023

Возвращает логическое значение, указывающее, есть ли в коллекции дополнительные элементы.

Это свойство доступно только для чтения.

Синтаксис

Enumerator.AtEndOfStream As BOOLEAN

Значение свойства

Истинный

В коллекции больше нет элементов.

Ложных

Доступны дополнительные элементы.

Если освободить объект Перечислитель после получения всех необходимых данных, все ожидающие запросы перечисления удаляются. Дополнительные сведения см. в разделе Перечисление или перечисление всех экземпляров ресурса.

Примеры

В следующем примере 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

См. также раздел

Перечислитель
Перечисление или перечисление всех экземпляров ресурса

Share via