Hey Leute,
Ich glaub, ich sitz zu lange davor... ich seh die Lösung einfach net. Ich wette, sie is ganz einfach... wie immer
Folgendes: Das Programm soll von mehreren Usern teilweise gleichzeitig TCP connects beommen. Mein Programm empfängt aber nur von einem User Daten und auch nur eine Session lang... wie kann ich das verhindern ?
Hier der Code:
Spoiler anzeigen
Code
$tcp_listen = TCPListen($sIP, $sPort)
Do
$tcp_socket = TCPAccept($tcp_listen)
Until $tcp_socket <> -1
GuiSetState()
While 1
If $tcp_listen = -1 Then
MsgBox(16,"Fehler","Der TCP Socket konnte nicht erstellt werden!" & @CRLF & 'Error: ' & @error)
Exit
EndIf
$tcp_recv = TCPRecv( $tcp_socket, 2048 )
$tcp_recv_command = StringLeft($tcp_recv, StringInStr($tcp_recv, "|"))
If $tcp_recv_command = 'login| Then
MsgBox(64, "Drinnen", "login")
ElseIf $tcp_recv_command = 'getip' Then
MsgBox(64, "Drinnen", "Get IP")
EndIf
[...]
EndSelect
WEnd
Alles anzeigen
Danke im vorraus
Chris