Question

Quelqu'un pourrait-il s'il vous plaît donner un exemple concret de la façon de télécharger un fichier en utilisant CGI Delphi.

Je l'ai googlé mais jusqu'à présent ne l'ai pas eu de chance.

Voici ce que j'ai essayé mais je reçois des violations d'accès.

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;

Pas de solution correcte

Autres conseils

Utiliser des composants idRunner que vous pouvez trouver à:

http://www.vclcomponents.com/Delphi/Winsock___Internet/idRunner -info.html

Ils sont libres et comprennent le code source afin que vous puissiez les adapter.

Je l'ai utilisé le code du lien suivant pour faire mes affaires CourtierWeb ne (multi) téléversements de fichiers.

http://exposureroom.com/members/skumar.aspx/tutorials / post / 18

Le site a beaucoup d'informations sur la façon de faire des choses avec la technologie WebBroker.

Licencié sous: CC-BY-SA avec attribution
Non affilié à StackOverflow
scroll top