Ir para conteúdo
Fórum Script Brasil
  • 0

Lendo Arq Txt


jefmolino

Pergunta

20 respostass a esta questão

Posts Recomendados

  • 0

Internal Server Error

The server encountered an internal error or misconfiguration and was unable to complete your request.

Please contact the server administrator to inform of the time the error occurred and of anything you might have done that may have caused the error.

More information about this error may be available in the server error log

acho q o server num suporta mesmo

Link para o comentário
Compartilhar em outros sites

  • 0

testei aqui.... erro:

Set arquivo = Obj.OpenTextFile("teste.txt",1)

você deve especificar um caminho fisico:

Set arquivo = Obj.OpenTextFile("C:\Inetpub\wwwroot\teste.txt",1)

obs: para este comando é necessario ter no minimo 2 linhas no arquivo txt

do while arquivo.AtEndOfStream=false

a = arquivo.Readline

response.write a & "<BR>"

a = arquivo.Readline

response.write a & "<HR>"

loop

aqui funfou tudo... falou... wink.gif

Link para o comentário
Compartilhar em outros sites

  • 0

The server encountered an internal error or misconfiguration and was unable to complete your request.

Please contact the server administrator to inform of the time the error occurred and of anything you might have done that may have caused the error.

More information about this error may be available in the server error log.

O mesmo de antes

Link para o comentário
Compartilhar em outros sites

  • 0

deve ser isso:

Set arquivo = Obj.OpenTextFile("C:\Inetpub\wwwroot\teste.txt",1)

o caminho pode estar errado,

geralmente é assim:

Set arquivo = Obj.OpenTextFile("C:\Inetpub\wwwroot\nomedoseusite\teste.txt",1)

ou

Set arquivo = Obj.OpenTextFile("C:\Inetpub\www\nomedoseusite\teste.txt",1)

falou..... wink.gif

Link para o comentário
Compartilhar em outros sites

  • 0

manda um email para eles (o servidor) e pergunta qual caminho fisico para a pasta onde fika seus arquivos.... ou faça em ASP tem um codigo que mostra o caminho completo... vou achar este codigo e lhe falo depois

Link para o comentário
Compartilhar em outros sites

  • 0

apareceu o end e tals, mas continua dando o erro

<% @Language=vbScript %>
<HTML><HEAD><TITLE>ASP</TITLE></HEAD>
<BODY><CENTER>
<% dim final
  final = "</CENTER></BODY></HTML>"

  Set Obj = Server.CreateObject("Scripting.FileSystemObject") 
  Set arquivo = Obj.OpenTextFile("C:\Inetpub\vhosts\end_site\httpdocs\teste.txt",1)
  if Err then
      Response.write "Ocorreu um erro tentando abrir o arquivo!"
      Response.write final
      Response.End
  end if
  Response.Write "Lista de E-mails<BR>"
  Response.write "<HR>" 
  do while arquivo.AtEndOfStream=false 
    a = arquivo.Readline  
    response.write a & "<BR>"
    a = arquivo.Readline  
    response.write a & "<HR>"
  loop

  REsponse.Write final
  arquivo.close
%>

Num é possível, so muito burro meu

Link para o comentário
Compartilhar em outros sites

  • 0

Não sei como te explicar: Como você disse antes q tinha q ter min de 2 linhas, coloquei 3, e não funcionou... ai você falou d novo, ai eu coloquei 4 e funcionou... vlw cara

Mas ele demora muito pra ler é normal isso?

Link para o comentário
Compartilhar em outros sites

  • 0

dá uma olhada no tópico que eu criei..

http://scriptbrasil.com.br/forum/index.php?showtopic=59757

Link para o comentário
Compartilhar em outros sites

  • 0

esquisito

eu uso ele aqui, com o arquivo vazio.. e funciona legal

bom.. se você resolveu o problema.. beleza

Link para o comentário
Compartilhar em outros sites

Participe da discussão

Você pode postar agora e se registrar depois. Se você já tem uma conta, acesse agora para postar com sua conta.

Visitante
Responder esta pergunta...

×   Você colou conteúdo com formatação.   Remover formatação

  Apenas 75 emoticons são permitidos.

×   Seu link foi incorporado automaticamente.   Exibir como um link em vez disso

×   Seu conteúdo anterior foi restaurado.   Limpar Editor

×   Você não pode colar imagens diretamente. Carregar ou inserir imagens do URL.



  • Estatísticas dos Fóruns

    • Tópicos
      152,3k
    • Posts
      652,3k
×
×
  • Criar Novo...