Работа с WMI

← →
Yanis © (2007-07-06 11:03) [0]

Решил выполнить одну рутинную задачку при помощи WMI.
Появилась проблемка, которую я надеюсь мне помогут здесь разрешить.
У меня есть код, который определяем имя компьютера, на котором запущен код:
strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\CIMV2") Set colItems = objWMIService.ExecQuery( _ "SELECT * FROM Win32_ComputerSystem",,48) For Each objItem in colItems Wscript.Echo "-----------------------------------" Wscript.Echo "Win32_ComputerSystem instance" Wscript.Echo "-----------------------------------" Wscript.Echo "Name: " & objItem.Name Next
Я подумал, что т.к. свойство Name не является массивом (написано, что его тип string), то можно узнать его значение не используя For…Each…in а просто обратившись к какому-либо свойству.
Подскажите можно ли это сделать и как именно.

← →
umbra © (2007-07-06 11:21) [1]

и сколько имен печатается при выполнении скрипта?

← →
Yanis © (2007-07-06 11:23) [2]

Одно. Потому и хотелось бы реализовать «получение значения свойства», а не «перечисление».

← →
umbra © (2007-07-06 11:51) [3]

как написано в мсдн, поиск элемента в коллекции все равно требует пересмотра всех элементов. поэтому нет смысла огород городить. К тому же, коллекция, которую возвращает ExecQuery индексируется какими-то загадочными "относительными путями", которые в применении к компьютерам значат неясно что. Проще вывести переменную окружения COMPUTERNAME :)

var WshNetwork;
WshNetwork = WScript.CreateObject("WScript.Network");
WScript.Echo(WshNetwork.ComputerName);

Работа с WMI Найти похожие ветки