NESTOR NOVOAHOLA ESPERO QUE ESTO TE SEA DE UTILIDAD, YA QUE YO LOGRE CONECTAR LA BASE DE DATOS HECHA EN MYSQL CON VB6.0 AQUI TE ENVIO EL CODIGO:
Option Explicit
'Objeto coneccion para abrir la base de datos
Private cnn As ADODB.Connection
'Para cargar los eventos del recordset
Private WithEvents rst As ADODB.Recordset
Private WithEvents cnn_str As ADODB.Recordset
Private Sub Form_Load()
Text2 = ""
' Indicar el path correcto de la base de datos
' Crear los Objetos
Set cnn = New ADODB.Connection
Set rst = New ADODB.Recordset
cnn.CursorLocation = adUseClient
With cnn
.ConnectionString = "driver={MySQL ODBC 3.51 Driver};server=localhost;uid=root;pwd=;database=BI BLIO;connection=adUseClient"
.Open cnn
End With
'Indicar de que tabla vamos a leer los datos
rst.Open "SELECT * FROM Empleados", cnn, adOpenDynamic, adLockOptimistic
'Enlazar los nombres de los campos con las etiquetas
Label1(0).Caption = "Cedula:"
Label1(1).Caption = "Nombres:"
Label1(2).Caption = "Apellidos:"
CORDIALMENTE:
NESTOR NOVOA
