资源描述：
《使用SecureCRT登录路由器.doc》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。
1、看到这个题目，想必大家一定觉得很无聊，但如果你看完了，一定会惊呼SecureCRT功能的强大。大家以前可能大部分都是用Windows自代的Telnet程序或是通过Putty来连接Dynamips虚拟的路由器，但Telnet功能太单一，复制粘贴也不方便，我一开始就不用它，除非是该机器上没有其它程序。Putty呢，功能不少，程序也不大，还是一个绿色单一文件，确实很好，但是，如果你想登录多个网络设备，就要开多个Window窗口，弄得系统任务栏上都是putty的窗口，虽然WinXP可以对任务分组，但要找登录到某一设备的任务还是比较麻烦的。讲到这里，大家肯定马上就想到
2、了SeucreCRT，不错，是这个软件。下面就详细说说。SecureCRT的功能确实强大，强大到哪里，一般的功能就不说了，单纯支持JS或VBS脚本，就非常了不得，当然，在这里我还要提一下它的标签（TAB）功能。也就是说，给一个任务，不是新开一个Windows窗口，而是新建立一个标签（就象IE和Maxthon的区别一样）。此外，SecureCRT除了传统的图形化界面之处，还支持命令行参数功能，就是这一项和VBS脚本结合，才实现我要说的主题。在Dynagen的命令行输入telnetR1（当然R1这个设备得存在），是开启windows的Telnet还是Putty或
3、是SecureCRT，是由一个配置文件dynagen.ini决定的，这个文件存在于dynagen安装好的目录中（当然，绿色版本另当别论，自己找一找吧），用文本文件编辑器打开，找到这些行：#telnet=starttelnet%h%p#telnet=startputty.exe-telnet%h%ptelnet=startsecureCRT.exe/T/telnet%h%p注：#是注释的意思如果想用Win自己带的Telnet，用第一行，如果想用putty，用第二行（要确保putty在系统路径中），想用SecureCRT，就用第三行（我就是这么用的）。这里需要说
4、明一下参数的意思：secureCRT.exe就是安装好SecureCRT后的可执行程序，当然，你要确保它在系统路径中（什么意思？晕，把你安装好的路径，如：C:ProgramFilesSecureCRT，追加到系统的path变量上，方法很多，这里超出范围，不再赘述）。/T是一个secureCRT的参数，意思是新开一个标签，注意，这个参数只有SecureCRT5.2及以后版本才有，其它版本没有。/telnet的意思是走Telnet协议，%h是要telnet到的主机，%是要telnet的主机的端口。做到这里，你只能在Dynagen的命令行输入telnetR1时
5、，开启SecureCRT或是新开一个标签来连接R1,些时，每个设备的标签都是相同的，这就没有意义了，想要找某个设备，还是比较困难，怎么办？我找遍了SecureCRT的命令参考，也没有找到好办法，后来觉得还是用VBS比较好。下面是一个脚本，主要是用来解决每个设备一个标签名字的问题，顺便解决了连接路由器需要敲无数回车或是输入“No”等一系列我认为必须设备的路由器命令。下面先看一下，再做解释（文件名为DyCRT.vbs，当然，你也可以自己命名）：#$language="VBScript"#$interface="1.0"OptionExplicitFunction
6、mysubstring(srcString,bChar,eChar)DimfIndex,sIndexfIndex=InStr(srcString,bChar)sIndex=InStrRev(srcString,eChar)mysubstring=Mid(srcString,fIndex+1,sIndex-fIndex-1)EndFunction'用来得到一个时间字符串，该字符串用来设置路由器的时间和日期FunctionciscoDate()dimem,y,m,d,hDimnowDatenowDate=Now()em=Array("January","Febr
7、uary","March","April","May","June","July","August","September","October","November","December")y=Year(nowDate)m=em(Month(nowDate)-1)d=Day(nowDate)h=Time()ciscoDate=h&""&m&""&d&""&yEndFunctionSubmainOnErrorResumeNextcrt.Screen.Synchronous=Truecrt.Screen.WaitForString"Consoleport"crt
8、.Screen.SendVbCr'得到第一行显示文本
