MySQL y Visual Basic

[mgd]

Yo lo hago asi

Código VB6:

Public db As ADODB.Connection
 
 
 
           Set db = New ADODB.Connection
 
        db.Open "Driver={MySQL ODBC 5.1 Driver};" & _
          "Server=" & servidor & ";" & _
          "Port=3306;Database=" & basedatos & ";" & _
          "User=" & usuario & ";Password=" & contraseña & ";Option=3;"
db.Close
 

con db.close cierro la conexion y la voy abriendo a medida que hace falta porque con mysql podes perder la conexion si la tenes abierta durante mucho tiempo sin ejecutar nada y eso genera errores

Ademas uso el conector 5.1.4