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.
