• Revista PROGRAMAR: Já está disponível a edição #53 da revista programar. Faz já o download aqui!

angelwars

[VB 6]Combobox com dados de DB ADO

2 mensagens neste tópico

Eu tenho um programa que adiciona dados de musicas numa base de dados

agora quero fazer com que noutro form possa escolher de uma lista de musicas da bd um top de musicas.

Passo a explicar:

tenho 10 combobox, 1 para cada musica do top de 10 musicas

e quero que nessas combobox apareça o código da musica (gerado automaticamente pela bd) e/ou o nome da musica e/ou interprete.

Mas como faço para que a combobox mostre isso?

cumps

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Não sei se percebi bem.

Se o teu objectivo é teres uma combobox a ir buscar nomes das musicas metes tipo assim:

Private Sub Form_Load()

Set CONTerste = New ADODB.Connection
CONTeste.ConnectionString = "Provider=Microsoft.jet.oledb.4.0; Data Source=" & App.Path & "\BD\Teste.mdb"
CONTestei.Open
CONTestei.CursorLocation = adUseClient

    Set rs = New ADODB.Recordset
    rs.CursorType = adOpenStatic
    rs.CursorLocation = adUseClient
    rs.LockType = adLockPessimistic
    rs.Source = "SELECT nome  FROM Musicas"
    rs.ActiveConnection = CONGesPaci
    rs.Open
    
   
    While contador <> rs.RecordCount
            CmbMusicas.AddItem rs!Nome
            rs.MoveNext
            contador = contador + 1
    Wend
    
     contador = 0
     rs.Close
       
End Sub

Se só queres que vá buscar um nome fazes assim:

    Set rs = New ADODB.Recordset
    rs.CursorType = adOpenStatic
    rs.CursorLocation = adUseClient
    rs.LockType = adLockPessimistic
    rs.Source = "SELECT nome  FROM Musicas where nome= (metes a musica que queres)"
    rs.ActiveConnection = CONGesPaci
    rs.Open

   CmbMusicaTop1.Text = rs!nome

0

Partilhar esta mensagem


Link para a mensagem
Partilhar noutros sites

Crie uma conta ou ligue-se para comentar

Só membros podem comentar

Criar nova conta

Registe para ter uma conta na nossa comunidade. É fácil!


Registar nova conta

Entra

Já tem conta? Inicie sessão aqui.


Entrar Agora