1、编写脚本要添加头文件 #$Language=“VBScript“#$Interface=“1.0“脚本里面如果有主函数 main（）的话，就会从主函数开始执行，但是不是所有语句必须要求放在主函数里面。例如主函数外部的初始化变量语句。Exit Sub 对出脚本的执行。脚本使用的几个步骤1) Connect to the remote machine.（telnet到目标板）2) Start script recording.（开始录制脚本）（录制脚本用完整的敲入命令为好，不使用自动补齐，例如tab键等）3) Perform commands to be recorded.（手动在telnet中敲
2、入命令）4) Stop script recording.（停止录制脚本）5) Specify a filename in which to save the recorded script code.（保存录制好的脚本）6) Review and edit the recorded script file.（查看和编辑脚本）常用 ASCII字符，A SCII 值 为 8、 9、 10 和 13 分 别 转 换 为 退 格 、 制 表 、 换 行 和 回 车 字 符一个很好的例子（包括变量声明、循环、判断、输入输出）作为维护 CE设备的一个普通工程师，可能会有同样的问题困惑着我们如何对众多的C
3、E设备进行有效的巡检和维护管理？SecureCRT 给我们提供了很好的平台脚本工具制作和运行。下面就 SecureCRT工具常用到的几个函数阐述如下：在 SecureCRT里，用得最多的应该就是 crt.Screen，基本上很多操作都是基于屏幕的返回字来决定下一步该作何操作：第一：crt.Screen.WaitForString(“KeyString“,timewaiting)该函数是单字符串判断，KeyString 是需要查找的关键字，timewaiting 是一个超时阀值，例如：crt.Screen.WaitForString(“people:“,5)该行代码的意思就是在 5秒内没有检测到
4、people:出现，就执行下一条语句，如果改成：crt.Screen.WaitForString(“people:“)那就是指直到 people:出现才执行下一行代码。WaitForString是有返回值的，返回值是 True 或者 False。因此，可以根据返回值进行条件判断以确定一下条代码。例如：If (crt.Screen.WaitForString (“current state : UP“,1)False) End Function 退出设备子函数 Function ExitDevice If ResultOfType = 1 Then ElseIf ResultOfType = 2
5、 Then screen.Send “ “,1)False) Else End If End Function Function ShowAll Do while (screen.WaitForStrings(“More“,“more“,3) False Then MsgBox “The command you are importing exists risk!“ Do Loop End If End Function Sub Main crt.Screen.Synchronous = True LandIPNET For DeviceNumth=LBound(Device) To UBou
6、nd(Device) LandDevice CommandNumth=0 For CommandNumth = LBound(TypeOfCommand) To UBound(TypeOfCommand) screen.Send “ “&TypeOfCommand(CommandNumth) RiskCommands screen.Send “ & chr(13) ShowAll If screen.WaitForString(“More“,1)False Then ShowAll crt.Sleep 4000 screen.Send “ & chr(13) Next ExitDevice Next crt.Screen.Synchronous = False End Sub
