HTML-Datei von Server abrufen und lokal Speichern

[luwo]

Zitat von Sharky:

Hai netjoe,

es gibt "kein" HTTP-Protokoll. Die kommunikation mit WEB-Server läuft immer über TCP.

da bin ich aber anderer Meinung
http heisst "hyper-text-transfer-protocol" und ist ergo tatsächlich ein Protokoll

TCP/UDP liegt nur in einer tieferen OSI/ISO-Schicht.

Code:

procedure TForm1.Button1Click(Sender: TObject);
var
  FileStream: TFileStream;
begin
  FileStream := TFileStream.Create('C:/test.html', fmCreate);
  try
    IdHTTP1.Get('http://www.sriptroute.org:3967', FileStream);
  finally
    FileStream.Free;
  end;
end;

Diese Routine sollte funktionieren, wenn die Zeile "http://www.sriptroute.org:3967"
in einem Browser (z.B. IE) tatsächlich ein Ergebnis liefert.
Wenn dem so ist, horcht auf der Maschine www.scriptroute.org auf Port 3967 tatsächlich
ein Web-Server (z.B. Apache, IIS etc.) und liefert auf Web-Anfragen auch "Web-Antworten".

Sollte auf diesem Port aber ein anderes Programm lauschen, das eben nicht das Web-Protokoll (HTTP)
"spricht", wird der Versuch mit idHTTP als Zugriffskomponente immer fehlschlagen.

Eine "nativere" Möglichkeit ist es, mit der idTCPClient-Komponente
zum Server zu verbinden und gucken was dieser "ausspuckt"...

@netjoe:
Ist der Server denn du abrufen willst öffentlich erreichbar?
dann könnte man ja mal gucken, ob tatsächlich ein Web-Server
auf diesem Port horcht...

luwo