USUÁRIO:      SENHA:        SALVAR LOGIN ?    Adicione o VBWEB na sua lista de favoritos   Fale conosco 

 

  Fórum

  Visual Basic
Voltar
Autor Assunto:  Problema com Arquivo Texto
Scaliburth
BELO HORIZONTE
MG - BRASIL
Postada em 24/06/2005 12:42 hs            
Olá pessoal,
 
Tenho um arquivo de texto e gostaria de carregá-lo TOTALMENTE em um textbox. Este arquivo de texto, contém linhas em branco, virgulas, colchetes, entre outros. Acontece que tentei carregá-lo até com um exemplo aqui do forum mesmo que é o seguinte:
Dim mTexto_Completo as String
Dim mTexto_Linha as String
Dim mStr as String
Open app.path % "arquivo.txt" for input as #1
do while not eof(1)
    line input #2, mTexto_Linha
    mTexto_Completo = mStr + mTexto_Linha
    mStr = mStr + mTexto_Linha + vbCrlf
loop
close #1
textBox1.text=mTexto_Completo
 
' Créditos para Poca de Sete Lagoas'
 
Acontece que na linha  "line input #2, mTexto_Linha" ele dá um erro que é o RUN TIME ERROR 52 Bad file name or number.
 
Se alguem souber porque esta dando este erro ou tiver uma idéia melhor de como consigo buscar os dados que estâo no arquivo texto e jogá-los no textbox direto, ou seja, automaticamente, por favor me enviem.
 
 
Grato da atenção de todos! Valeu
TÓPICO EDITADO
   
kerplunk
Pontos: 2843 Pontos: 2843 Pontos: 2843
SÃO PAULO
SP - BRASIL
Postada em 24/06/2005 13:31 hs         
Olha só, vc tentou ler uma linha de um arquivo aberto com o número 2 quando vc abriu o número 1. Troque essa linha para:
 

line input #1, mTexto_Linha

Isso deve resolver

     
Página(s): 1/1    


Seu Nome:

Seu eMail:

ALTERAR PARA MODO HTML
Mensagem:

[:)] = 
[:P] = 
[:(] = 
[;)] = 

HTML DESLIGADO

     
 VOLTAR

  



CyberWEB Network Ltda.    © Copyright 2000-2025   -   Todos os direitos reservados.
Powered by HostingZone - A melhor hospedagem para seu site
Topo da página