Programación General > Visual Basic 6.0 e inferiores

 Path Db + Access

(1/2) > >>

Makko:
Saludos gente

Tengo el siguiente problema, estoy haciendo una app que maneja una base de datos.
El problema es que yo muestro la lista de la base de datos en un MSFlexGrid el cual levanta la informacion de un DATA.
Mi pregunta es: Como puedo hacer para que sea cual fuera el path donde un usuario X instale la App levante la informacion sin tener problemas?
Miren, les pongo el codigo de lo que tengo:


--- Código: Text ---Private Sub Form_Activate()Data1.Refresh MSFlexGrid1.ColWidth(0) = 3400MSFlexGrid1.ColWidth(1) = 2200MSFlexGrid1.ColWidth(2) = 900MSFlexGrid1.ColWidth(3) = 1150 End Sub En ese form tengo el MSFlexGrid. Mediante el Data1.refresh traigo toda la info actual y mediante los enlaces correspondientes muestro todo en el FlexGrid.

Como habran notado ya, mi duda es que poner el la propiedad "DATABASENAME" del control DATA1... para que no tenga problemas de path cdo lleve la aplicacion a otra maquina que no tenga esa ruta...

Ya he probado con:
App.path & "/XX/ZZ/1.mdb"

Pero no logro hacerlo funcionar.

Espero me ayuden.
Gracias!  :hola:

cpmario:
El problema que veo es que tienes equivocada la ruta de la base de datos.
Coloca este código en Sub Form_Load lo más arriba posible.

--- Código: Text ---Data1.DatabaseName = App.path & "\XX\ZZ\1.mdb" 
Equivocas "/" por "\"

 :comp:

Makko:
Gracias por tu respuesta amigo cpmario, pero creo que no me has entendido o quizas me explique mal.

Si bien tipee mal las barras ("/"  y  "\") me refiero a que

--- Código: Text ---Data1.DatabaseName = App.path & "\XX\ZZ\1.mdb" "\XX\ZZ\1.mdb" es la ruta donde yo tengo la carpeta con los codigos fuente.

Ejemplo aun mas claro...
Mira es asi: C:\Windows\VB\DB-Musica\1.mdb
Aca tengo los frm, vbp, bas etc... a lo que voy es que cdo termine la app y haga el instalador el usuario que la instale no va a tener esa misma ruta... no se como ira a instalarlo el ni en que carpeta, me explico?

Gracias por tu respuesta cpmario.
Un saludo para vos.

cpmario:
Vamos por partes:

App.path te dice donde está el ejecutable de tu programa en cualquier equipo de computo. Por ejemplo: "C:\Windows\VB"

Tu base de datos estará en App.Path & "\DB-Musica\1.mdb"

Entonces

--- Código: Text ---Data1.DatabaseName = App.Path & "\DB-Musica\1.mdb" Debiera funcionar si colocas esta línea de código en Sub Form_Load lo más arriba posible.

--------------------------------------------------------
Por otra parte yo uso este método también

Primero, siempre coloco las bases de datos en el directorio del ejecutable y
el siguiente código lo coloco en Sub Form_Initialize() de la forma principal


--- Código: Text ---    ChDrive CurDir(App.Path)    ChDir App.Path Para que el directorio de trabajo sea el de la aplicación.

Y en en cuadro de propiedades al datacontrol le escribes solo el nombre del archivo sin el path por ejemplo: DatabaseName= 1.mdb
Te adjunto un pequeño proyecto para demostrártelo.
-------------------------------------------------------


 :comp:

Makko:
Gracias.
En cuanto lo pruebe te aviso como me fue.!!!  :hola:

Navegación

[0] Índice de Mensajes

[#] Página Siguiente