用vbs确定计算机是否有 USB 2.0 端口的代码
作者 佚名
来源 ASP编程
浏览
发布时间 2013-07-09
| 问： 您好，脚本专家！有没有办法使用脚本来确定计算机是否有USB2.0端口？ --RD 答： 您好，RD。您熟悉电影疯狂星期五(FreakyFriday)吗，电影中母亲和女儿交换了身体（及角色）？嗯，我们的这个问题中有点类似疯狂星期五的东西。毕竟，在本专栏中本来应该由“脚本专家”来帮助您。但是，此问题实际上却帮助了一位“脚本专家”。他原来一直在尝试测试USB设备（未成功），而且几乎已经把这项工作视为毫无意义。但是当阅读到您的问题时，他心中暗想，“哎呀，对啊：USB1.1和USB2.0”。他在USB1.1插槽中一尝试测试该设备（对照2.0插槽），问题马上就解决了。 嗨，没有人说过这个特别的“脚本专家”是天才。（编辑附注：我为此证明。） 我们欠您一份情，RD；我们该如何报答您呢？好主意：也许我们可以从回答您的问题开始。好的，这里有一个脚本，它很可能返回计算机上USB2.0端口的数量。让我们先看代码，然后再解释我们说它“很可能”返回端口数量的原因： 复制代码 代码如下: strComputer="." i=0 SetobjWMIService=GetObject("winmgmts:\\"&strComputer&"\root\cimv2") SetcolControllers=objWMIService.ExecQuery_ ("Select*FromWin32_USBController") ForEachobjControllerincolControllers IfInstr(objController.Name,"Enhanced")Then i=i+1 EndIf Next Wscript.Echo"No.ofUSB2.0Ports:"&i 连接到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端口的数量。 它并不一定是万无一失的方法，但好像还管用。而且，您知道，这和您为我们做事还不一样。 哦，对了；我们忘记了一件事。嗯，您或许喜欢巧克力？ |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢! |
你可能对下面的文章感兴趣
关于用vbs确定计算机是否有 USB 2.0 端口的代码的所有评论
