2009-05-31 5 views
1

누구든지 Delphi CGI를 사용하여 파일을 업로드하는 방법을 보여줄 수 있습니까?Delphi CGI를 사용하여 파일 업로드

나는 봤지만 지금까지 아무런 운이 없었습니다.

이것은 내가 시도했지만 액세스 위반이 발생했습니다. 당신은에서 찾을 수 있습니다

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; 
+0

어디에서 액세스 위반이 발생합니까? 요청이 유효합니까? Files 배열에 몇 개의 파일이 있습니까? 첫 번째 파일의 Stream 속성이 유효합니까? 그 크기는 얼마입니까? 파일 시스템에 유효한 파일 이름입니까? –

답변

관련 문제