FileExists pour fichier distant

Salut,

Je cherche à vérifier si un fichier existe sur un site internet (via http) mais sans pour autant le telecharger. Existe t-il un equivalent de FileExists() pour ce cas là?

J'ai essayé avec IdHTTP1.Get mais il récupère le fichier, chose que je ne veux pas.

Merci

Simo'

Citation:

---

Envoyé par simoryl

Salut,

Je cherche à vérifier si un fichier existe sur un site internet (via http) mais sans pour autant le telecharger. Existe t-il un equivalent de FileExists() pour ce cas là?

J'ai essayé avec IdHTTP1.Get mais il récupère le fichier, chose que je ne veux pas.

Merci

Simo'

---

Salut!

Tu peux utiliser la méthode Head(); de TIdHTTP. Si la ressource recherchée existe, la propriété ResponseCode sera initialisée à 200, sinon à 404.

Code:

---

1 2 3 4 5 6 7 8 9 10 11 12 13 14 15

procedure TForm1.Button1Click(Sender: TObject); const MON_FICHIER = 'http://<a href="http://www.developpez.com/template/logo.gif&#39;;" target="_blank">www.developpez.com/template/logo.gif';</a>   begin try IdHTTP1.Head(MON_FICHIER); except ShowMessage(Format('Erreur %d', [IdHTTP1.ResponseCode])); end;   if IdHTTP1.ResponseCode = 200 then ShowMessage(Format('Le fichier "%s" existe.', [MON_FICHIER])); end;

---

ok, merci.
J'avais essayé head mais manifestement pas comme il faut. En tous cas, maintenant je sais comment ça marche.
Merci beaucoup pour ta réponse :D
Simo'