Cita:
Iniciado por rojobe55 ¿es una conexión local???
asi:
CxnStr = "Driver={MySQL ODBC 3.51 Driver};" & _
"Server=localhost;Option=3;" & _
"Database=" & archivo & ";"
'Abro la conexion
Set Cxn = New ADODB.Connection
Cxn.CursorLocation = adUseClient
Cxn.Open CxnStr
si le pusistes id y psw (u ODBC como id para win) las usas como en la siguiente que es para una conexión externa...
'esto es para una conexión externa
'CxnFac = "Driver={MySQL ODBC 3.51 Driver};" & _
"Server=data.domain.com;Port=3306;" & _
"Option=131072;Stmt=;" & _
"Database=elnombredelabasededatos;Uid=root;" & _
"Pwd=TuContrasena;"
y listo...
Saludos
okas ahorita mismo pruebo y te aviso..salui2 y gracias