#$language = "VBScript" #$interface = "1.0" crt.Screen.Synchronous = True ' This automatically generated script may need to be ' edited in order to work correctly. Sub Main Dim i crt.Screen.Send "reboot "& chr(13) for i =0 to 50 crt.Screen.Send "d" crt.Sleep 10 next crt.Screen.Send ""&chr(13) crt.Screen.WaitForString "[root /]# " crt.Sleep 10 crt.Screen.Send "image "& chr(13) crt.Screen.WaitForString "[image /]#" crt.Screen.Send "download 0"& chr(13) crt.Sleep 500 crt.screen.sendkeys "Y" 'crt.Sleep 1000 crt.Screen.WaitForString "Start XMODEM download by CRC mode ..." crt.Screen.WaitForString "CC" 'crt.screen.SendSpecial("MENU_SEND_XMODEM") End Sub
[security CRT] VB实现自动下载脚本
猜你喜欢
转载自www.cnblogs.com/seastarsun/p/9079270.html
今日推荐
周排行