VERIFIER L'EXISTENCE D'UN FICHIER / D'UNE IMAGE EN ASP

<%
'Création de l'objet FSO
Set FSO = Server.CreateObject("Scripting.FileSystemObject")

'Déclaration du fichier que l'on souhaite tester
mon_fichier = "mon_image.jpg"

'Chemin absolu du fichier
mon_fichier = Server.MapPath(mon_fichier)
'ou mon_fichier =  Request.ServerVariables("APPL_PHYSICAL_PATH")&"\images\"&mon_fichier
 

' Test de l'existence du fichier

If FSO.FileExists(mon_fichier) Then

Response.Write "Le fichier "& mon_fichier & " existe !"

Else

Response.Write "Le fichier "& mon_fichier & " n'existe pas!"

End If

'Nettoyage des références
Set FSO = Nothing

%>