Fso (file System Objects)

[Guest Fórmula]

Fala, Pessoal!

Estou tentando criar um .txt com fso, mas parece que não quer criar, o browser fica sem responder, o que seria??? Alguém sabe?

Vai o Código!!!

<%

Set FSO = Server.CreateObject("Scripting.FileSystemObject")

caminho = Server.MapPath("nome.txt")

Set GRAVAR = FSO.CreateTextFile(caminho,true)

gravar.write ("Total de Visitas .: " & application("Total_de_Usuarios") & "<br>" & "Total de Usuários .: " & application("Usuarios_OnLine"))

gravar.close

response.write "GRAVADO!"

%>

<%

Set FSO = Server.CreateObject("Scripting.FileSystemObject")

caminho = Server.MapPath("nome.txt")

Set TXT = FSO.OpenTextFile(caminho)

response.write txt.readALL

%>

Valeu!!!

[ursolouco]

Brother!!

Ele gera algum erro ?

[Guest Fórmula]

Brother... Na verdade não, mas o que acontece é o seguinte. a pagina fica carregando horas e horas e não abre, ou seja, o servidor fica sem responder e se altomaticamente e ficar dando refresh o número de solicitações no server excede, ai complica, né?