Alternatively, this vbscript uses WMI to enumerate all the bus devices
in Windows. Just save it to a file, go to a command prompt, and run
CScript.exe PnPDevices.vbs. 

----- Start PnPDevices.vbs -----
Set buses = GetObject("winmgmts:").InstancesOf("Win32_Bus")
For Each bus In buses
    WScript.Echo bus.DeviceID
    Set devices = GetObject("winmgmts:").ExecQuery ("Associators of
{Win32_Bus.DeviceID=""" & bus.DeviceID & """} WHERE AssocClass =
Win32_DeviceBus")
    For Each device In devices
        WScript.Echo "  ", device.name
        WScript.Echo vbTab, device.PnPDeviceID
    Next
Next 
----- End PnPDevices.vbs -----

Bob Miller
Network Administrator
Alfe Corporate Group

_______________________________________________
Fwlug mailing list
[email protected]
http://fortwaynelug.org/mailman/listinfo/fwlug_fortwaynelug.org

Reply via email to