Autor Beitrag
sdx
Hält's aus hier
Beiträge: 3



BeitragVerfasst: Sa 19.11.05 02:28 
Hallo, ich will von meiner Homepage(mit PHP) Strings über TCP/IP schicken.
Beim Verbindungsaufbau bekomme ich aber einen Socket-Fehler #10054.

Mein Delphi Programm:

ausblenden Delphi-Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
9:
10:
11:
12:
13:
14:
15:
16:
17:
18:
19:
Server: TIdTCPServer;

procedure TForm1.FormActivate(Sender: TObject);
begin
  Server.active := true;
end;

procedure TForm1.FormClose(Sender: TObject; var Action: TCloseAction);
begin
  Server.active := false;
end;

procedure TForm1.ServerExecute(AThread: TIdPeerThread);
var
  MSG: String;
begin
  MSG := AThread.Connection.ReadLn();
  Memo1.Lines.Add(MSG);
end;


Wenn ich über FireFox direkt meine IP mit dem Port eingebe (zB 123.123.123.123:6666) bekomme ich diverse Infos.

Was könnte die Ursache sein?
Von der PHP Seite müsste alles richtig sein

ausblenden Quelltext
1:
2:
3:
4:
5:
6:
7:
8:
$fp = fsockopen("123.123.123.123", 6666, $errno, $errstr, 30);
if (!$fp) {
   echo "$errstr ($errno)";
} else {
   fwrite($fp, "HEYHO");
   while (!feof($fp)) echo fgets($fp, 128);
   fclose($fp);
}


Kann mir jemand helfen? Oder hat jemand von euch so etwas ähnliches gemacht?

Danke, MfG sdx

Moderiert von user profile iconraziel: Cs- durch Code-Tags ersetzt.
sdx Threadstarter
Hält's aus hier
Beiträge: 3



BeitragVerfasst: Sa 19.11.05 17:55 
Habt ihr vielleicht andere Vorschläge wie ich Strings von meiner Homepage zu meinem Delphi Programm zu Hause schicken kann?
Muss nicht unbedingt in PHP sein.

Danke..
sdx Threadstarter
Hält's aus hier
Beiträge: 3



BeitragVerfasst: Mi 23.11.05 19:16 
Hab den Fehler gefunden, es lag am Port, mit Port 80 funktioniert das, man muss auch \r\n schicken.