' Si tu connais le nom de ton fichier :

Set filesys = CreateObject("Scripting.FileSystemObject")
le_chemin_du_fichier = "c:\fichier_que_tu_teste.jpg"
if filesys.FileExists (le_chemin_du_fichier) then
' Il existe donc.....
else
' Il n'existe pas, alors...
end if

' Si tu ne connais pas, la suite au prochain numéro...