Foros del Web » Programación para mayores de 30 ;) » Programación General » Visual Basic clásico »

Visual Basic - Sustituir DSN=xxxx por conexion directa.

Estas en el tema de Visual Basic - Sustituir DSN=xxxx por conexion directa. en el foro de Visual Basic clásico en Foros del Web. Hola a todos, Estoy con una aplicacion en Visual Basic 6.0. La conexion a la Base de datos en el código la especifico con el ...
  #1 (permalink)  
Antiguo 07/07/2004, 04:16
aci
 
Fecha de Ingreso: abril-2004
Mensajes: 97
Antigüedad: 20 años
Puntos: 0
Visual Basic - Sustituir DSN=xxxx por conexion directa.

Hola a todos,

Estoy con una aplicacion en Visual Basic 6.0.
La conexion a la Base de datos en el código la especifico con el DSN :
.................................................. .............
Dim conecBd As ADODB.Connection
Set conecBd = New ADODB.Connection
conecBd.Open "DSN=miconexion"
.................................................. .............

y desde el Panel de Control de Windows voy a
Herramientas Administrativas y desde ahi voy a
Órigenes de datos (ODBC) y en DSN de Usuario doy un nombre y selecciono mi base de datos.
.................................................. .............
Hasta ahi la aplicacion funciona bien, pero de qué otra forma podría
conectar directamente con la base de datos si el equipo no me dejara
entrar en el Panel de Control... etc,

es decir, sin conectar por ODBC,
¿cómo especificar la base de datos?

muchas gracias a todos,

saludos.
Alberto.
  #2 (permalink)  
Antiguo 07/07/2004, 10:53
Avatar de lic_dahool  
Fecha de Ingreso: noviembre-2003
Mensajes: 418
Antigüedad: 20 años, 6 meses
Puntos: 0
podés conectarte a traves de DAO, necesitas carga el Microsoft DAO Objet Library, y seteas una variable Database con el OpenDatabase y una variable RecordSet con el OpenRecordset (esto es para las tablas).

Si necesitas algo más detallado avisame.

Saludos.
__________________
La cantidad total de inteligencia del planeta permanece constante.
La población, sin embargo, sigue aumentando.

COLE


:cool: Los ordenadores no resuelven problemas ... ejecutan soluciones.
Laurent Gasser


Tienes alguna duda :pensando: ? >>> www.google.com :aplauso: <<<
  #3 (permalink)  
Antiguo 08/07/2004, 00:30
aci
 
Fecha de Ingreso: abril-2004
Mensajes: 97
Antigüedad: 20 años
Puntos: 0
Voy a probarlo, muchas gracias.

-----------------------------------
Me ha encantado tu frase:

Los ordenadores no resuelven problemas ... ejecutan soluciones.
Atención: Estás leyendo un tema que no tiene actividad desde hace más de 6 MESES, te recomendamos abrir un Nuevo tema en lugar de responder al actual.
Respuesta




La zona horaria es GMT -6. Ahora son las 14:56.