
01/10/2005, 05:46
|
| | Fecha de Ingreso: febrero-2003 Ubicación: Costa Rica
Mensajes: 133
Antigüedad: 22 años, 2 meses Puntos: 0 | |
¿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 |