欢迎来到天天文库
浏览记录
ID:9743897
大小:61.50 KB
页数:7页
时间:2018-05-07
《使用脚本管理windows网络》由会员上传分享,免费在线阅读,更多相关内容在应用文档-天天文库。
1、使用脚本管理Windows网络~教育资源库 本篇文章的目的是编写一个改变分配给你的网络适配器的IP地址的简单的脚本。下面是我们的第一个脚本。我们把这个脚本称作ChangeIPAddress.vbs:以下是引用片段: strputer=. arrIPAddress=Array(172.16.11.99) arrSubMask=Array(255.255.255.0) SetobjIService=GetObject(gmts:strputerootcimv2) SetcolNetAdapters=objIS
2、ervice.ExecQuery(Select*fromicrosoft(R)icrosoftVBScriptruntimeerror:Variableisundefined:'strputer' VBScript在这里说的(而不是IService DimobjNetAdapter Dimstrputer DimarrIPAddress DimarrSubMask DimcolNetAdapters DimerrEnableStatic strputer=. arrIPAddress
3、=Array(172.16.11.93) arrSubMask=Array(255.255.255.0) SetobjIService=GetObject(gmts:strputerootcimv2) SetcolNetAdapters=objIService.ExecQuery(Select*fromWin32_Netask) Next 注意,当你使用OptionExplicit语句时,你必须宣布你的脚本中的全部变量,包括对象、字符串、阵列、集合、错误代码变量等等。这看起来似乎很费劲,但是,请相信我,如果
4、你的脚本有几页长,这样做可以节省诊断运行时间错误的时间。还要注意的是,你宣布变量的次序没有关系,只要保证在使用变量之前宣布这个变量就可以。最好是像我们上面做的那样,把所有的变量作为一个单独的段落放在脚本的最前面。 错误处理 现在我们已经从我们的脚本中删除了拼写错误(希望如此)。当我们运行修改后脚本时,脚本发挥作用了。但是,如果还是1234下一页友情提醒:,特别!不好用,怎么办?例如,如果我们修改了脚本要在远程计算机上运行,而不是在本地计算机上运行(我在未来的文章中将说明如何做),但是,远程计算机没有在网络上,我们
5、还怎么办?再说一次,运行时间错误出现并且脚本停止运行并显示类似于我们在上面显示的错误信息,这当然是一件好事。但是,如果我们编写一个要实施许多活动的脚本该怎么办?在这种情况下,我们可能不需要一个运行时间错误来终止脚本运行,我们可能需要这个脚本继续运行,这样,这个脚本至少可以完成它要完成的其它任务。一个好的例子是一个监视许多台计算机的设置但是并不修改这些设置的脚本。在这种情况下,即使有一台或者更多的计算机不存在,你也要这个脚本继续运行。 处理运行时间错误的最简单的方法是当它们出现的时候忽略它们。你可以在你的脚本的开头附
6、近增加下列语句告诉VBScript做这个事情:以下是引用片段: OnErrorResumeNext 增加这个语句的最佳位置是在OptionExplicit后面。那么,我们的脚本就这样做吧。当然,关于错误处理你还有时间做更多的事情。例如,你要检查在你的脚本的某些点上是否存在运行时间错误的状况(如在设法连接到远程计算机的I服务之后)。这样,你就可以验证脚本要执行的某些行动是否成功地执行了。然后,根据这个错误状况的测试结果,你可以决定这个脚本应该做什么。例如,如果发生一个错误,你可以反馈一个X计算机没有找到的信息,然后
7、继续执行脚本。我们在这个系列讲座的以后的文章中将详细介绍错误处理问题。但是,现在,我们仅增加上述语句,说明忽略出现的任何运行时间错误。 用户输入 当我们要运行这个脚本指定IP地址而不是把IP地址在我们的脚本中硬性指定为172.16.11.99的时候,我们要为这台机器指定新的IP地址该如何做?在这种情况下,我们要做的事情是修改这个脚本,当我们运行这个脚本的时候,能够让我们提供用户输入。这样做的好方法是当我们从命令行运行这个脚本的时候,我们是否能够提供参数。例如,输入ChangeIPAddress.vbs172.16
8、.11.188应该能把我们网络适配器的IP地址改为172.16.11.188等等。下面是如何修改我们的脚本。我们可以这样做:以下是引用片段: OptionExplicit OnErrorResumeNext DimobjIService DimobjNetAdapter Dimstrputer DimstrAddress Dima
此文档下载收益归作者所有