程序点滴jcodeer.blog.chinaunix.net
jcodeer
全部博文(171)
2012年(2)
2011年(70)
2010年(9)
2009年(14)
2008年(76)
Bean_lee
GY123456
armlife
linky521
g_progra
猥琐才是
athzhang
CU博客助
meiyang_
heq76
gaokeke1
yangyefe
yanganni
tomcodin
qhy95020
allaxin
suntao32
13661379
分类:
2008-05-24 22:37:00
On Error Resume Next strComputer = "." Set objWMIService = GetObject("winmgmts:" _ & "{impersonationLevel=impersonate}!\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery("Select * from Win32_PointingDevice") For Each objItem in colItems Wscript.Echo "Description: " & objItem.Description Wscript.Echo "Device ID: " & objItem.DeviceID Wscript.Echo "Device Interface: " & objItem.DeviceInterface Wscript.Echo "Double Speed Threshold: " & objItem.DoubleSpeedThreshold Wscript.Echo "Handedness: " & objItem.Handedness Wscript.Echo "Hardware Type: " & objItem.HardwareType Wscript.Echo "INF File Name: " & objItem.InfFileName Wscript.Echo "INF Section: " & objItem.InfSection Wscript.Echo "Manufacturer: " & objItem.Manufacturer Wscript.Echo "Name: " & objItem.Name Wscript.Echo "Number Of Buttons: " & objItem.NumberOfButtons Wscript.Echo "PNP Device ID: " & objItem.PNPDeviceID Wscript.Echo "Pointing Type: " & objItem.PointingType Wscript.Echo "Quad Speed Threshold: " & objItem.QuadSpeedThreshold Wscript.Echo "Resolution: " & objItem.Resolution Wscript.Echo "Sample Rate: " & objItem.SampleRate Wscript.Echo "Synch: " & objItem.Synch Next Wscript.StdIn.Read(1)
上一篇:获取键盘信息
下一篇:GB GBK GB18030 UNICODE区别于联系
登录 注册