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

Ler Txt Em Vb.net


Biel

Pergunta

Olá pessoal.

Pois bem, estou fazendo um programinha que tem que ler um txt e jogar num textbox.

Dei uma GOOGLEADA e achei algumas coisas, mas com todos os códigos que achei, sempre enfrento o mesmo problema:

Não consegue encontrar o arquivo, embora o arquivo esteja lá.

Segue o código que estou usando.

Alguém pode me dar uma forcinha?

Dim arquivo As String = "c:\texto.txt"

TextBox1.Text = ""

If File.Exists(arquivo) Then

Dim strm As New StreamReader(arquivo)

TextBox1.Text = strm.ReadToEnd

strm.Close()

Else

TextBox1.Text = "Arquivo inexistente!!!"

End If

Link para o comentário
Compartilhar em outros sites

9 respostass a esta questão

Posts Recomendados

  • 0

Olá Biel, cara eu peguei seu código importei a biblioteca System.IO e criei um arquivo texto.txt em c: e deu certo então não entendi onde estava o erro. Mas de qualquer forma por que você não usa um bloco Try Catch vai ter o mesmo efeito e se o problema estava no if provavelmente não acontecerá mais.

Exemplo

Imports System.IO

Public Class Form1

    Private Sub Form1_Load(ByVal sender As System.Object, ByVal e As System.EventArgs) Handles MyBase.Load
        Dim arquivo As String = "c:\texto.txt"

        TextBox1.Text = ""
        Try
            Dim strm As New StreamReader(arquivo)
            TextBox1.Text = strm.ReadToEnd
            strm.Close()

        Catch
            TextBox1.Text = "alguma coisa"
        End Try
    End Sub
End Class

Bom espero que de certo assim já que já era pra tar dando certo com esse código que você mesmo fez, verifique se o arquivo texto existe realmente e se esta no caminho indicado no programa. Boa sorte e qualquer coisa estamos aqui.

Abraços,

Rudolfo

Link para o comentário
Compartilhar em outros sites

  • 0

Olha, amigo, o código do Rudolfo funcionou legal aqui.

A unica coisa que deu errado no seu, foi a chamada da biblioteca mesmo, que foi corrigida com o que o Rudolfo colocou:

Imports System.IO

Tem certeza que você colocou isso?

E qual foi o erro do seu código? já tentou usar sem as exceções de erro para ver o que o compilador te diz?

Falows!

Link para o comentário
Compartilhar em outros sites

  • 0

pelo que eu entendi, o seu codigo não está gerando erro, certo?? ele está indo direto pra

 TextBox1.Text = "Arquivo inexistente!!!"

é isso msmo??

se for, pode se uma coisa meio tonta, mas seu windows está configurado pra mostrar extensao de arquivo comum?? se não tiver, e você tiver gravado um arquivo de bloco de notas e posto o nome de texto.txt, na verdade ele pode estar com o nome de texto.txt.txt.

pra checar se o arquivo existe mesmo, clica em Iniciar -> Executar, digita "c:\texto.txt" (ou o endereco que você colocar na variavel arquivo) e clica em OK.

Link para o comentário
Compartilhar em outros sites

  • 0

pelo que eu entendi, o seu codigo não está gerando erro, certo?? ele está indo direto pra

 TextBox1.Text = "Arquivo inexistente!!!"

é isso msmo??

se for, pode se uma coisa meio tonta, mas seu windows está configurado pra mostrar extensao de arquivo comum?? se não tiver, e você tiver gravado um arquivo de bloco de notas e posto o nome de texto.txt, na verdade ele pode estar com o nome de texto.txt.txt.

pra checar se o arquivo existe mesmo, clica em Iniciar -> Executar, digita "c:\texto.txt" (ou o endereco que você colocar na variavel arquivo) e clica em OK.

Então. Fiz o teste e ele abre o arquivo pelo executar.

Pode ser algum problema no meu compilador?

vou tentar desinstalar e instalar novamente o vb.

Não sei se tem como mandar arquivos aqui pelo forum.

eu poderia mandar o release que ele criou.

P.S. No VB 6.0, eu fiz um código chamando o arquivo o programa leu normal.

Quanto ao tópico anterior, eu já tinha declarado a biblioteca, só esqueci de portar essa parte do código.

Muito obrigado por enquanto.

Pelo menos sei que o código está certo.

Um abraço.

Olha, amigo, o código do Rudolfo funcionou legal aqui.

A unica coisa que deu errado no seu, foi a chamada da biblioteca mesmo, que foi corrigida com o que o Rudolfo colocou:

Imports System.IO

Tem certeza que você colocou isso?

E qual foi o erro do seu código? já tentou usar sem as exceções de erro para ver o que o compilador te diz?

Falows!

quando eu excluo as excessões, o programa trava.

Link para o comentário
Compartilhar em outros sites

  • 0

Quando eu retiro as excessões, dá a seguinte mensagem de erro:

Falha na solicitação da permissão de tipo 'System.Security.Permissions.FileIOPermission, mscorlib, Version=2.0.0.0, Culture=neutral, PublicKeyToken=b77a5c561934e089'.

Procurei no google e não achei nada

Link para o comentário
Compartilhar em outros sites

  • 0

olá pessoal

Consegui esse texto na internet que me deu uma luz.

https://www.scriptbrasil.com.br/forum/lofiv...php/t83228.html

O rapaz ensinou um comando que permitiu que eu visualize o arquivo.

A pergunta é: vou ter que fazer isso em todas as máquinas uma a uma?

o comando foi o seguinte:

C:\windows\microsoft.net\framework\v2.0.50727\caspol.exe -s off

Abraço a todos

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
      152k
    • Posts
      651,8k
×
×
  • Criar Novo...