Usando Fso

[Gafanhoto]

Galera é o seguinte...

Todos os exemplos que vi até hoje de FSO usam diretórios locais, tipo C:/minhasPasta/teste.txt

Mas, eu preciso abrir um arquivo online e meu código não tá achando.

Ele funciona direitinha localmente mas online ele diz que "O arquivo não existe!"

Segue abaixo o código:

<% 

caminho = "default.asp"

Set fso = CreateObject("Scripting.FileSystemObject")
'testamos se o arquivo existe.. se não existir, não faz sentido continuar a executar o codigo né?

If fso.FileExists(caminho) = false Then
response.write "O Arquivo não existe!"
Response.End 
End If

Set textStreamObject = fso.OpenTextFile(caminho,1,false,0)


Response.write "Abrir Arquivo<br>"

Do While not textStreamObject.AtEndOfStream
Response.Write textStreamObject.ReadLine + "<br>"
Loop


textStreamObject.Close
Set textStreamObject = Nothing
%>
[/codebox]

A variável que não tá funcionando é a "caminho". Já tentei colocar "\default.asp", "/default.asp", mas não funciona. Não acha o arquivo.

Como faço pra abrir esse arquivo default.asp? Ele está na mesma pasta que o meu código. :huh:

[bareta]

tente

server.mappath("default.asp")

[Marcos-rj]

Não tenho certeza, mas no FSO você tem que colocar o caminho físico do arquivo.

e você esta colocando:

caminho = "default.asp"

tenta o que o quereta colocou.

[Gafanhoto]

Funcionou na hora...

Obrigado pela ajuda!!! :)