tsdima писал(а):
Вот так можно посмотреть все свойства всех процессоров, доступные через WMI
set oCollection = GetObject("winmgmts:{impersonationLevel=impersonate}\.
ootcimv2").ExecQuery("select * from Win32_Processor")
For Each item In oCollection
s = ""
For Each x In item.Properties_
s = s & x.Name & " = " & x.Value & vbNewLine
Next
MsgBox s
Next
Работает.
А можно как нибудь строчку ProcessorId, которая в окошке в поток вывести?
Поиск
Друзья
Администрация