vbs腳本在securecrt的應(yīng)用

1、vbs腳本在secureCRT的應(yīng)用（設(shè)備升級(jí)篇）最近在給中興的EPON的ONU設(shè)備升級(jí)，有113臺(tái)設(shè)備，沒(méi)有連接OLT，主管說(shuō)讓我安裝設(shè)備之前最好先升級(jí)好，以免舊版本的BUG會(huì)引起客戶的不滿。于是我用TFTP方式按照TXT腳本復(fù)制給ONU升級(jí)，升級(jí)完后，我發(fā)現(xiàn)工作效率極低，因?yàn)镺NU有響應(yīng)時(shí)間，如果用腳本復(fù)制進(jìn)去執(zhí)行的話，會(huì)導(dǎo)致缺損命令，導(dǎo)致多行命令無(wú)法一次執(zhí)行完，必須一條條粘上去，極度影響了工作效率，大概花了一個(gè)下午的時(shí)間只升級(jí)了7

2、臺(tái)設(shè)備，這樣的工作效率我是無(wú)法忍受的。之前看到過(guò)secureCRT支持vbs腳本，但是由于我的編程學(xué)的非常差，只能暫時(shí)靠secureCRT的錄制腳本功能，暫時(shí)解決升級(jí)問(wèn)題，但是過(guò)程中有很多問(wèn)題，比如每臺(tái)ONU的mac地址不同，所以完全按照錄制腳本是不行的，必須自己修改。最后我完成了無(wú)數(shù)次的實(shí)驗(yàn)，解決了很多bug，現(xiàn)在的vbs腳本，基本上能夠滿足我TFTP升級(jí)ONU的工作效率，大概用了四五天的時(shí)間，就把113臺(tái)設(shè)備升級(jí)完畢了。過(guò)程只需要插

3、入電源，開(kāi)啟secureCRT的連接，最后彈出對(duì)話框表示結(jié)束，整個(gè)升級(jí)工作完成，最后把ONU和兩個(gè)PON的mac地址和編號(hào)對(duì)應(yīng)，就行了。以下是TFTP升級(jí)代碼（之前已經(jīng)在secureCRT上設(shè)置了初始回車(chē)鍵進(jìn)入升級(jí)模式）4344454647484950515253545556575859606162636465666768697071727374757677787980818283848586crt.Screen.Send“en“chr

4、(13)crt.Screen.Send“admin“chr(13)crt.sleep1000crt.Screen.WaitFString“ZXAN#“crt.Screen.Send“config“chr(13)crt.Screen.WaitFString“ZXAN(config)#“crt.Screen.Send“serialattribbasiccom_031RS485baud1200parityevendata8stop1“chr(

5、13)crt.Screen.WaitFString“ZXAN(config)#“crt.sleep1000crt.Screen.Send“serialattribbasiccom_032RS485baud1200parityevendata8stop1“chr(13)crt.Screen.WaitFString“ZXAN(config)#“crt.sleep1000crt.Screen.Send“serialattribbasiccom

6、_033RS485baud1200parityevendata8stop1“chr(13)crt.Screen.WaitFString“ZXAN(config)#“crt.sleep1000crt.Screen.Send“serialattribbasiccom_034RS485baud1200parityevendata8stop1“chr(13)crt.Screen.WaitFString“ZXAN(config)#“crt.sle

7、ep1000crt.Screen.Send“exit“chr(13)crt.Screen.WaitFString“ZXAN#“crt.Screen.Send“write“chr(13)crt.Screen.WaitFString“ZXAN#“crt.Screen.Send“showver“chr(13)crt.Screen.WaitFString“ZXAN#“crt.Screen.Send“showrun“chr(13)crt.slee

8、p1000crt.Screen.Sendchr(13)crt.Screen.WaitFString“ZXAN#“crt.Screen.Send“showmacsys“chr(13)crt.Screen.WaitFString“ZXAN#“crt.Screen.Send“write“chr(13)crt.Screen.Sendchr(13)crt.Dialog.MessageBox“恭喜！固件升級(jí)成功！點(diǎn)擊【確定】自動(dòng)斷開(kāi)會(huì)話！“crt.