Scriptbox - Find your Script, VBScript VBScripts VB-Script VB-Scripts Scripting

Loading

:: { Category } ::

0-9


	Search Options: Determine Whether a Computer Has Any USB 2.0 Ports Content of Determine Whether a Computer Has Any USB 2.0 Ports.vbs MD5 Hash: E1E66B3FBD8453CA58A7667EC44E0F25
	strComputer = "." i = 0 Set objWMIService = GetObject("winmgmts:\\" & strComputer & "\root\cimv2") Set colControllers = objWMIService.ExecQuery _ ("Select * From Win32_USBController") For Each objController in colControllers If Instr(objController.Name, "Enhanced") Then i = i + 1 End If Next Wscript.Echo "No. of USB 2.0 Ports: " & i

© 2008 - 2013 Boris Toll :: Scripts available: 6.481 :: :: scriptbox.toll.at :: :: powered by www.toll.at ::