编写Vbs脚本程序

　　编写Close.vbs、Open.vbs两个Vbs脚本程序，分别实现自动登录S12508核心交换机，执行相关指令关闭与接通Internet的功能。其中，Close.vbs脚本程序内容如下：

　　rz1=".\log\"+cstr(year(date))+cstr(month(date))+cstr(day(date))+"_01.txt"

　　rz2=".\log\"+cstr(year(date))+cstr(month(date))+cstr(day(date))+"_02.txt"

　　set zxj=wscript.createObject("wscript.shell")

　　set fso=wscript.createobject("scripting.filesystemobject")

　　set ff=fso.opentextfile("except.txt",1)

　　rqnow=cstr(date)

　　do while not atendofstream=true

　　rqnr=ff.readline

　　if rqnow=rqnr or rqnr="end" then

　　if rqnr="end" then

　　bz="A"

　　else

　　bz="B"

　　end if

　　exit do

　　end if

　　loop

　　if bz="A" then

　　zxj.run "telnet 10.255.255.254"

　　wscript.sleep 1000

　　zxj.sendKeys "zxj{+}12508{ENTER}"

　　wscript.sleep 1000

　　zxj.sendKeys "sys{ENTER}"

　　wscript.sleep 1000

　　zxj.sendKeys "int b 4{ENTER}"

　　wscript.sleep 1000

　　zxj.sendKeys "undo port trunk permit vlan 501 to 700{ENTER}"

　　wscript.sleep 1000

　　zxj.sendKeys "quit{ENTER}"

　　wscript.sleep 1000

　　zxj.sendKeys "^z"

　　wscript.sleep 1000

　　zxj.sendKeys "quit{ENTER}"

　　wscript.sleep 1000

　　zxj.sendKeys "{ENTER}{ENTER}"

　　wscript.sleep 1000

　　end if

　　脚本程序说明：

　　1. 定义两个系统运行日志记录文件的变量rz1、rz2，程序运行后会在log文件夹下生成名如“yyyymd_01.txt、yyyymd_02.txt”的日志文件。

　　2.引用对象wscript.shell、filesystemobject并赋予变量zxj与fso；用fso对象以只读方式打开except.txt文件，并赋予变量ff。

　　3. 以文件指针变量atendofstream作循环条件，如果指针没有到达文件尾，则逐行循环读取except.txt中的日期文本行，并将其与当前日期进行比较。

　　4. 若except.txt中没有日期行与当前日期一致，即当前日期为工作日，则执行关闭网络指令；反之，执行开通网络指令。

　　5. 运行引用对象的run函数，telnet登录核心交换机，在校园网络出口链路接口Bridge-Aggregation 4上将学生公寓网络vlan501-vlan700执行过滤操作。

　　6. 用Sendkeys函数发送键盘按键字符到Win窗口，用sleep函数使程序暂停片刻，以便给指令执行留出足够时间。

　　7. 最后显示网络出口接口上放行的Vlan信息并将其存放入日志文件，以便于日后查看脚本程序运行的结果。

　　8. 脚本程序Open.vbs与Close.vbs两者内容几乎完全一样，主要差别仅仅是在出口链路接口执行vlan501--vlan700的过滤动作的不同，即非undo与undo，在此不再赘述。

　　建立Windows任务计划

　　将本程序所有文件拷贝到服务器，分别建立两个名称为“自动断网”、“自动通网”的任务计划。“自动断网”在每天0:00运行Close.vbs脚本程序，“自动通网”在每天5:30运行Open.vbs脚本程序。最后，特别说明一点，千万不要对服务器进行锁定屏幕操作。

　　至此，一个自动灵活精确的网络接入控制系统部署完毕，经过几个月的运行证实，这一方法是稳定可靠的。（由于版面限制，在不影响程序运行效果的情况下对文中脚本程序代码作了适当删减，如有需要完整程序者可向本文作者联系QQ:364877475）

　　（作者单位为重庆师范大学信息技术中心）