Hochladen einer Datei mit Delphi CGI
Frage
Könnte jemand bitte ein funktionierendes Beispiel dafür, wie eine Datei mit Delphi CGI laden.
Ich habe gegoogelt aber bisher noch kein Glück gehabt.
Das ist, was ich habe versucht, aber ich bin immer Zugriffsverletzungen.
procedure TWebModule1.WebModule1WebActionItem1Action(Sender: TObject;
Request: TWebRequest; Response: TWebResponse; var Handled: Boolean);
var
lFileName : string;
lFileStream : TFileStream;
begin
lFileName := Request.Files[0].FileName;
lFileStream := TFileStream.Create(lFileName, fmCreate);
try
lFileStream.CopyFrom(Request.Files[0].Stream, Request.Files[0].Stream.Size);
finally
lFileStream.Free;
end;
end;
Keine korrekte Lösung
Andere Tipps
Mit idRunner Komponenten, die Sie können finden Sie unter:
http://www.vclcomponents.com/Delphi/Winsock___Internet/idRunner -info.html
Sie sind kostenlos und umfassen Quellcode, damit Sie sie anpassen kann.
Ich habe den Code aus dem folgenden Link verwendet, um meine WebBroker Sachen tun (multi-) Das Hochladen von Dateien zu machen.
http://exposureroom.com/members/skumar.aspx/tutorials / post / 18
Die Seite hat eine Menge Informationen darüber, wie die Dinge zu tun, mit der WebBroker Technologie.