TCPSend Problem

  • Ich weißnichtmehr weiter, das tut sich überhaupt nichts:

    [autoit]


    Func Example()

    $ip = InputBox( "NekNET", "Bitte geben sie die Ip-Adresse des anderen Benutzers an.")
    $port = Inputbox( "NekNET", "Bitte geben sie den Port des anderen Benutzers an, den dieser freigegeben hat.")

    Local $ConnectedSocket, $szData
    Local $ip = @IPAddress1
    Local $port

    [/autoit][autoit][/autoit][autoit]

    TCPStartup()
    $ConnectedSocket = -1
    $ConnectedSocket = TCPConnect($ip, $port)

    [/autoit][autoit][/autoit][autoit]

    If @error Then
    MsgBox(4112, "Error", "Verbindung über TCP ist fehlgeschlagen, überprüfen sie die Angaben! " & @error)
    Else

    [/autoit][autoit][/autoit][autoit]

    While 1

    [/autoit][autoit][/autoit][autoit]

    $szData = InputBox("Datei", @LF & @LF & "Gib eine Datei ein die übertragen werden soll:")

    [/autoit][autoit][/autoit][autoit]

    If @error Or $szData = "" Then ExitLoop

    [/autoit][autoit][/autoit][autoit][/autoit][autoit]

    TCPSend($ConnectedSocket, $szData)

    [/autoit][autoit][/autoit][autoit]

    WEnd
    EndIf
    EndFunc

    [/autoit]
  • so viele lösungsvorschläge gleich 8|


    Du wirst ja gleich fordernd -.-

    :cursing:

    Und oben ist glaube ich deine Leertaste kaputt??

    Wie gesagt, das Forum ist keine Maschine, die dir alles ausspuckt was du willst.
    Dein Skript wiederspricht sich an manchen Stellen!
    Nur als kleines Beispiel:

    [autoit]

    $ip = InputBox( "NekNET", "Bitte geben sie die Ip-Adresse des anderen Benutzers an.")
    Local $ip = @IPAddress1 ; Fällt dir hier nicht etwas auf?!

    [/autoit]


    Dann auch noch ein Tipp von mir:

    [autoit]

    Local $ip = InputBox ("NekNET", "Bitte geben sie die Ip-Adresse des anderen Benutzers an.")

    [/autoit]
  • aber trotzdem ich komme nicht zu den 2 feldern wo man die ip eingeben muss. ich habe mir die hilfe angeschaut aber ich komme nicht weiter.

  • ich frage jetzt mal lieb:
    kann mir einer sagen warum dieses doofe progarmm nich anspringt wo dein kein error angezeigt wird? was ist den das dann für ein programm. Das schaut ja dann aus wie bei nem keylogger weil man startet aber es passiert nichts. so nimmt des doch nie einer an auch wenns funtzten würde ;( .

  • aber trotzdem ich komme nicht zu den 2 feldern wo man die ip eingeben muss. ich habe mir die hilfe angeschaut aber ich komme nicht weiter.


    Ist das dein komplettes Programm?

    Alles was dort steht ist eine Funktion:

    [autoit]

    Func Example()
    ....
    EndFunc

    [/autoit]


    die wo aufgerufen wird?

  • danke jetzt funtzt es. ist es mit Tcpsend() eigentlich möglcih das 3 computer jeweils eine datei schicken die beim anderen eine ganze datei ergeben, so etwa wie bei torrents?
    wäre nett wenn ihr mir das sagen könntet.