December 5, 200718 yr SMBiosD and W don't work for me in 2.0? HTA and WMI packages are installed and I can't figure out why neither will run. They both say that the .exe cannot be found. Does anyone have a freeware utility that will read the bios in PE 2.0? I need to extract Model and Manufacturer.
December 5, 200718 yr Here is what I use: (VBS script)Dim objFileSystem, objOutputFileDim strOutputFilestrComputer = "."strOutputFile = "X:\hardtest.ini"Set objFileSystem = CreateObject("Scripting.fileSystemObject")Set objOutputFile = objFileSystem.CreateTextFile(strOutputFile, TRUE)Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")Set colSettings = objWMIService.ExecQuery _ ("SELECT * FROM Win32_ComputerSystem")For Each objComputer in colSettings 'Wscript.Echo "System Manufacturer: " & objComputer.Manufacturer objOutputFile.WriteLine("Type: " & objComputer.Manufacturer & "") objOutputFile.WriteLine("Model: " & objComputer.Model & "")NextobjOutputFile.CloseSet objFileSystem = NothingWScript.Quit(0)Here is the output: "X:\hardtest.ini"Type: SupermicroModel: H8SMI Edited December 5, 200718 yr by Jazkal
December 6, 200718 yr Author Here is what I use: (VBS script)Dim objFileSystem, objOutputFileDim strOutputFilestrComputer = "."strOutputFile = "X:\hardtest.ini"Set objFileSystem = CreateObject("Scripting.fileSystemObject")Set objOutputFile = objFileSystem.CreateTextFile(strOutputFile, TRUE)Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")Set colSettings = objWMIService.ExecQuery _ ("SELECT * FROM Win32_ComputerSystem")For Each objComputer in colSettings 'Wscript.Echo "System Manufacturer: " & objComputer.Manufacturer objOutputFile.WriteLine("Type: " & objComputer.Manufacturer & "") objOutputFile.WriteLine("Model: " & objComputer.Model & "")NextobjOutputFile.CloseSet objFileSystem = NothingWScript.Quit(0)Here is the output: "X:\hardtest.ini"Type: SupermicroModel: H8SMIThanks Jaz, I ended up writing a very simple AutoIT script for it, working great now.
Create an account or sign in to comment