<% Function ExisteFichero(Ruta) ' Devuelve true si existe el fichero, false si no Dim fs Set fs=CreateObject("Scripting.FileSystemObject") ExisteFichero=fs.FileExists(Server.MapPath(Ruta)) end function %>