El código que implementa la función ASP para verificar si existe un archivo

'=========================================================================

'Nombre de la función: CheckFile

'Función: verifique si existe un archivo

'Parámetro: nombre de archivo ------- Dirección de archivo como: /swf/1.swf

'Valor de retorno: Falso --- Verdadero

'=========================================================================

PublicFunctionCheckFile (nombre de archivo)

OnerrorResumEnext

Dimfsoobj

Setfsoobj = server.createObject ("scripting.filesystemObject")

Ifnotfsoobj.fileExists (server.mappath (nombre de archivo)) entonces

CheckFile = falso

Extinción

Endif

CheckFile = true: setfsoobj = nada

Función final