Leer archivo en IIS de XP

[DeLaVega]

Tengo una página en donde leo un archivo con este simple código:

<%
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objTextStream = objFSO.OpenTextFile(Server.MapPath("archivo.txt"), 1)
archivo = objTextStream.ReadLine
objTextStream.Close
Set objTextStream = Nothing
Set objFSO = Nothing
%>

Tenía windows 2000 en mi máquina local y funcionaba ok (es más, en el server donde está alojada la página tiene windows 2000 y está funcionando bien así).
La cosa es que actualicé a XP y ahora no funciona , y lo extraño es que no devuelve error, sino que se queda cargando y cargando sin devolver nada. Me di cuenta que el error está ahí porque comenté todas esas líneas y la página funciona ok.
El objeto lo crea porque dejé la primera línea sin comentar y pasa.
Qué puede ser? Algún tema de permisos? El archivo existe.
Muchas gracias, saludos.

[DeLaVega]

Alguien que use XP me diría por favor si este código le funciona bien y le llega a imprimir "ok", ya no sé que probar:

<%
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objTextStream = objFSO.OpenTextFile(Server.MapPath("archivo.txt"), 1)
archivo = objTextStream.ReadLine
objTextStream.Close
Set objTextStream = Nothing
Set objFSO = Nothing
Response.write "ok"
%>

Como dije antes, en windows 2000 funcionaba ok (de hecho en el server donde está alojada está funcionando bien), cambié a XP y no me funciona en el server local. Si alguien lo prueba solamente hay que crear un txt llamado archivo en el mismo subdirectorio donde ponen la página, sólo lee un carácter.
Lo más lindo es que no me devuelve error, se queda cargando infinitamente.
Muchas gracias, saludos.

[Bravenap]

Pues a mí si me funciona. Pero supongo que sabrás que así sólo sale la primera línea del archivo de texto ¿no?

De todas formas, hay una pequeña corrección. Si quieres que muestre el contenido del archivo de texto, lógicamente tendrás que darle la instrucción para que lo haga:

Código:

<%
Set objFSO = Server.CreateObject("Scripting.FileSystemObject")
Set objTextStream = objFSO.OpenTextFile(Server.MapPath("archivo.txt"), 1)
archivo = objTextStream.ReadLine
objTextStream.Close
Set objTextStream = Nothing
Set objFSO = Nothing
Response.write archivo 
%>

Un saludo.

[DeLaVega]

Si, sabía eso... muchas gracias.
Ya descubrí donde estaba el problema, es por el Norton Antivirus, si está activado el "script blocking" bloquea el IIS al trabajar con FSO.
Nunca me iba a dar cuenta de eso... lo encontré en otro lado
Saludos

[Bravenap]

Me alegro de que lo hayas resuelto. Cosa curiosas lo del Norton.

Un saludo.