telnet commands

[JackDinn]

hi,

im trying to think of the best way to send a handful of command in telnet :-

telnet 192.168.1.254

SuperUser

password

ppp ifdetach intf = O2_ADSL

ppp ifattach intf = O2_ADSL

exit

iv never had to do more that one CMD command at a time so im not sure of the best way, i would also like to be able to see the cmd window to begin with but be able to hide it after its working properly.

cheers.

[jvanegmond]

There's plenty of examples and questions (+answers) on the forum. Go ahead and browse through some existing solutions. Orient yourself.

[JackDinn]

yep there's plenty of people asking similar questions and they all have different answers, iv tried loads now but its over my head i had searched before asking but i was stumped then & i still am.

best i can do is

run(@ComSpec & " /c" & "telnet 192.168.1.254","")
WinWait('Telnet 192.168.1.254')
WinActivate("Telnet 192.168.1.254")
send ("SuperUser{ENTER}")
sleep(1000)
WinActivate("Telnet 192.168.1.254")
send ("password{ENTER}")
sleep(1000)
WinActivate("Telnet 192.168.1.254")
send ("ppp ifdetach intf = O2_ADSL{ENTER}")
sleep(5000)
WinActivate("Telnet 192.168.1.254")
send ("ppp ifattach intf = O2_ADSL{ENTER}")
sleep(1000)
WinActivate("Telnet 192.168.1.254")
send ("q{ENTER}")
WinClose("Telnet 192.168.1.254")
Exit

a really bad method as it shows the command window and if someone clicks anything else it has a good chance of sending the keys to the wrong place.

also tried to make a batch file with a separate command file "infile.txt"

telnet 192.168.1.254 < infile.txt

but again although the net says it should work, but it dont.

tried this to

TCPStartup() 
$Socket = TCPConnect("192.168.1.254", 23)
TCPSend($Socket, "SuperUser")
TCPSend($Socket, "password");etc

but no go.

But im still searching.

Edited November 16, 2009 by JackDinn