首页 用vbs针对一个IP地址范围运行脚本

用vbs针对一个IP地址范围运行脚本

举报
开通vip

用vbs针对一个IP地址范围运行脚本用vbs针对一个IP地址范围运行脚本 用vbs针对一个 IP 地址范围运行脚本 问: 嗨,Scripting Guy~我想在一个子网中的所有计算机上运行脚本。有没有办法不必将所有 IP 地址都硬编码到脚本中就能完成这项任务呢, -- RB 答: 嗨,RB。根据您在电子邮件中的描述,看来您的设置类似于:您的子网的 IP 地址范围为 192.168.1.1 到 192.168.1.254。您想创建一个脚本,可以先从第一个 IP 地址开始,在相应的计算机上运行某个代码,然后转到第二个地址,运行相同的代码,按地...

用vbs针对一个IP地址范围运行脚本
用vbs针对一个IP地址范围运行脚本 用vbs针对一个 IP 地址范围运行脚本 问: 嗨,Scripting Guy~我想在一个子网中的所有计算机上运行脚本。有没有办法不必将所有 IP 地址都硬编码到脚本中就能完成这项任务呢, -- RB 答: 嗨,RB。根据您在电子邮件中的描述,看来您的设置类似于:您的子网的 IP 地址范围为 192.168.1.1 到 192.168.1.254。您想创建一个脚本,可以先从第一个 IP 地址开始,在相应的计算机上运行某个代码,然后转到第二个地址,运行相同的代码,按地址顺序在每台计算机上都运行相同的脚本。此外,您想通过尽可能最少的代码行就能办到这一点,并且不必硬编码好几百个 IP 地址。 那么,有办法能做到吗,当然有,而且比您想象的还要简单。 首先,让我们向您介绍如何某个 IP 地址范围进行循环。这是一个示例代码,所以只用于回显每个 IP 地址的名称。在介绍了该脚本的工作原理后,我们将举一个更实际的例子: 复制代码 代码如下: On Error Resume Next intStartingAddress = 1 intEndingAddress = 254 strSubnet = "192.168.1." For i = intStartingAddress to intEndingAddress strComputer = strSubnet & i Wscript.Echo strComputer 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 代码。好的: On Error Resume Next intStartingAddress = 1 intEndingAddress = 254 strSubnet = "192.168.1." For i = intStartingAddress to intEndingAddress strComputer = strSubnet & i Set objWMIService = GetObject _ ("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery _ ("Select * From Win32_OperatingSystem") For Each objItem in ColItems Wscript.Echo strComputer & ": " & objItem.Caption Next Next 正如您所看到的,我们再次把 strComputer 变量的值设为某个 IP 地址。然后连接到该地址所表示的计算机上的 WMI 服务。这很容易办到,因为 WMI 既可以使用计算机名,也可以使用 IP 地址连接到计算机。 现在,我们要加入一项小技巧。您在电子邮件中提到,想要排除几个 IP 地址(可能代表路由器或其他东西)。好的。这里有一个经过修改的脚本,其使用 Select Case 语句来排除某些计算机: intEndingAddress = 254 strSubnet = "192.168.1." For i = intStartingAddress to intEndingAddress Select Case i Case 10 Case 50 Case 100 Case Else strComputer = strSubnet & i Set objWMIService = GetObject _ ("winmgmts:\\" & strComputer & "\root\cimv2") Set colItems = objWMIService.ExecQuery _ ("Select * From Win32_OperatingSystem") For Each objItem in ColItems Wscript.Echo strComputer & ": " & objItem.Caption Next End Select Next 注意一下当“i”值等于 10、50 或 100 时,所发生的变化。没错:一点都没变化。如果计算机的 IP 地址为 192.168.1.10、192.168.1.50 或 192.168.1.100,不会发生任何变化;不会运行任何 WMI 代码,脚本将照样执行循环。该 WMI 代码将仅在拥有其他 IP 地址(上面三个地址除外)的计算机上执行。这是一种用以在该脚本的 WMI 部分中排除特定 IP 地址的既简单又有效的办法。
本文档为【用vbs针对一个IP地址范围运行脚本】,请使用软件OFFICE或WPS软件打开。作品中的文字与图均可以修改和编辑, 图片更改请在作品中右键图片并更换,文字修改请直接点击文字进行修改,也可以新增和删除文档中的内容。
该文档来自用户分享,如有侵权行为请发邮件ishare@vip.sina.com联系网站客服,我们会及时删除。
[版权声明] 本站所有资料为用户分享产生,若发现您的权利被侵害,请联系客服邮件isharekefu@iask.cn,我们尽快处理。
本作品所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用。
网站提供的党政主题相关内容(国旗、国徽、党徽..)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。
下载需要: 免费 已有0 人下载
最新资料
资料动态
专题动态
is_601191
暂无简介~
格式:doc
大小:16KB
软件:Word
页数:0
分类:生活休闲
上传时间:2017-09-30
浏览量:21