I am frequently asked to inventory servers using VbScript.
When a server has Xeon processors it reports back twice as many as it
really has.
Is there a way to identify a Xeon in WMI and then account for it's
multiple personalities?
Here is a snip of the code I use. It's part of an HTA;
<--------------------------------------------------------<8>----------------------------------------------------------------->
Set CompSys = objWMIService.ExecQuery("Select * from
Win32_ComputerSystem",,48)
For Each sysItem In CompSys
statval.value = statval.value & vbTab & "Manufacturer: " &
sysItem.Manufacturer & VbCrLf
If sysItem.Manufacturer = Trim("Dell Computer Corporation") Then
Set colSMBIOS = objWMIService.ExecQuery ("Select * from
Win32_SystemEnclosure")
For Each objSMBIOS in colSMBIOS
strSerial = Trim(objSMBIOS.SerialNumber)
If len(strSerial) > 1 Then
statval.value = statval.value & vbTab & "Serial Number: " &
strSerial & VbCrLf
End If
Next
End If
statval.value = statval.value & vbTab & "Model: " & sysItem.Model &
VbCrLf
statval.value = statval.value & vbTab & "NumberOfProcessors: " &
sysItem.NumberOfProcessors & VbCrLf
statval.value = statval.value & vbTab & "SystemType: " &
sysItem.SystemType & VbCrLf
statval.value = statval.value & vbTab & "TotalPhysicalMemory: " &
sysItem.TotalPhysicalMemory & VbCrLf & VbCrLf
Next
<--------------------------------------------------------<8>----------------------------------------------------------------->
Also, it might be worth looking at the DeviceID property. I would say this
could be used to exclude extra processors but not sure how it acts in SMP,
HT and Dual Core situations and I have no access to such machines right now
(it's 10 at night and I am at home, not my data center).
HTH
Logan
"OldDog" <michael....@wellsfargo.com> wrote in message
news:1144269296.7...@t31g2000cwb.googlegroups.com...