Seite per http-Post an Server senden

[eddie11]

Hi allerseits,

ich muss eine Seite per http-Post an einen Server schicken, habe keinen Plan wie ich das anstellen soll, kann da jemand vielleicht helfen.

Ich benutze Delphi 2006 Turbo-Explorer für .Net.

Die Foren-Suche hat mir auch noch nicht weitergeholfen....

danke

[marabu]

Hallo Eddie,

was HTTP angeht: Eine (HTML-) Seite schickst du mit PUT, nicht mit POST. Vielleicht willst du aber auch keine (HTML-) Seite schicken, sondern eine beliebige Datei?

Unter Win32 funktioniert es so:

Delphi-Quellcode:

procedure TDemoForm.ButtonClick(Sender: TObject);
var
  fds: TIDMultiPartFormDataStream;
  fn: TFileName;
  s: TStream;
  doc: IHTMLDocument2;
begin
  with OpenDialog do
    if Execute
      then fn := FileName
      else Exit;

  s := TMemoryStream.Create;
  fds := TIdMultiPartFormDataStream.Create;
  try
    fds.AddFile('archive', fn, 'application/zip');
    HTTP.Post(UPLOAD_URL, fds, s);
    doc := WebBrowser.Document as IHTMLDocument2;
    if not LoadDocument(doc, s) then
      ShowMessage('what''s going wrong?');
  finally
    fds.Free;
    s.Free;
  end;
end;

Bei .NET sollte vielleicht jemand anders helfen.

Freundliche Grüße