was haltet ihr davon bzw. was muss ich ändern?
hier nochmal das script
client
Code:
TCPStartup() $socket = TCPConnect("13.45.76.345", 4321) If $socket = -1 Then MsgBox(16, "Error", "es konnte keine vergindung zum server hergestellt werden") EndIf $sendedBytes = TCPSend($socket, "Hallo es geht^^") If $sendedBytes = 0 Then MsgBox(16, "Error", "das paket konnte nich gesendet werden") EndIf TCPCloseSocket($socket) TCPShutdown()
Code:
TCPStartup() $mainsocket = TCPListen(@IPAddress1, 4321) While 1 $acceptedSocket = TCPAccept($mainsocket) If $acceptedSocket <> -1 Then $receivedData = TCPRecv($acceptedSocket, 1024) MsgBox(64, "juhu", "Es wurde folgende Nachricht empfangen: " & $receivedData) TCPCloseSocket($acceptedSocket) EndIf WEnd