新浪博客

SecureCrt中vbscrip学习笔记1(用VBS备份配置)

2014-08-15 13:59阅读:
  作为网络工程师,SecureCrt是最常用的工具,而SecureCrt支持VBscript,使它变得非常强大,最近开始学习,尝试用VBS编一个自动备份设备配置的小程序。
先开启FTP server(10.127.30.74),再打开SecureCrt,运行下面的代码:
'用于自动备份思科配置
crt.Screen.Synchronous = True
Sub main
dim host(100) '定义一个数组
host(0)='10.127.10.10' '每行定义一个要备份的设备IP,有多少台设备,就写几行
host(1)='10.127.10.11'
host(2)='10.127.10.12'
host(3)='10.127.10.13'
host(4)='10.127.10.14'
For Each ip in host
If ip='' Then exit for
If crt.Session.Connected Then crt.Session.Disconnect
crt.Session.Connect ' /Telnet ' & ip 'ip即host值
crt.Screen.WaitForString 'Username: '
crt.Screen.Send 'xxx' & chr(13)
br> 'xxx是用户名,本例中所有设备的用户名和密码都一样
crt.Screen.WaitForString 'Password: '
crt.Screen.Send 'xxx' & chr(13) 'xxx是密码
crt.Screen.WaitForString '#'
crt.Screen.Send 'copy running-config ftp' & chr(13)
crt.Screen.WaitForString 'Address or name of remote host []?'
crt.Screen.Send '10.127.30.74'& chr(13) '请根据实际FTP地址更改
crt.Screen.WaitForString '? '
crt.Screen.Send chr(13)
crt.Screen.WaitForString '#'
crt.Screen.Send 'q' & chr(13)
Next
end sub

我的更多文章

下载客户端阅读体验更佳

APP专享