在SecureCRT中使用VBScript

前两天不小心看到了一个小的脚本,大概类似下面这样的形式:

# $language = "VBScript"
# $interface = "1.0"
'本脚本示范：自动登录到某台3550交换机设备，自动输入远程登录密码，同时自动进入特权模式
'自动输入特权密码，同时运行show version命令
Sub Main
  crt.Screen.Synchronous = True
  '通过telnet连接到192.168.1.1
  crt.Session.Connect "/TELNET 192.168.1.1"
  crt.Screen.WaitForString "Password:"
  crt.Screen.Send "cisco" & vbCr
  crt.Screen.waitForString ">"
  crt.Screen.Send "enable" & vbcr
  crt.Screen.WaitForString "Password:"
  crt.Screen.Send "cisco" & vbcr
  crt.Screen.waitForString "#"
  crt.Screen.Send "show version" & vbcr
  crt.Screen.waitForString "--More--"
  crt.Screen.Send " "
  crt.Screen.Synchronous = False
End Sub

因为有这个crt对象,我还不太清楚这个对象的作用是什么.怀着好奇,在网上查了一下,才发现原来这个脚本是在SecureCRT中使用.在这个软件的帮助文档中有具体的脚本的介绍以及一些语法.看了一下,非常方便.自己根据示例写了一个demo,大概明白是怎么回事了.虽然我不太常用这个工具,但是有时候也不得不用--因为公司里面在用它.如果通过写一些常用功能的脚本的话,就再方便不过的了.这样一下,就可以通过这个工具来做一些常用的功能的批处理实现.