Цитата KAPAKyPT:
|
именно на двуядерную АМД платформу
|
У меня нет AMD, поэтому посмотрите сами, что выдаст такой .vbs скрипт:
Код:
Dim WMI, objItems, objItem, M
Set WMI = GetObject("winmgmts:\\.\root\cimv2")
Set objItems = WMI.ExecQuery("Select Manufacturer from Win32_Processor")
For Each objItem in objItems
M = objItem.Manufacturer
Next
MsgBox "Производитель: " & M & VBNewLine & _
"Количество: " & objItems.Count
