franjocc
Usuario Novato
Usuario Novato

Tengo esta conexion:

Dim objConn As New ADODB.Connection

objConn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" & _
"SERVER=192.168.1.3;DATABASE=Garbatur;PWD=password;UID=root;OPTION=3"
objConn.Open

Pero me da el siguiente error:

Error "-2147418113 (8000ffff)' en tiempo de ejecucion:
Error catastrofico

Tengo un dos pcs en casa, el que esta la base de datos en un Windows Xp SP1 con la version 4.1.9, y en el que estoy desarroyando es uno diferente.

La base de datos se llama Garbatur ...

A ver si alguien me puede echar un cable.

Gracias.

Enfurruñado

Avatar Image
Usuario habitual
Usuario habitual


Lo primero que te recomiendo es que saques la cadena de conexion del código...utiliza un fichero .Udl para eso que te lo coge los objetos de conexion perfectamente...y desde ese fichero, que lo gestiona windows, eliges el driver, el servidor y el nombre de la BD y a correr.

En cualquier caso, si decides seguir con una cadena de conexión fija en tu código, para no comerte la olla y poder hacer pruebas de la misma manera que la Udl, puedes usar el objeto "Microsoft ADO Data Control 6.0 (OLEDB)"...que en una de sus propiedades puedes crearte la cadena de conexion...
SERBERINCA
Usuario Novato
Usuario Novato

Saludos franjocc

Okey vamos a ver si te puedo ayudar coloca las siguiente lineas de codigo para la coneccion de tu base de datos en MySQL:

Public cn As New rdoConnection

CadenaConnect = "DRIVER={MySQL ODBC 3.51 Driver};SERVER=192.168.1.3;DATABASE=Garbatur;PWD=password;UID=root;OPTION=3"
cn.Connect = CadenaConnect
cn.CursorDriver = rdUseServer
cn.EstablishConnection

NOTA: Te recuerdo que los DLL del Remote Data Object debe ser incluido en el projecto (Proyecto->Referencia->Microsoft Remote Data Object 2.0) lo tildeas y listo.....

Cualquier informacion adicional estamos a tus ordenes...

silviajulian
Usuario Novato
Usuario Novato

Hola!

Me da error en: Public cn As New rdoConnection, me dice atributo no válido en procedimiento o funcion, porque puede ser?

SERBERINCA
Usuario Novato
Usuario Novato

Saludos


Ya hiciste los que te escribi en la "Nota", verificaste que el Objeto este incluido en el Proyecto!!

XEREA
Usuario habitual
Usuario habitual
Escrito originalmente por silviajulian
Hola!

Me da error en: Public cn As New rdoConnection, me dice atributo no válido en procedimiento o funcion, porque puede ser?

A mi me ha dado ese error al incluir "public" o "private" dentro de otro procedimiento (por ejemplo un click de boton) que ya esta definido como procedimiento private. Si lo cambias a dim la cosa parece querer funcionar. Digo que parece que quiere por que me da un error... parece que ni programa no encuentra el driver de mysql :'(.
silviajulian
Usuario Novato
Usuario Novato

Hola de nuevo:

Intento conectar-me a un base de datos de mysql desde Visual basic, cuando hace la conexion me da el siguiente error:

"[MySQL][ODBC 3.51 Driver] Client does not support authentication protocol requested by server; consider upgrading MySQL client"


el codigo de conexion que utilizo es el siguiente:

cnn.ConnectionString = "DRIVER={MySQL ODBC 3.51 Driver};" & "SERVER=localhost;" & " DATABASE=mmshomes;" & "UID=root;" & "PWD=root;" & " OPTION=" & 1 + 2 + 8 + 32 + 2048 + 16384
cnn.CursorLocation = adUseClient
cnn.Open


Porque me puede dar este error?

ATENCIÓN: Este tema no tiene actividad desde hace más de 6 MESES,
te recomendamos abrir un nuevo tema en lugar de responder al actual
Opciones:
Ir al subforo:
Permisos:
TU NO PUEDES Escribir nuevos temas
TU NO PUEDES Responder a los temas
TU NO PUEDES Editar tus propios mensajes
TU NO PUEDES Borrar tus propios mensajes
Temas similares
TemaUsuariosRespuestasVisitasActividad
Por: , el 21/Dic/2006, 23:35
jhoncarlos0101020kDec/06
Por: , el 18/Oct/2006, 19:46
lmjc11 vhsP NoSetup.org210kOct/06
Por: , el 26/Nov/2009, 23:07
romansan NoSetup.org12kNov/09
Por: , el 05/Nov/2008, 19:04
cardanielp NoSetup.org43kNov/08
Por: , el 20/Abr/2004, 15:48
corver04kApr/04