cargar datos a un combobox de VB6 desde una tabla creada en Mysql

[geroalberto]

q tal compañeros de foro..
necesito cargar datos a un combobox de visual basic 6 pero no tengo idea de como hacer esto, la tabla donde tengo los datos esta creada en Mysql.
Espero y me puedan a apoyar..ok de antemano gracias y salu2.

[klaudia_ru]

Q tal,
yo no se mucho de VB, pero:

puedes crear un vector, y a ese vector asignarle el query donde te selecciona los datos que tienes en tu tabla.....despues le metes a tu combo ese vector.
suerte

[GatorV]

Tema movido desde Bases de Datos a Visual Basic clásico

[abrahamvj]

Dim cnn As ADODB.Connection
Dim rst As ADODB.Recordset
Dim sql$

Set cnn = New ADODB.Connection
cnn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" _
& "SERVER=99.999.99.99;" _
& "DATABASE=MIBASEDEDATOS;" _
& "UID=miusuario;PWD=miclave;PORT=3306;OPTION=131072 "

cnn.Open

Set rst = New ADODB.Recordset

sql$ = "select campo from tabla"

With rst
.CursorLocation = adUseClient
.CursorType = adOpenKeyset
.LockType = adLockOptimistic
.Open sql$, cnn, , , adCmdText
End With

Combo1.Clear

rst.MoveFirst

Do
Combo1.AddItem rst.Fields!Campo.Value
rst.MoveNext
Loop Until rst.EOF


Set rst = Nothing
Set cnn = Nothing

Abraham