GERANDO E IMPORTANDO ARQUIVO TEXTO

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

GERANDO E IMPORTANDO ARQUIVO TEXTO

VB.NET

 Compartilhe  Compartilhe  Compartilhe
#378115 - 30/06/2011 10:18:54

PERCIFILHO
MATAO [SP]
Cadast. em:Dezembro/2009


Bom dia amigos.

Estou importando os registros de um banco de dados do Access para o Sql Server.
Ento fao assim: Leio os registros da tabela do Access e gero um arquivo texto.
Depois leio o arquivo texto e gravo os registros no Sql Server.
J fiz isso antes com uma tabela e funcionou tudo bem. Agora, essa tabela que preciso
importar para o Sql Server, tem um dos campos da tabela do Access que tipo: Memorando.
Vou demonstrar como estou fazendo:

        Dim conexao As New SqlConnection([]Data Source=Server;Integrated Security=SSPI;Initial Catalog=BD)
        Dim str As New StreamReader([]c:\arquivo.csv[])
        Dim line As String = Nothing
        While str.Read()
            line = str.ReadLine
            If line Is Nothing Then Exit While
            conexao.Open()
            Dim cmd As SqlCommand
            cmd = New SqlCommand([]Insert into Tabela(numero,data,observacao)VALUES(@numero,@data,@observacao)[], conexao)
            cmd.Connection = conexao
            cmd.Parameters.AddWithValue([]@numero[], Mid(line, 1, 9))         [] campo tipo texto
            cmd.Parameters.AddWithValue([]@data[], Mid(line, 8, 10))          [] campo tipo data
            cmd.Parameters.AddWithValue([]@observacao[], Mid(line, 19, 500))  [] campo tipo memorando
            cmd.ExecuteNonQuery()
            conexao.Close()
        End While
        str.close

O restultado do arquivo gerado esse:

      2892;08/09/2009;
      2893;08/09/2009;
      2894;09/09/2009;
      2895;09/09/2009;CHEQUE: NOME DO CLIENTE - BCO. REAL - 012055 - R$ 773,00
CHEQUE: NOME DO CLIENTE - BCO. REAL - 012049 - R$ 261,00
CHEQUE: NOME DO CLIENTE - BCO. REAL - 010405 - R$ 1.000,00
CHEQUE: NOME DO CLIENTE - BRADESCO - 000064 - R$ 840,00
      2896;09/09/2009;
      2897;10/09/2009;
      2898;10/09/2009;CHEQUE: NOME DO CLIENTE - HSBC - 001265 - R$ 235,00
CHEQUE: NOME DO CLIENTE - ITAU - 000072 - R$ 333,00
      2899;10/09/2009;CHEQUE: NOME DO CLIENTE - BCO. BRASIL - 850209 - R$ 143,00
      2900;11/09/2009;
      2901;11/09/2009;
      2902;11/09/2009;
      2903;14/09/2009;
      2904;15/09/2009;CHEQUE: NOME DO CLIENTE - CREDIMOTA - 000666 - R$ 1.589,59
CHEQUE: NOME DO CLIENTE - CREDIMOTA - 000667 - R$ 1.589,60

A vem a minha dvida: Nas linhas onde no gerado o campo memo, est ok. porm onde o
campo memo gerado, como fazer para entender que tem que importar esse campo at o final dele?
Por exemplo, na quarta linha no campo []observacao[] tem que gravar desde o segundo ponto e vrgula
at onde termina ... R$ 840,00.
Se que eu consegui me explicar, algum tem uma soluo para esse caso?

At mais.

____________________________________________________
No h nessa vida algo que no se possa alcanar, voc s precisa ir buscar.

#378247 - 01/07/2011 21:31:17

TECLA
SAO PAULO
Cadast. em:Janeiro/2001


Membro da equipe
A linha que se refere esta?
CHEQUE: NOME DO CLIENTE - BRADESCO - 000064 - R$ 840,00




#378418 - 04/07/2011 10:57:13

PERCIFILHO
MATAO [SP]
Cadast. em:Dezembro/2009


Tecla, desculpe a demora em responder. Aconteceram muuuuuitos problemas aqui e s agora que estou conseguindo resolver as pendncias, mas conseguimos resolver de outra forma, alterei o layout do arquivo texto e agora consegui exportar certinho. Mesmo asim, obrigado pela disposio em tentar me ajudar. Valeu.
At mais.

____________________________________________________
No h nessa vida algo que no se possa alcanar, voc s precisa ir buscar.

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


Tópico encerrado, respostas não sao permitidas
Encerrado por PERCIFILHO em 04/07/2011 15:58:01