none
Vb.net - Select BD - System.byte[] RRS feed

  • Pergunta

  • Fala ai pessoal, tudo certo?

    Estou fazendo uma aplicação em meu trabalho. Dei um select em um banco de dados que está em um servidor externo, fora do país. Porém para os campos que são alfanuméricos, o sistema traz dentro da textbox: System.byte[]
    Ao invés do real valor do campo que está no banco!

    Alguma ideia?

    -----------------EDITADO -------------

    O Servidor é um IBM AS400!

    sexta-feira, 16 de maio de 2014 12:55

Respostas

  • RESOLVIDO!

    Se alguém tiver o mesmo problema no futuro... segue a solução!

    Peguei como base essa string de conexao: 

    Private Const sConnStr As String = "Provider=IBMDA400.DataSource.1; " &
    _
    "User ID=zzz;Data Source=sysname;Protection Level=None; "
    & _
    "Transport Product=Client Access; " & _
    "Force Translate=00037;Default Collection=zzz; " & _
    "Convert Date Time To Char=TRUE;Password=xyzzyj"

    Minha String de conexão ficou assim: 

     Dim strSql As String = "Provider=IBMDA400;Data Source=172.29.48.9;User Id=mc61294;Password=dani333;Force Translate=00037; Default Collection=QGPL;"

    Apenas coloquei: Force Translate=00037!

    VLW Romy Moura


    • Marcado como Resposta Giovani Cr sexta-feira, 16 de maio de 2014 19:19
    sexta-feira, 16 de maio de 2014 17:55

Todas as Respostas

  • Cara o que ele traz no select?

    Nome : Romy G. Moura Cargo: Analista Programador

    sexta-feira, 16 de maio de 2014 12:59
  • Na textbox1 aparece: System.Byte[]

    nas demais textbox's aparece o valor correto!

    * Select Inteiro: ..."select SDLITM,SDTRDJ,SDCNDJ,SDDOCO from PEDKAROL where SDDOCO = '1200868'", conexao)

    sexta-feira, 16 de maio de 2014 13:56
  • Vc debugou e verificou o que seu datareader esta trazendo?

    Qual é o valor vindo da base? é um byte msm?

    preciso saber desta infos, valew.


    Nome : Romy G. Moura Cargo: Analista Programador

    sexta-feira, 16 de maio de 2014 14:11
  • Parece que é um byte mesmo cara, dei uma pesquisada aqui de como converter byte para String, mas não consegui!

    * Isso acontece com todos os campos alfanuméricos!

    sexta-feira, 16 de maio de 2014 14:19
  • Dim vOut As String = System.Text.Encoding.UTF8.GetString(rd('campo'))

    idtxt.Text = vOut


    Nome : Romy G. Moura Cargo: Analista Programador

    sexta-feira, 16 de maio de 2014 15:02
  • Não funcionou cara :(

    Será que tem a ver com o servidor? Que é um IBM AS400? 

    *Mudei o UTF8 para outras opções e nada também...

    sexta-feira, 16 de maio de 2014 16:52
  • RESOLVIDO!

    Se alguém tiver o mesmo problema no futuro... segue a solução!

    Peguei como base essa string de conexao: 

    Private Const sConnStr As String = "Provider=IBMDA400.DataSource.1; " &
    _
    "User ID=zzz;Data Source=sysname;Protection Level=None; "
    & _
    "Transport Product=Client Access; " & _
    "Force Translate=00037;Default Collection=zzz; " & _
    "Convert Date Time To Char=TRUE;Password=xyzzyj"

    Minha String de conexão ficou assim: 

     Dim strSql As String = "Provider=IBMDA400;Data Source=172.29.48.9;User Id=mc61294;Password=dani333;Force Translate=00037; Default Collection=QGPL;"

    Apenas coloquei: Force Translate=00037!

    VLW Romy Moura


    • Marcado como Resposta Giovani Cr sexta-feira, 16 de maio de 2014 19:19
    sexta-feira, 16 de maio de 2014 17:55