Discussion :

[K.othmane]

Yop
Je me demandais si on pouvais uploader un fichier sur un site , sans simulation de clicke ou autre du genre , juste avec les requetes HTTP ??
Si quelqu'un a une idée , je suis preneur .
Merci

[Sub0]

Il te faudra un script php ou asp sur le site. Tu envois la requête adequat avec le compo http de ton choix.
http://www.developpez.net/forums/sho....php?t=50059#3
Perso, je l'ai réalisé avec ICS et avec Indy et j'obtiens de meilleures résultats avec HttpCli d'ICS.
Si je retrouve le code, je t'en ferais profiter, à+

[K.othmane]

Yop
Merci de ta reponse , mais voila enfaite le site n'est pas le mien , je vise ce genre de sites : http://imageshack.us .
En fait ce que je cherche c'est uploader sur imageshack mais à travers mon appli ( sans passer par leur formulaire ).
Voila merci

[Sub0]

http://www.developpez.com/delphi/faq...formulairefile

[K.othmane]

Merci , j'etudie ca et je te dis .

[K.othmane]

Yop
Avec quelques bidouillages j'y arrive , mais la il me faut le lien de l'image ( quand on up , a la fin de l'up le site fournit un lien avec l'image ) , je suppose que je dois utiliser la methode GET , mais je ne vois comment m'y prendre pour afficher la page ou recevoir le resultat ( c'est a dire le lien ) .
Voila mon code ( j'ai pris enregistrersous.com , plus simple a coder que imageshack ) :

Code :

Sélectionner tout - Visualiser dans une fenêtre à part

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
 procedure TForm1.Button1Click(Sender: TObject);
var
  MultiPartFormDataStream: TIdMultiPartFormDataStream;
begin
  if OpenDialog1.Execute then
  begin
    MultiPartFormDataStream := TIdMultiPartFormDataStream.Create;
    try
      //"Remplis" la variable "dossier" pour spécifier l'upload dans /test
      MultiPartFormDataStream.AddFormField('MAX_FILE_SIZE','2000000');
 
      MultiPartFormDataStream.AddFile('Image', OpenDialog1.FileName, 'multipart/form-data');
      MultiPartFormDataStream.AddFormField('Titre','test');
      MultiPartFormDataStream.AddFormField('enregistrement','ENREGISTRER');
      //"Joint" le fichier
           MultiPartFormDataStream.Position := 0;
      //Poste !
      IdHTTP1.Post('http://www.enregistrersous.com', MultiPartFormDataStream);
    finally
      MultiPartFormDataStream.Free;
    end;
 
 
  end;
end;

Merci