Código vb:
Ver original
Private Function AppPath() as String return System.Windows.Forms.Application.StartupPath End function
en
Código vb:
Ver original
Dim Conexion As OleDb.OleDbConnection Dim Conexion As New OleDbConnection("Provider=Microsoft.ACE.OLEDB.12.0; data source = C:\Users\Usuario\Desktop\BaseDeDatos\UnaPruebirijilla\bin\Prueba.accdb")
Para evitarme poner el directorio completo al conectar base de datos.
Gracias de antemano