TCP question

[NicoTn]

SERVER:

TCPStartup()
;~ $socket_connect = TCPConnect(@IPAddress1,3147)
$socket_listen = TCPListen(@IPAddress1,3147)
while 1
    $socket_accept = TCPAccept($socket_listen)
    if not $socket_accept -1 Then
        sleep(100)
        $socket_recv = TCPRecv($socket_accept,1024*4)
        if $socket_recv > "" then 
            ConsoleWrite("["&$socket_recv&"]")
;~      MsgBox(0,"",$socket_recv)
        EndIf
    EndIf           
WEnd
TCPShutdown()

CLIENT:

$socket_connect = TCPConnect(@IPAddress1,3147)
sleep(50)
TCPSend($socket_connect,"aan")

the server doenst receive the send command! only when i put TCPsend() in a while ... maybe some 1 got a solution?

thanks in forward

- Nicotine

Edited December 13, 2006 by Str!ke

[NicoTn]

You TCPSend and die... When TCPRecv (on the other end) executes... it may get your packet, but is overridden with your death, so the packet is ignored and the death is recorded. Try TCPSend... then have the server respond... then kill the client after the server responds with an OKEE DOKEE.

Lar.

whut uw mean?

[Snarg]

You need to have TCPStartUp () on your client as well.

TCPStartUp ()
$socket_connect = TCPConnect (@IPAddress1,3147)
sleep (50)
TCPSend ($socket_connect, "aan")

Off topic: I guess we currently do not have the AutoIt tags for the forum or I can't find them right now.

Edited December 13, 2006 by Snarg

[Jos]

Off topic: I guess we currently do not have the AutoIt tags for the forum or I can't find them right now.

Correct .. but you can type them yourself ... they are working ...

[NicoTn]

You need to have TCPStartUp () on your client as well.

TCPStartUp ()
$socket_connect = TCPConnect (@IPAddress1,3147)
sleep (50)
TCPSend ($socket_connect, "aan")

Off topic: I guess we currently do not have the AutoIt tags for the forum or I can't find them right now.

i got it only left it out

[Jos]

i got it only left it out

Anything else "you got but left out" ?

Misschien iets duidelijker zijn wat je probleem is en een voorbeeld Posten die je probeelm ook laat zien zou helpen in gewoon Engels..

Edited December 13, 2006 by JdeB

[NicoTn]

Anything else "you got but left out" ?

Misschien iets duidelijker zijn wat je probleem is en een voorbeeld Posten die je probeelm ook laat zien zou helpen in gewoon Engels..

still please some one help me!

i still cant figure it out!

[sheck]

Try this:

$socket_listen = TCPListen(@IPAddress1,3147)
 while $socket_recv = ""
     $socket_accept = TCPAccept($socket_listen)
     if not $socket_accept -1 Then
         Do
         Sleep(10)
         $tick = $tick + 1
         $socket_recv = TCPRecv($socket_accept,1024*4)
         Until $socket_recv <> "" Or $tick = 500
         if $socket_recv <> "" then
             ConsoleWrite("["&$socket_recv&"]")
         EndIf
     EndIf          
 WEnd
 TCPShutdown()

[Jos]

still please some one help me!

i still cant figure it out!

You are obviously not Dutch as I assumed reading the script..

[NicoTn]

You are obviously not Dutch as I assumed reading the script..

i am dutch and i already fixed but thanks for all your help

Edited December 14, 2006 by Str!ke