WHERE " & _
strKeyName & "=" & Chr(34) & strComputerName &
Chr(34)
'*** Retrieve instances of Dell_Configuration class (there should only
'*** be 1 instance). Set colInstances = GetObject("WinMgmts:{impersonationLevel= impersonate}//"&_
strComputerName & "/" & strNameSpace).ExecQuery(strWQLQuery, "WQL",
NULL)
'*** Use only first instance to retrieve asset tag, service tag, and BIOS
'*** version
For Each objInstance in colInstances strMessage = "Asset Tag: " strMessage = strMessage &
objInstance.Properties_.Item ("AssetTag").Value
strMessage = strMessage & vbCRLF & "Service
Tag: "
strMessage = strMessage & objInstance.Properties_.Item
("ServiceTag").Value
strMessage = strMessage & vbCRLF & "BIOS Version: "
strMessage = strMessage & objInstance.Properties_.Item
("BIOSVersion").Value Exit For
Next
'*** Display the results WScript.Echo strMessage
'*** Sub used to display the correct usage of the script
Sample Scripts and BIOS Settings
67
