Error VB6 + MySQL

[Ezpiki]

Hola, estoy intentando hacer una simple conexión con una bd mysql desde visual basic 6, con una pequeña consulta de prueba para ver si funciona y nada, me da un error en la última linea, al ejecutar la consulta, me sale "Error '424': Se requiere un objeto"

¿Sabe alguien que puede ser? Gracias por vuestra ayuda.


Global gConexion As ADODB.Connection
Global gRs As ADODB.Recordset
Global gConsulta As String
Set gConexion = New ADODB.Connection
With gConexion
.ConnectionTimeout = 60
.CommandTimeout = 400
.CursorLocation = adUseClient
.Open "DRIVER={MySQL ODBC 3.51 Driver};" _
& "user=" & glUSER _
& ";password=" & glPASSWD _
& ";database=" & glDATABASE _
& ";server=" & glSERVER _
& ";option=" & (1 + 2 + 8 + 32 + 2048 + 16384)
End With

gConsulta = "Insert into tabla_prueba(Texto, Codigo) Values ('juan',6)"

gConexion.execute gConsulta

[FidelGR]

Sería mejor que intentaras con un ODBC es mas facil al hacer la conexion....