bat自动执行telnet

时间：2023-03-09 01:48:34
bat自动执行telnet 
@del c:\temp.vbs

@echo on error resume next >>c:\temp.vbs

@echo dim WshShell>>c:\temp.vbs

@echo Set WshShell = WScript.CreateObject("WScript.Shell")>>c:\temp.vbs

@echo WshShell.run"cmd">>c:\temp.vbs

@echo WshShell.AppActivate"c:\windows\system32\cmd.exe">>c:\temp.vbs

@echo WScript.Sleep 200>>c:\temp.vbs

@echo WshShell.SendKeys"telnet 192.168.1.2">>c:\temp.vbs

@echo WshShell.SendKeys"{ENTER}">>c:\temp.vbs

@echo WScript.Sleep 100>>c:\temp.vbs

@echo WshShell.AppActivate"telnet.exe ">>c:\temp.vbs

@echo WScript.Sleep 2000>>c:\temp.vbs

@echo WshShell.SendKeys"username">>c:\temp.vbs

@echo WshShell.SendKeys"{ENTER}">>c:\temp.vbs

@echo WScript.Sleep 2000>>c:\temp.vbs

@echo WshShell.SendKeys"password">>c:\temp.vbs

@echo WshShell.SendKeys"{ENTER}">>c:\temp.vbs

@echo WScript.Sleep 2000>>c:\temp.vbs

@echo WshShell.SendKeys"ping 192.168.0.1">>c:\temp.vbs

@echo WshShell.SendKeys"{ENTER}">>c:\temp.vbs

@echo WScript.Sleep 1000>>c:\temp.vbs

@echo WshShell.SendKeys"ping 192.168.0.2">>c:\temp.vbs

@echo WshShell.SendKeys"{ENTER}">>c:\temp.vbs

@echo WScript.Sleep 1000>>c:\temp.vbs

@call c:\temp.vbs

　　

相关文章