문제
누구든지 Delphi CGI를 사용하여 파일을 업로드하는 방법에 대한 예제를 제시 할 수 있습니까?
나는 Googled를 가지고 있었지만 지금까지는 운이 없었습니다.
이것이 제가 시도한 것이지만 액세스 위반을 받고 있습니다.
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;
올바른 솔루션이 없습니다
다른 팁
다음에서 찾을 수있는 Idrunner 구성 요소를 사용하십시오.
http://www.vclcomponents.com/delphi/winsock___internet/idrunner-info.html
무료이며 소스 코드를 포함하므로 적응할 수 있습니다.
다음 링크의 코드를 사용하여 웹 브로커 재료를 (멀티) 파일 업로드로 만들었습니다.
http://exposureroom.com/members/skumar.aspx/tutorials/post/18
이 사이트에는 웹 브로커 기술로 작업을 수행하는 방법에 대한 많은 정보가 있습니다.
제휴하지 않습니다 StackOverflow