Manoloman
05 de Septiembre del 2003

¿Podriais explicarme como se usa lo del path? es para no poner rutas exactas en el codigo, pero no se como es la sintaxis ni nada y por internet no he encontrado una explicación clara. Por favor, como si tuviera tres años, que soy principiante.

Juan
05 de Septiembre del 2003

Pues es muy sencillo, la propiedad App.Path devuelve
la ruta en la que se encuentra el archivo .EXE de tu
aplicación o el .VBP si lo ejecutas mientras lo estás diseñando.

Mira este código que tenía en un programa:

Dim numArch As Integer, nombreArch As String
Dim linea As String, i As Integer
nombreArch = App.Path & "datoslst.txt"
numArch = FreeFile
' Abre el archivo y escribe una linea por cada
' elemento en el listbox
Open nombreArch For Output As numArch
For i = 0 To lstDatos.ListCount - 1
linea = lstDatos.List(i)
Print #numArch, linea
Next i
Close numArch

Con este código se crea un archivo en la carpeta del
programa llamado datoslst.txt y se guarda en él los
elementos de un listBox.

Creo que está claro el uso de App.Path

ccortes
05 de Septiembre del 2003

si quieres hacerlo a un ADODC
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;data source=" & App.Path & "nombrebase.mdb"

y si quieres hacer una coneccion general en el form principal del programa seria algo asi:

en un modulo esto

Global goDatabase As New ADODB.Connection

para que la uses en todas las consultas si es que usas lenguaje sql

en el form load del principal esto:

goDatabase.CursorLocation = adUseClient
goDatabase.Open "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=" & App.Path & "base datos.mdb;Persist Security Info=False"