Acceso a BBDD

Question

Buenas tardes, tengo una BBDD en Access 07. He creado un modulo en el que voy a programar en vb6.  En ella creo una conexion a datos y realizo una serie de consultas de la siguiente forma:

Public cnnADODB As New ADODB.Connection

Public Sub conexion()
 
    cnnADODB.Provider = "Microsoft.ACE.OLEDB.12.0"
    Dim Path As String
    Path = "BBDD.accdb"
    cnnADODB.ConnectionString = Path
    cnnADODB.Open
    
End Sub

Esto funciona siempre cuando pongo el PATH absoluto, ¿como puedo crear el PATH relativo independientemente de donde yo tenga guardada la base de datos? Es decir, que si cambio la BBDD de directorio el programa siga funcionando, total... va unida la BBDD y la programacion...

Gracias.

Answer 1

Hola,

Guarda la ubicacion y el nombre de la base de datos en un archivo externo al sistema, por ejemplo en un archivo .INI.

Cuando inicia tu aplicacion lo primero que haces es leer el archivo ini para tomar ubicacion + nombre de la base de datos y la podes guardar en una variable global o publica.

Answer 2

Buenos días, ¿algo así te serviría?

Public cnnADODB As New ADODB.Connection

Public Sub conexion()
 
    cnnADODB.Provider = "Microsoft.ACE.OLEDB.12.0"
    Dim Path As String
    Path = App.Path & "\BBDD.accdb"
    cnnADODB.ConnectionString = Path
    cnnADODB.Open
    
End Sub

Saludos

---

Santiago Ezequiel Rueda
[e-mail]
Blog

¡Gadget MSDN Español!

Entre Ríos
Argentina