26/04/2005, 12:53
|
 | | | Fecha de Ingreso: agosto-2002 Ubicación: Panamá
Mensajes: 962
Antigüedad: 22 años, 9 meses Puntos: 15 | |
| Mira esto
<%
Function CheckFileExists(sFileName)
Dim FileSystemObject
Set FileSystemObject = Server.CreateObject("Scripting.FileSystemObject")
If (FileSystemObject.FileExists(sFileName)) Then
CheckFileExists = True
Else
CheckFileExists = False
End If
Set FileSystemObject = Nothing
End Function
%>
Aqui un ejemplo de como usarlo:
<%
If CheckFileExists("D:\www\image\imagen.jpg") Then
Response.Write("El archivo exite")
Else
Response.Write("el archivo no fue encontrado")
End If
%> |