Q&A

  • idHTTP 파일 업로드 문제입니다.
var
  Source: TMemoryStream;
  Response: TStringStream;
begin

          HTTP.Request.ContentType := 'Content-Type: application/x-www-form-urlencoded';
          HTTP.InterceptEnabled := true;
          Response := TStringStream.Create('');
          try
              Source := TMemoryStream.Create;
              try
                Source.LoadFromFile('d:testtest.jpg');    
                HTTP.Post('http://192.168.1.109/Upload_ok.asp', Source, Response);
              finally
                Source.Free;
              end;
            memoHTML.Lines.Text := Response.DataString;
          finally
            Response.Free;
          end;
end;

idHTTP 로 파일을 전송하는 방법입니다.
데모소스에 있는건데
문제는 이걸 어떻게 받을지 방법을 잘 모르겠네요
혹시 아시면 조언 부탁합니다.
그럼 이만
2  COMMENTS
  • Profile
    이승혁 2003.04.18 04:33
    Get 명령 사용하시면 됩니다.

    MemStream := TMemoryStream.Create;
    try
      HTTP.Get('http://192.168.1.109/test.jpg', MemStream);
      MemStream.SaveToFile('c:test.jpg');
    finally
      MemStream.Free;
    end;

  • Profile
    조헌철 2003.04.21 20:20