用vbs针对一个 IP 地址范围运行脚本
作者 佚名
来源 ASP编程
浏览
发布时间 2013-07-09
| 问： 嗨，ScriptingGuy！我想在一个子网中的所有计算机上运行脚本。有没有办法不必将所有IP地址都硬编码到脚本中就能完成这项任务呢？ --RB 答： 嗨，RB。根据您在电子邮件中的描述，看来您的设置类似于：您的子网的IP地址范围为192.168.1.1到192.168.1.254。您想创建一个脚本，可以先从第一个IP地址开始，在相应的计算机上运行某个代码，然后转到第二个地址，运行相同的代码，按地址顺序在每台计算机上都运行相同的脚本。此外，您想通过尽可能最少的代码行就能办到这一点，并且不必硬编码好几百个IP地址。 那么，有办法能做到吗？当然有，而且比您想象的还要简单。 首先，让我们向您介绍如何某个IP地址范围进行循环。这是一个示例代码，所以只用于回显每个IP地址的名称。在介绍了该脚本的工作原理后，我们将举一个更实际的例子： 复制代码 代码如下: OnErrorResumeNext intStartingAddress=1 intEndingAddress=254 strSubnet="192.168.1." Fori=intStartingAddresstointEndingAddress strComputer=strSubnet&i Wscript.EchostrComputer Next 不，真的，这就是整个脚本了。我们先指派了一些变量：将值“1”指派给intStartingAddress；将值“254”指派给intEndingAddress；并将值“192.168.1.”指派给strSubnet。（注意“1”后面的英文句号）。正如您可能猜到的，这些值将作为建立IP地址的构建块。 指派了这些变量之后，我们创建了一个For-Next循环，用以运行1(intStartingAddress)到254(intEndingAddress)的变量。为何要循环1到254呢？原因很简单：那是您的IP范围。如果IP范围是192.168.1.7到109.168.1.54，又该怎么办呢？没有问题：使用相同的循环，但要将intStartingAddress的值改为“7”，并将intEndingAddress的值改为“54”。 在此循环中，我们将字符串值192.168.1.与循环变量(i)的当前值相串联。在首次运行循环——当“i”等于“1”时，我们将192.168.1.和1相结合。您猜怎么样？我们得到了值192.168.1.1，恰好是第一个IP地址。最后一次运行循环时，我们将把192.168.1.和254相结合，从而得到最后一个IP地址的值——192.168.1.254。运行该脚本，将得到： 192.168.1.1 192.168.1.2 192.168.1.3 192.168.1.4 非常简单吧？ 当然，您可能对于回显一组IP地址不会多感兴趣；您想运行某种WMI代码。好的： OnErrorResumeNext intStartingAddress=1 intEndingAddress=254 strSubnet="192.168.1." Fori=intStartingAddresstointEndingAddress strComputer=strSubnet&i SetobjWMIService=GetObject_ ("winmgmts:\\"&strComputer&"\root\cimv2") SetcolItems=objWMIService.ExecQuery_ ("Select*FromWin32_OperatingSystem") ForEachobjIteminColItems Wscript.EchostrComputer&":"&objItem.Caption Next Next 正如您所看到的，我们再次把strComputer变量的值设为某个IP地址。然后连接到该地址所表示的计算机上的WMI服务。这很容易办到，因为WMI既可以使用计算机名，也可以使用IP地址连接到计算机。 现在，我们要加入一项小技巧。您在电子邮件中提到，想要排除几个IP地址（可能代表路由器或其他东西）。好的。这里有一个经过修改的脚本，其使用SelectCase语句来排除某些计算机： intEndingAddress=254 strSubnet="192.168.1." Fori=intStartingAddresstointEndingAddress SelectCasei Case10 Case50 Case100 CaseElse strComputer=strSubnet&i SetobjWMIService=GetObject_ ("winmgmts:\\"&strComputer&"\root\cimv2") SetcolItems=objWMIService.ExecQuery_ ("Select*FromWin32_OperatingSystem") ForEachobjIteminColItems Wscript.EchostrComputer&":"&objItem.Caption Next EndSelect Next 注意一下当“i”值等于10、50或100时，所发生的变化。没错：一点都没变化。如果计算机的IP地址为192.168.1.10、192.168.1.50或192.168.1.100，不会发生任何变化；不会运行任何WMI代码，脚本将照样执行循环。该WMI代码将仅在拥有其他IP地址（上面三个地址除外）的计算机上执行。这是一种用以在该脚本的WMI部分中排除特定IP地址的既简单又有效的办法。 |
凌众科技专业提供服务器租用、服务器托管、企业邮局、虚拟主机等服务，公司网站：http://www.lingzhong.cn 为了给广大客户了解更多的技术信息，本技术文章收集来源于网络,凌众科技尊重文章作者的版权，如果有涉及你的版权有必要删除你的文章，请和我们联系。以上信息与文章正文是不可分割的一部分,如果您要转载本文章,请保留以上信息，谢谢! |
你可能对下面的文章感兴趣
关于用vbs针对一个 IP 地址范围运行脚本的所有评论
