objFSO.OpenTextFile que da error al abrir pero existe

[Galx]

Prueba esto para gestionar errores:
<%
on error resume next
Set fso = CreateObject("Scripting.FileSystemObject")
Set abretxt = fso.OpenTextFile(server.MapPath("archivo.txt") )

IF err <> 0 THEN
response.write "Ha ocurrido un error"
ELSE
response.write"Todo va bien"
END IF

abretxt.close
Set abretxt = nothing
Set fso = nothing
%>