SecureCrt的脚本循环小问题解决

简单-----复杂-----简单

简单：为了每日运行设备状态查询，用securecrt做了个脚本。刚开始很简单，直接拿以前的脚本过来小小修改下就搞定了。

复杂：上机一运行发现不对。配着superII引擎的6513对脚本反应不过来啊。循环无法运行我用的vbs。
#$language = "VBScript"
#$interface = "1.0"
Sub main
' turn on synchronous mode so we don't miss any data
crt.Screen.Synchronous = True
crt.session.Connect("/telnet 10.0.0.1")
crt.Screen.WaitForString "BJ_S1> (enable)"
crt.Screen.Send "show spantree 31 " & VbCr
Do while (crt.Screen.WaitForString("--More--",1)<>False)
crt.Screen.Send " "
Loop
crt.Screen.Send "show spantree 32" & VbCr
Do while (crt.Screen.WaitForString("--More--",1)<>False)
crt.Screen.Send " "
Loop
..........
其中的循环无法正确运行。这可咋整啊。折腾了2天。也没个头绪。我也不想找人问，有问题喜欢自己解决，再说问的话大家都是玩硬件了。脚本都不会啊。也说不清楚。后来没办法了。用空格解决这个--more--的问题了。不用循环了。直接在后面的show前面加了N多空格。原始的办法有时也很有效。终于通过了。。。

简单：隔了一天没管他，脑子清醒了一下，偶尔一看发现了原来("--More--",1)的这个1，难道他是代表反应时间，于是试探着改了一下。唉。还真是。！改成3.一切ok！

搞网络的去写脚本。罪过罪过。本文出自 “云开明月见 风起碧波潮” 博客，请务必保留此出处http://simonzh.blog.51cto.com/485977/109379