‘建立Shell对象
set sh=WScript.CreateObject("WScript.Shell")
WScript.Sleep 1000
‘启动telnet,注意要保证telnet.exe程序所在的路径如c:\winnt\system32在path环境变量中
sh.Run "telnet.exe"
WScript.Sleep 1000
‘向telnet发送我们平时录入的命令
sh.SendKeys "open 192.168.10.120"
WScript.Sleep 1000
sh.SendKeys "{ENTER}"
WScript.Sleep 1000
sh.SendKeys "n{ENTER}"
sh.SendKeys "{ENTER}"
WScript.Sleep 1000
‘发送登陆用户User
sh.SendKeys "administrator{ENTER}"
WScript.Sleep 1000
‘发送登陆密码pass
sh.SendKeys "joyinter.com{ENTER}"
WScript.Sleep 1000
‘运行相关命令pwd
sh.SendKeys "cd liuxue{ENTER}"
‘运行退出TELNET登陆命令
sh.SendKeys "mkdir 123{ENTER}"
sh.SendKeys "echo quit>>12.txt{ENTER}"
sh.SendKeys "quit{ENTER}"
如果你觉得好,请大家到公众号给个红心支持一下!!
密码早改过了~~~~~
Very true! Makes a chgane to see someone spell it out like that. 🙂