Computer Hardware Scripts: Retrieving System Information

Retrieving System Information INVENTORY OF A COMPUTER WITH WINDOWSPripared by Laxman, Uses WMI to retrieve the same data found in the System Information applet. ====================== strComputer = "." Set objWMIService = GetObject("winmgmts:" _     & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colSettings = objWMIService.ExecQuery...

Computer Hardware Scripts: Retrieving BIOS Information

INVENTORY OF A COMPUTER WITH WINDOWS Pripared by Laxman, Retrieves BIOS information for a computer, including BIOS version number and release date. ======================strComputer = "."Set objWMIService = GetObject("winmgmts:" _    & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2")Set colBIOS = objWMIService.ExecQuery _   ...

Identifying Processor Type & Inventorying Computer Hardware

INVENTORY OF A COMPUTER WITH WINDOWS Pripared by Laxman, Identifying Processor Type Determines the processor architecture (such as x86 or ia64) for a specified computer. ======================== strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set objProcessor = objWMIService.Get("win32_Processor='CPU0'") If objProcessor.Architecture...

Computer Hardware Scripts: Enumerating Serial Port Properties

INVENTORY OF A COMPUTER WITH WINDOWS Pripared by Laxman, Returns information about the serial ports installed on a computer.  ================== On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_SerialPort",,48) For Each objItem in colItems  ...

Computer Hardware Scripts: Enumerating Processor Information

INVENTORY OF A COMPUTER WITH WINDOWS Pripared by Laxman, Returns information about the processors installed on a computer.  =================== On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_Processor") For Each objItem in colItems  ...

Computer Hardware Scripts: Enumerating the Physical Memory Configuration

Enumerating the Physical Memory ConfigurationReturns information about the way physical memory is configured on a computer.  INVENTORY OF A COMPUTER WITH WINDOWSPripared by Laxman, ==================== On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select...

Enumerating Parallel Port Properties

Enumerating Parallel Port PropertiesINVENTORY OF A COMPUTER WITH WINDOWSPripared by Laxman, Returns information about the parallel ports installed on a computer.  ============================ On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_ParallelPort",,48) For...

Computer Hardware Scripts: Enumerating IRQ Settings

Enumerating IRQ Settings Returns information about the IRQ settings on a computer. INVENTORY OF A COMPUTER WITH WINDOWS Pripared by Laxman, ============================================================ On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from...

Computer Hardware Scripts: Enumerating Computer Bus Properties.

Enumerating Computer Bus Properties.INVENTORY OF A COMPUTER WITH WINDOWSPripared by Laxman,Returns information about the computer bus. On Error Resume NextstrComputer = "."Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2")Set colItems = objWMIService.ExecQuery("Select * from Win32_Bus")For Each objItem in colItems    Wscript.Echo "Bus...

Computer Hardware Scripts: Enumerating Computer Baseboard Properties

INVENTORY OF A COMPUTER WITH WINDOWSPripared by Laxman, Returns information about the computer baseboard. ============================================ On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_BaseBoard") For Each objItem in colItems  ...