Illegal Telnet Client

[Devil_Code]

Codice:

#include <EditConstants.au3>
#include <GUIConstantsEx.au3>
#include <WindowsConstants.au3>

TCPStartup ()

#Region ### START Koda GUI section ### Form=
$Form3 = GUICreate("illegal Telenet Client", 594, 501, 204, 154)
GUISetFont(10, 800, 0, "System")
GUISetBkColor(0x000000)
$Edit = GUICtrlCreateEdit("", 88, 24, 409, 353)
GUICtrlSetData(-1, "")
GUICtrlSetColor(-1, 0x008000)
$Input1 = GUICtrlCreateInput("", 88, 392, 409, 24)
GUICtrlSetColor(-1, 0x008000)
GUISetState(@SW_SHOW)
#EndRegion ### END Koda GUI section ###

$Host1 = InputBox ( "Illegal Telnet Client", "Inserire nome host a cui connettersi" )
$Port1 = InputBox ( "Illegal Telnet Client", "Inserire porta host" )

GUISetState ()
ControlSend ( "Illegal Telnet Client","", $Edit, "{TAB}")
$Host = TCPNameToIP ( $Host1 )
$Connessione = TCPConnect ( $Host, $Port1 )
If @error Then Exit

While 1
    $msg = GuiGetMsg()
    If $msg = $GUI_EVENT_CLOSE Then Exit
    $recv = TCPRecv ( $Connessione,2048 )
    If $recv <> "" Then
    $text = GUICtrlRead ( $Edit )
    GUICtrlSetData ( $Edit,$text & $recv )
    ControlSend ( "Illegal Telnet Client","", $Edit, "{ENTER}")
    EndIf

  
    If $msg = $Input Then
        $text = GUICtrlRead ( $Edit )
        $eingabe = GUICtrlRead ( $Input )
        GUICtrlSetData ( $Edit, $text & $eingabe )
        GUICtrlSetData ( $Input, "" )

        TCPSend ( $Connessione, $eingabe & Chr ( 10 ) )
        ControlSend ( "Illegal Telnet Client","", $Edit, "{ENTER}")

        If @error Then
            MsgBox (0,"","Errore")
            Exit
            EndIf
        EndIf
    WEnd

[ptrc_000]

Hai deciso di parlare in "codice" :?: :?: :?: :?:

[Devil_Code]

è un sorcio xD va compilato sisi

[ptrc_000]

:great: >>>>

[Fabianator]

ma una spiegazioncina al topic per favore... non so a cosa serva? :mrgreen:

[Devil_Code]

è un client telnet xD

[Tex]

Siamo di poche parole oggi!

[Admin]

Si fa il prezioso, non spreca parole...

[Tex]

ma... "è vero progresso quando è per tutti" o no? :acc: Si lo so che facendo una ricerca si capirebbe qualcosa ma resta il fatto che se compro un auto le ruote le trovo già e non devo andarle a comprare e montarle. Daltronde questo è un forum e non una caccia al tesoro.
Ue... senza offesa, è rivolto alla crescita del forum ed alla sua fruizione.
Se invece è un argomento "riservato" allora non dovrebbe essere presente sul forum ma da un'altra parte. :roll:

[Admin]

Hai ragione, a volte devil è un tantino enigmatico :mrgreen:

[Devil_Code]

be avete messo la sezione programmazione e questo va messo in conto,se no si toglie e non ci sono problemi visto che qui nessuno sa programmare XD tranne 2-3 persone

[CorradoSud]

Ad esempio, come fanno a sapere con cosa devono compilarlo?

è AutoIt, giusto?

[Devil_Code]

Ce scritto nel sottotitolo

[CorradoSud]

Vabbe ma se non l'ho letto io figurati gli utenti!!

[Fabianator]

io non so cosa sia AutoIT :?: un mensile di macchine che viene pubblicato solo in italia?

[CorradoSud]

:mrgreen: :mrgreen: :mrgreen:

[Admin]

http://www.autoitscript.com/autoit3/downloads.shtml

Ti permette di creare script etc...

[InsanuS]

è un linguaggio di programmazione fatto appositamente per interagire con i SO Windows (un C# modificato), è carino perchè ti permette anche di muovere mouse e/o tastiera con semplici comandi, quando giocavo a qualche browser game ne abusavo