vb telnet 登录远程服务器

Set sh=WScript.CreateObject("WScript.Shell") 
sh.run"cmd"
WScript.Sleep 300 
sh.SendKeys "telnet 172.21.*.*"
WScript.Sleep 300 
sh.SendKeys "{ENTER}"
WScript.Sleep 300 
sh.SendKeys "{ENTER}"
WScript.Sleep 300 
sh.SendKeys "Administrator"
sh.SendKeys "{ENTER}"
WScript.Sleep 300 
sh.SendKeys "root"
sh.SendKeys "{ENTER}"
WScript.Sleep 300 
sh.SendKeys "python C:\Users\Administrator\Desktop\**.py"
sh.SendKeys "{ENTER}"