![]() Loading |
| VBScript |
| JavaScript |
| Powershell |
Search Options: List Computer Bus Properties
|
||
|
' Description: Returns information about the computer bus.
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_Bus") For Each objItem in colItems Wscript.Echo "Bus Number: " & objItem.BusNum Wscript.Echo "Bus Type: " & objItem.BusType Wscript.Echo "Description: " & objItem.Description Wscript.Echo "Device ID: " & objItem.DeviceID Wscript.Echo "Name: " & objItem.Name Wscript.Echo "PNP Device ID: " & objItem.PNPDeviceID Next | ||
© 2008 - 2013 Boris Toll :: Scripts available: 6.481 :: :: scriptbox.toll.at :: :: powered by www.toll.at :: | ||