1. Este site usa cookies. Ao continuar a usar este site está a concordar com o nosso uso de cookies. Saber Mais.

combobox com datareader vb.net!??!?!

Discussão em 'Programação' iniciada por Esquima, 28 de Setembro de 2007. (Respostas: 1; Visualizações: 2266)

  1. Boa tarde sou iniciante em vb.net, tou a carregar um combobox com um datareader e dentro da minha base de dados tenho 2 campos com designaçao e id.. consigo apanhar a descriçao mas nao o id

    Dim sSql AsString
    Dim oDRproj As OleDbDataReader
    sSql = "SELECT designacao,cod_projecto FROM Projecto"
    oDRproj = abreConexao(sSql)
    oDRproj.Read()
    ComboBox1.Items.Add(oDRproj("descricao"))
    oDRproj.close()
     
  2. TecnicoDeCoisas

    TecnicoDeCoisas Power Member

    Oi,

    vê se assim ja faz o ke keres:
    Código:
      [SIZE=2][COLOR=#0000ff]Dim[/COLOR][/SIZE][SIZE=2] sSql [/SIZE][SIZE=2][COLOR=#0000ff]As[/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]String
    [/COLOR][/SIZE][SIZE=2][COLOR=#0000ff]Dim[/COLOR][/SIZE][SIZE=2] oDRproj [/SIZE][SIZE=2][COLOR=#0000ff]As[/COLOR][/SIZE][SIZE=2] OleDbDataReader[/SIZE]
      [SIZE=2][SIZE=2]sSql = "SELECT designacao,cod_projecto FROM Projecto"
    [SIZE=2]oDRproj = abreConexao(sSql)
    'Se tiveres mais que 1 registo tens de usar um while por exemplo
    While oDRproj.Read()
    [SIZE=2][COLOR=#008000]ComboBox1.Items.Add(oDRproj("descricao").ToString() & " - " & [/COLOR][/SIZE][/SIZE][/SIZE][/SIZE][SIZE=2][SIZE=2][SIZE=2][SIZE=2][COLOR=#008000]oDRproj("[/COLOR][/SIZE][/SIZE][/SIZE][/SIZE][SIZE=2][SIZE=2]cod_projecto[/SIZE][/SIZE][SIZE=2][SIZE=2][SIZE=2][SIZE=2][COLOR=#008000]").ToString()[/COLOR][/SIZE][/SIZE][/SIZE][/SIZE][SIZE=2][SIZE=2][SIZE=2][SIZE=2][COLOR=#008000])
    [COLOR=White]En[COLOR=#008000]d While[/COLOR][/COLOR]
    oDRproj.close()[/COLOR][/SIZE][/SIZE][/SIZE][/SIZE]
     

    Uma sugestão, pq não usas um dataset em vez de um datareader? se calhar era mais facil, mas em termos de performance e rapidez o DataReader supera o DataSet.

    .eof
    TT
     

Partilhar esta Página