Well, there is good news and there is bad news.

The good news is that you can control the app. The bad news is that I can't see how to get the text of the console.

Here is a basic working script, but you will probably be better off with the W3Socket collection that Bryce found.

Code:
Break ON
$=SetOption("Explicit","ON")
$=SetOption("WrapAtEOL","ON")
 
Global	$OBJECT		$OBJECT=9
Dim	$oAutoIT
Dim	$sRouterIP	$sRouterIP="open 172.20.40.48"
Dim	$sCommand
Dim	$sTitle		$sTitle="AutoTelnet"
Dim	$iPID
 
; Create AutoIT object
$oAutoIt = CreateObject("AutoItX3.Control")
If @ERROR OR VarType($oAutoIt)<>$OBJECT "ERROR: Could not create AutoIt instance"+@CRLF Exit @ERROR EndIf
 
; Set title matching to allow advanced directives
$=$oAutoIt.Opt("WinTitleMatchMode",4)
 
$sCommand="telnet.exe"
Run '"'+%COMSPEC%+'" /C START "'+$sTitle+'" '+$sCommand 
If @ERROR "ERROR: Could not start command"+@CRLF Exit @ERROR EndIf
 
; Wait for telnet window to appear...
If Not CInt($oAutoIt.WinWait($sTitle,"",10)) "ERROR: Telnet process took too long to appear."+@CRLF Exit 1 EndIf
sleep 1
$oAutoIt.Send("open "+$sRouterIP+"{ENTER}")