vbs自动登录telnet并发送指定命令

' Open Telnet and connect to 82.101.68.207 set WshShell = WScript.CreateObject("WScript.Shell") WshShell.run("telnet.exe 172.16.10.175") ' Wait 1000 ms,时间可以稍微长一些 WScript.Sleep 1000 ' "Press" Enter WshShell.SendKeys("{Enter}") ' Wait 5000 ms,时间可以稍微长一些 WScript.Sleep 5000 ' "Type" user name WshShell.SendKeys"user name" ' "Press" Enter WshShell.SendKeys("{Enter}") ' Wait 5000 ms,时间可以稍微长一些 WScript.Sleep 5000 ' "Type" Password WshShell.SendKeys"Password" ' "Press" Enter WshShell.SendKeys("{Enter}") ' Wait 5000 ms,时间可以稍微长一些 WScript.Sleep 5000 '下面输入命令 WshShell.SendKeys "command" ' "Press" Enter WshShell.SendKeys("{Enter}")