保存为.vbs试试,未测试,不保证一定有用- Dim Wsh
- Set Wsh = CreateObject("WScript.Shell")
- Wsh.Run "telnet 192.168.18.254"
- WScript.Sleep 1000
- Wsh.SendKeys "{ENTER}"
- WScript.Sleep 3000
- Wsh.SendKeys "y{ENTER}"
- WScript.Sleep 2000
- Wsh.SendKeys "treebear{ENTER}"
- WScript.Sleep 2000
- Wsh.SendKeys "admin123{ENTER}"
- WScript.Sleep 2000
- Wsh.SendKeys "protest --pid -w 15{ENTER}"
- WScript.Sleep 3000
- Wsh.SendKeys "protest --bid -w 1{ENTER}"
- WScript.Sleep 3000
- Wsh.SendKeys "protest --hdver -w 0{ENTER}"
- WScript.Sleep 3000
复制代码
|