注册 登录  
 加关注
   显示下一条  |  关闭
温馨提示!由于新浪微博认证机制调整,您的新浪微博帐号绑定已过期,请重新绑定!立即重新绑定新浪微博》  |  关闭

曾国藩的博客

 
 
 

日志

 
 

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

2015-11-19 16:14:17|  分类: 脚本/跳板/效率/ |  标签: |举报 |字号 订阅

  下载LOFTER 我的照片书  |
http://blog.sina.com.cn/s/blog_591d672d0102v30x.html
作为网络工程师,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)              '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
  评论这张
 
阅读(152)| 评论(0)
推荐 转载

历史上的今天

在LOFTER的更多文章

评论

<#--最新日志,群博日志--> <#--推荐日志--> <#--引用记录--> <#--博主推荐--> <#--随机阅读--> <#--首页推荐--> <#--历史上的今天--> <#--被推荐日志--> <#--上一篇,下一篇--> <#-- 热度 --> <#-- 网易新闻广告 --> <#--右边模块结构--> <#--评论模块结构--> <#--引用模块结构--> <#--博主发起的投票-->
 
 
 
 
 
 
 
 
 
 
 
 
 
 

页脚

网易公司版权所有 ©1997-2018