用vbs确定计算机是否有 USB 2.0 端口的代码
用vbs确定计算机是否有 USB 2.0 端口的代码
发布时间:2016-12-28 来源:查字典编辑
摘要:问:您好,脚本专家!有没有办法使用脚本来确定计算机是否有USB2.0端口?--RD答:您好,RD。您熟悉电影疯狂星期五(FreakyFrid...

问:

您好,脚本专家!有没有办法使用脚本来确定计算机是否有USB2.0端口?

--RD

答:

您好,RD。您熟悉电影疯狂星期五(FreakyFriday)吗,电影中母亲和女儿交换了身体(及角色)?嗯,我们的这个问题中有点类似疯狂星期五的东西。毕竟,在本专栏中本来应该由“脚本专家”来帮助您。但是,此问题实际上却帮助了一位“脚本专家”。他原来一直在尝试测试USB设备(未成功),而且几乎已经把这项工作视为毫无意义。但是当阅读到您的问题时,他心中暗想,“哎呀,对啊:USB1.1和USB2.0”。他在USB1.1插槽中一尝试测试该设备(对照2.0插槽),问题马上就解决了。

嗨,没有人说过这个特别的“脚本专家”是天才。(编辑附注:我为此证明。)

我们欠您一份情,RD;我们该如何报答您呢?好主意:也许我们可以从回答您的问题开始。好的,这里有一个脚本,它很可能返回计算机上USB2.0端口的数量。让我们先看代码,然后再解释我们说它“很可能”返回端口数量的原因:

复制代码 代码如下:

strComputer="."

i=0

SetobjWMIService=GetObject("winmgmts:"&strComputer&"rootcimv2")

SetcolControllers=objWMIService.ExecQuery_

("Select*FromWin32_USBController")

ForEachobjControllerincolControllers

IfInstr(objController.Name,"Enhanced")Then

i=i+1

EndIf

Next

Wscript.Echo"No.ofUSB2.0Ports:"&i

这个脚本首先为两个变量进行了赋值。为变量strComputer赋予了点(.),点(WMI表示法)代表本地计算机。同时,为计数器变量i赋值0;我们将使用此变量来作为所有找到的USB2.0端口的活动计数器。

连接到WMI服务后,我们使用此查询返回所有Win32_USBController类的实例:

SetcolControllers=objWMIService.ExecQuery_

("Select*FromWin32_USBController")

在此我们设置一个ForEach循环来遍历集合(集合当然是代表计算机上的所有USB端口)中的每一项。遗憾的是,Win32_USBController类不包含可告诉我们USB版本的属性(如Version),实际上,并没有明确的方法来查看USB插槽的属性并了解它是1.1版本还是2.0版本。不过,大部分2.0端口均在名称中的某个位置包含Enhanced一词。我们不能保证所有端口均如此,这就是我们说此脚本很可能返回计算机上USB2.0端口数量的原因。但是,在办公室里的随机测试中,此方法似乎行得通;发现2.0插槽时它总是有类似下面的名称:

VIAUSBEnhancedHostController

那么,这对我们有何帮助呢?嗯,这表示我们可以使用InStr函数来查看Enhanced一词是否出现在每个插槽的Name中:

IfInstr(objController.Name,"Enhanced")Then

如果InStr返回值True(从技术角度来说,如果它返回比0大的值),则表示在名称中某处发现了Enhanced一词。在这种情况下,我们会将i值加1:

i=i+1

如果InStr返回0,表示找不到Enhanced一词怎么办?嗯,在这种情况下,我们就进入下一个循环并尝试集合中的下一项,i值保持不变。

我们继续进行查询,每次找到名称中有Enhanced的USB插槽即增加i值。当全部完成后,我们只需回显i值,它将告诉我们计算机上USB2.0端口的数量。

它并不一定是万无一失的方法,但好像还管用。而且,您知道,这和您为我们做事还不一样。

哦,对了;我们忘记了一件事。嗯,您或许喜欢巧克力?

推荐文章
猜你喜欢
附近的人在看
推荐阅读
拓展阅读
相关阅读
网友关注
最新vbs学习
热门vbs学习
脚本专栏子分类