ERRO AO FAZER O DOWNLOAD DE UM ARQUIVO TXT

 Tópico anterior Próximo tópico Novo tópico

ERRO AO FAZER O DOWNLOAD DE UM ARQUIVO TXT

VB.NET

 Compartilhe  Compartilhe  Compartilhe
#492176 - 10/01/2020 14:50:28

ELMO01
BELO HORIZONTE
Cadast. em:Agosto/2004


Oi pessoal,

Estou fazendo um aplicativo em vb e tenho que baixar um arquivo DAT de um repositrio, at ai tudo bem, mais quando verifico os dados dentro do  arquivo, tais dados esto em uma nica linha, veja o exemplo abaixo:

Original

ADMIN;ADMIN;08/01/2020;13:46;BFEBFBFF0001067A;20E6170289A1;1493;ADMINISTRADOR;C:\PROGRAM FILES (X86)\NOTEPAD++\NOTEPAD++.EXE;T
ELMO;872037;08/01/2020;13:48;BFEBFBFF0001067A;20E6170289A1;1493;ADMINISTRADOR;C:\PROGRAM FILES (X86)\NOTEPAD++\NOTEPAD++.EXE;T

Arquivo depois de baixado fica assim:

ADMIN;ADMIN;08/01/2020;13:46;BFEBFBFF0001067A;20E6170289A1;1493;ADMINISTRADOR;C:\PROGRAM FILES (X86)\NOTEPAD++\NOTEPAD++.EXE;TELMO;872037;08/01/2020;13:48;BFEBFBFF0001067A;20E6170289A1;1493;ADMINISTRADOR;C:\PROGRAM FILES 86)\NOTEPAD++\NOTEPAD++.EXE;T

estou utilizando o comando My.Computer.Network.DownloadFile.

Como fao para baixar o arquivo de mode que se conserve as linhas como elas foram includas?

Se algum poder me ajudar ficarei mais uma vez grato

Obrigado,






elmo

#492177 - 10/01/2020 14:59:28

FABRICIOWEB
BELO HORIZONTE
Cadast. em:Novembro/2011


vc poderia enviar o link que esta esse arquivo
?



#492178 - 10/01/2020 15:02:34

ELMO01
BELO HORIZONTE
Cadast. em:Agosto/2004


Última edição em 10/01/2020 15:03:05 por ELMO01

FABRICIOWEB

Obrigado por ter respondido, abaixo est o comando utilizado e o link que vc pediu

My.Computer.Network.DownloadFile([]https://raw.githubusercontent.com/Elmo2901/Loader/master/Bco_Loader.dat[], []C:\Loader\Bco_Loader.dat[])




elmo

#492179 - 10/01/2020 15:14:06

FABRICIOWEB
BELO HORIZONTE
Cadast. em:Novembro/2011


ok vou olhar aqui




#492181 - 10/01/2020 15:34:37

FABRICIOWEB
BELO HORIZONTE
Cadast. em:Novembro/2011


Última edição em 10/01/2020 15:42:59 por FABRICIOWEB

resolvido

Imports System.Net


Public Class Form1
    Dim arquivo As String = []https://raw.githubusercontent.com/Elmo2901/Loader/master/Bco_Loader.dat[]
    Dim local As String = []C:\Users\FAbricio\Desktop\test.dat[]
    Private Sub Button1_Click(sender As Object, e As EventArgs) Handles Button1.Click
[][][][][][][][][][][][][][][][][][]Dim password As String = []...[]
[][][][][][][][][][][][][][][][][][]Dim username As String = []...[]
        Using client As New WebClient()
[][][][][][][][][][][][][][][][] []client.Credentials = New NetworkCredential(username, password)
            client.DownloadFile(arquivo, local)
        End Using
    End Sub
End Class




#492183 - 10/01/2020 15:47:16

ELMO01
BELO HORIZONTE
Cadast. em:Agosto/2004


FABRICIOWEB, acho que no me expressei bem, tenho um arquivo com vrias linhas em um repositrio. Mais quando baixo o arquivo, todas as informaes que tem no arquivo fica em uma s linha e no em vrias linhas como o original. O que eu quero que quando baixar este arquivo, as linhas continuem no mesmo lugar onde esto obedecendo as quebras de linhas. .

Original

ADMIN;ADMIN;08/01/2020;13:46;BFEBFBFF0001067A;20E6170289A1;1493;ADMINISTRADOR;C:\PROGRAM FILES (X86)\NOTEPAD++\NOTEPAD++.EXE;T
ELMO;872037;08/01/2020;13:48;BFEBFBFF0001067A;20E6170289A1;1493;ADMINISTRADOR;C:\PROGRAM FILES (X86)\NOTEPAD++\NOTEPAD++.EXE;T

Depois de baixado fica assim:

ADMIN;ADMIN;08/01/2020;13:46;BFEBFBFF0001067A;20E6170289A1;1493;ADMINISTRADOR;C:\PROGRAM FILES (X86)\NOTEPAD++\NOTEPAD++.EXE;TELMO;872037;08/01/2020;13:48;BFEBFBFF0001067A;20E6170289A1;1493;ADMINISTRADOR;C:\PROGRAM FILES 86)\NOTEPAD++\NOTEPAD++.EXE;T

elmo

#492184 - 10/01/2020 15:49:09

FABRICIOWEB
BELO HORIZONTE
Cadast. em:Novembro/2011


 Anexos estao visíveis somente para usuários registrados

sim amigo eu entendi  mas esta baixando corretamente em duas linhas no era isso que vc precisa



#492185 - 10/01/2020 16:02:08

KERPLUNK
RIO GRANDE DO SUL
Cadast. em:Junho/2009


Membro da equipe
Porque voc est fazendo isso?

_______________________________________________________________________
Virei Orculo!
The end is nigh, be ready for the nukes!


#492186 - 10/01/2020 16:08:37

ELMO01
BELO HORIZONTE
Cadast. em:Agosto/2004


Última edição em 10/01/2020 16:10:42 por ELMO01

FABRICIOWEB, fiz de acordo com o que vc fez para mim mais ainda continua dando errado, depois de baixar o arquivo os dados continua em uma nica linha. Abaixo est as instrues que utilizo.

Declaro as variveis publicas assim.
Public ArquivoPadrao As String = []Bco_Loader.dat[]
Public arquivo As String = []https://raw.githubusercontent.com/Elmo2901/Loader/master/Bco_Loader.dat[]
Public local As String = []\\192.168.15.100\Loader\[] & ArquivoPadrao

[]*****************************************************
[]* Baixar Arquivo de Senha do Repositrio
[]*****************************************************
Try
    If Not IO.File.Exists(NewDiretorio & []\[] & ArquivoPadrao) Then
       Using client As New WebClient()
                client.DownloadFile(arquivo, local)
       End Using
    End If
Catch ex As Exception
    MsgBox(ex.Message)
    Application.Exit()
End Try

O que estou fazendo de errado??



elmo

#492187 - 10/01/2020 16:11:44

FABRICIOWEB
BELO HORIZONTE
Cadast. em:Novembro/2011


 Anexos estao visíveis somente para usuários registrados

Citação:
:
FABRICIOWEB, fiz de acordo com o que vc fez para mim mais ainda continua dando errado, depois de baixar o arquivo os dados continua em uma nica linha. Abaixo est as instrues que utilizo.



[]*****************************************************
[]* Baixar Arquivo de Senha do Repositrio
[]*****************************************************
Try
    If Not IO.File.Exists(NewDiretorio & [][] & ArquivoPadrao) Then
       Using client As New WebClient()
                client.DownloadFile(arquivo, local)
       End Using
    End If
Catch ex As Exception
    MsgBox(ex.Message)
    Application.Exit()
End Try

O que estou fazendo de errado??




que doido isso

tente executar direto no programa que vou enviar



#492188 - 10/01/2020 16:17:35

FABRICIOWEB
BELO HORIZONTE
Cadast. em:Novembro/2011


 Anexos estao visíveis somente para usuários registrados

fiz um video



 Tópico anterior Próximo tópico Novo tópico


Para responder este tópico o login é requerido
Se você já possui uma conta de usuário por favor faça seu login
Se você não possui uma conta de usuário use a opção Criar usuário