Chinaunix

标题: vbs脚本secure CRT自动备份文件名出错求助 [打印本页]

作者: ipv6ok_cu 时间: 2009-11-16 14:15
标题: vbs脚本secure CRT自动备份文件名出错求助
我在做测试，想在跳板机R1上，telnet二台设备R2 R3；
其中R2的IP 192.168.40.2 R3 192.168.40.3
写好脚本后发现，在保存配置的时候，R3的存到R2去了，R2存到R3上面了。完成倒了过来。搞不懂是什么原因引引起的;

脚本源码：

# $language = "VBScript"
# $interface = "1.0"

Sub main

dim a(3)
a(1)="192.168.40.2"
a(2)="192.168.40.3"
dim b(3)
b(1)="R2"
b(2)="R3"
dim i
for i=1 to 2
crt.Screen.Synchronous = True
crt.screen.Send VbCr
crt.screen.Send VbCr
crt.Screen.WaitForString "R1#"
crt.screen.Send "telnet " &a(i) & VbCr
crt.Screen.WaitForString "Username:"
crt.screen.Send "admin" & VbCr
crt.Screen.WaitForString "Password:"
crt.screen.Send "cisco" & VbCr
crt.Screen.Send "terminal length 0" & VbCr
crt.Screen.WaitForString (b(i)+"#")
crt.Session.Log True
crt.sleep 1000
crt.Session.LogFileName =b(i)+".log"
crt.screen.Send "show run" & VbCr
crt.sleep 1000
crt.screen.Send "show ver" & VbCr
crt.sleep 1000
crt.screen.Send "quit" & VbCr
crt.Screen.WaitForString "R1#"
crt.Session.Log false

next

End sub

作者: emperor 时间: 2009-11-16 14:35
脚本太烂
换Tab登录。。。。

作者: ipv6ok_cu 时间: 2009-11-16 15:25
二楼不可不谓之强大。答非所问。

作者: emperor 时间: 2009-11-17 14:32
强大啊？
如果机器太多用xml
两台破机器，要设6个变量，然后还用个烂循环
是想绕晕电脑还是想绕自己啊？
这样的脚本够不够烂？！
这个脚本根本不用写，直接recode足以解决

。。。。。。。

欢迎光临 Chinaunix (http://bbs.chinaunix.net/)