Hi,
ich versuche gerade via Autoit und TCP mit einem php-socket-Server zu Kommunizieren. Über Kommandozeile via Telnet funktioniert von dem Rechner auf dem das Autoitscript getestet wird alles Problemlos. Beim Autoitscript gibt es nun zwei Probleme.
1. Bei TCPSend kommt nichts beim Server an. Laut Funktionsrückgabe von TCPSend und @error wurden die Daten aber gesendet.
2. So lange die zweite TCPRecv Schleife läuft, die keine Antwort bekommt da das TCPSend nicht am Server ankommt (die erste TCPRecv-Schleife funktioniert deshalb weil beim Verbinden mit TCPConnect bereits eine Nachricht vom Server gesendet wird, welche auch richtig bei Autoit ankommt), wird der Server scheinbar so mit anfragen bombardiert das selbst ein Zugriff via telnet nicht mehr möglich ist (wenn Autoit nicht läuft ist der Zugriff auch von mehreren Telnet-Clients aus möglich)
Hier nun das Script, hoffentlich hat jemand eine Idee:
Spoiler anzeigen
#include<Constants.au3>
[/autoit] [autoit][/autoit] [autoit]Example()
[/autoit] [autoit][/autoit] [autoit]Func Example()
TCPStartup()
OnAutoItExitRegister("OnAutoItExit")
[/autoit] [autoit][/autoit] [autoit]Local $sIPAddress = "127.0.0.1"
Local $iPort = 33379
Local $iSocket = TCPConnect($sIPAddress, $iPort)
Local $iError = 0
If @error Then
$iError = @error
MsgBox(BitOR($MB_SYSTEMMODAL, $MB_ICONHAND), "", "Client:" & @CRLF & "Could not connect, Error code: " & $iError)
Return False
EndIf
Do
$bData = TCPRecv($iSocket, 1024)
ConsoleWrite($bData)
Until $bData <> ""
$erg = TCPSend($iSocket, "123")
[/autoit] [autoit][/autoit] [autoit]Do
$bData = TCPRecv($iSocket, 1024)
ConsoleWrite($bData)
Until $bData <> ""
TCPCloseSocket($iSocket)
EndFunc ;==>Example
Func OnAutoItExit()
TCPShutdown()
EndFunc ;==>OnAutoItExit