윈도우 telnet 자동 로그인

윈도우에서 telnet 자동 접속 후 명령어 실행하는 프로그램입니다.

확장자는 .vbs 로 합니다.

사용법

1. C:\oneIP.txt 파일을 만들고 한줄씩 접속할  아이피를 넣어준다.

2.아래 소스를 아무이름으로 .vbs 확장자로 만든다.

ex)telnet_auto.vbs

3. 실행한다.

ps. 접속 후 실행할 명령은 알아서 넣기.

set WshShell = WScript.CreateObject("WScript.Shell")Const ForReading = 1Const ForWriting = 2Const ForAppending = 8Const ipListFile = "C:\oneIP.txt"Set Shell = CreateObject("WScript.Shell")Set FSO = CreateObject("Scripting.FileSystemObject")If FSO.FileExists(ipListFile) Then	Set SwitchIP = FSO.opentextfile(ipListFile, ForReading, False)Else    Wscript.Echo "This file (" + ipListFile + ") does not exist."	Wscript.QuitEnd IfDim userIdDim userPwuserId = "yourid"userPw = "yourpass"WScript.Echo "Don't touch Anything!!"While Not SwitchIP.atEndOfStreamIP = SwitchIP.Readline()  WshShell.Run "cmd"  WScript.Sleep 100  WshShell.AppActivate "C:\Windows\system32\cmd.exe"  WScript.Sleep 100  rem telnet [address] [port]  WshShell.SendKeys "telnet " + IP + " 23{ENTER}"  WScript.Sleep 2000  rem [id]  WshShell.SendKeys userId + "{ENTER}"  WScript.Sleep 2000  rem [pwd]  WshShell.SendKeys userPw + "{ENTER}"  WScript.Sleep 1000  rem [command what you want]  WshShell.SendKeys "show ver{ENTER}"  WshShell.SendKeys "{ENTER}"  WScript.Sleep 2000  WshShell.SendKeys "exit{ENTER}"WendWScript.Sleep 2000WScript.Echo "Completed."