fso

[eduardo_augusto 0]

Não estou conseguindo ler um arquivo txt, alguem pode me ajudar, segue o código e o erro:Código:<%Dim fso, ts, sConst ForReading = 1Set fso = CreateObject("Scripting.FileSystemObject")Set ts = fso.OpenTextFile("key.txt", ForReading)s = ts.ReadLineResponse.Write "Conteudo = '" & s & "'"ts.Close%>Erro:Microsoft VBScript runtime error '800a0035' File not found teste.asp, line 5

[Salgado 4]

Set ts = fso.OpenTextFile(Server.MapPath("key.txt"), ForReading)

[eduardo_augusto 0]

Valew cara, funcionou...