DUVIDA REFERENTE A MYSQL

MATHEUSALVES 11/12/2011 13:55:31
#391081
Estou a um tempo tentando encontrar a solução para esta dúvida, mas infelizmente, não achei nada coerente até então.

Como posso exibir os resultados de um Select do MYSQL em uma Combobox?
Caso possam me dizer os códigos agradeço, abraços.

PS: Estou utilizando vb6.
TECLA 11/12/2011 14:21:10
#391082
O exemplo abaixo demonstra como alimentar um ComboBox à partir de uma base de dados ACCESS.
Preenchendo um ComboBox a partir do BD

Como você utiliza o MYSQL, a única coisa que irá mudar é a STRING DE CONEXAO (link abaixo) e o COMANDO SQL.
Connection strings for MySQL
SNNIFFER 12/12/2011 07:58:43
#391110
Uso este código para o preenchimento do combobox.

  

                    Set prs = New ADODB.Recordset
                    SQL = [Ô]Select * From servicos[Ô]
                    prs.Open SQL, gConexao, adOpenStatic, adLockOptimistic, adCmdText
                    
                    If prs.RecordCount = 0 Then
                            CmbTipo.Enabled = False
                    Else
                            CmbTipo.Clear
                            prs.MoveFirst
                            While (prs.EOF = False)
                            CmbTipo.AddItem prs.Fields([Ô]descricao[Ô])
                            prs.MoveNext
                            Wend
                    End If
Tópico encerrado , respostas não são mais permitidas
Voltar