29/03/2003, 07:43
|
| | | Fecha de Ingreso: marzo-2003 Ubicación: Santa Marta
Mensajes: 30
Antigüedad: 21 años, 8 meses Puntos: 0 | |
| Hola Car123.
Te comento que independiente de la version de la BD, existen procedimientos para abrir la BD, ya sea cualquier formato. Haz lo siguiente:
En componentes activas:Microsoft Remote Data.
En referencias activas:
Microsoft Access 9.0 Library
Microsoft Remote Data Object 2.0
Microsoft Dao 3.6
Microsoft Ado,
Luego declaras una funcion en em modulo general, y al iniciar el programa la lllamas para que abra la BD, y dale uso, que eso funciona. Te envio el codigo de abrir la base de datos, copialo y adaptalo a tu programa.
Public Function Abrir_Base()
Dim ruta As String
ruta = App.Path & "\comercio.mdb"
Set ws = DBEngine.Workspaces(0)
Set g_sBdlocal = ws.OpenDatabase(ruta)
End Function
Gennys |