16/03/2004, 13:28
|
 | | | Fecha de Ingreso: octubre-2003
Mensajes: 381
Antigüedad: 20 años, 6 meses Puntos: 0 | |
| Sir,
los DSN no me gustan pero para probar están bien. Crea un DSN de usuario o sistema, el que quieras y pruebas las conexión desde allí.
Te ha funcionado? Si, pues ya sabemos que el problema no está allí. Seguimos, este ejemplo es el mejor para probarlo. Si pasándole el DSN que te ha funcionado te da el mismo error, el problema es el código. Has agregado las referencias de RDO? Si lo has hecho y nada, actualiza las librerías de acceso a datos MDAC de la web de Microsoft.
****************************
Ejemplo de la propiedad Connect y OpenConnection: conexión con DSN mediante OpenConnection
El ejemplo siguiente establece una conexión ODBC empleando el método OpenConnection, pero el usuario debe proporcionar toda la información de conexión. En este caso, el ejemplo imprime la propiedad Connect resultante en la ventana Inmediato.
Dim cn As rdoConnection
Dim en As rdoEnvironment
Set en = rdoEnvironments(0)
Set cn = en.OpenConnection(dsName:="WorkDB", _
Prompt:=rdDriverCompleteRequired)
debug.print cn.Connect
****************************
Un saludo
Pablo |