[PHP] Bild via E-Mail schicken

[Chrissi91]

Hast du dir mal den Thread angeguckt, den ich verlinkt habe? Da steht nämlich, dass aus Sicherheitsgründen diese Funktion deaktiviert wurde, sodass man nicht mehr so leicht uploaden kann.

Habe Folgendes gefunden:

Delphi-Quellcode:

procedure TForm1.Button1Click(Sender: TObject);
var
  MultiPartFormDataStream: TMsMultiPartFormDataStream;
  HttpServer, Response: String;
begin
  MultiPartFormDataStream := TMsMultiPartFormDataStream.Create;
  try
    httpMain.Request.ContentType := MultiPartFormDataStream.RequestContentType;
    MultiPartFormDataStream.AddFile('userfile', 'C:\Dokumente und Einstellungen\Laptop\Desktop\ausweis.jpg', '');
    MultiPartFormDataStream.PrepareStreamForDispatch;
    MultiPartFormDataStream.Position := 0;
    Response := httpMain.Post('http://www.*******.de/temp/php/index.php', MultiPartFormDataStream);
  finally
    MultiPartFormDataStream.Free;
  end;

Unit habe ich aus dem Thread: http://www.delphipraxis.net/internal...ct.php?t=98243

Nur leider funktioniert es bei mir nicht ... Er lädt nichts hoch, gibt aber auch keinen Fehler aus.