SoloCodigo

Hola:
estoy suponiendo que trabajas con access, la verdad no lo conozco mucho.
Con el siguiente codigo puedes abrir cualquier tipo de archivo, pero, si tu BD esta abierta por ahi te dira que solo lo puedes abrir de solo lectura.

En la seccion de declaraciones pon:

Option Explicit

Private Declare Function ShellExecute Lib "shell32.dll" Alias "ShellExecuteA" (ByVal hwnd As Long, ByVal lpOperation As String, ByVal lpFile As String, ByVal lpParameters As String, ByVal lpDirectory As String, ByVal nShowCmd As Long) As Long

en un boton pega lo sgte.:

ShellExecute hwnd, "Open", "C:MEDICAMENTO.MDB", vbNullString, vbNullString, 1

y listo.

Espero te ayude, sino, no dudes en escribir.
Saludos;

Hola:
he revisado y el codigo anterior no serviria, con este codigo si se puede, ya he intentado, prueba..

'*******codigo *********
Dim appAccess As Access.Application

    Const strConPathToSamples = "C:BD3.mdb"

    Set appAccess = _
        CreateObject("Access.Application")

    appAccess.OpenCurrentDatabase strConPathToSamples, False, "DEMO"
   
    appAccess.Visible = True
    appAccess.UserControl = True

    Set appAccess = Nothing
 '=========

Recuerda:
- tienes que hacer referencia a "Microsft Access 10.0 Object Library"
- en appAccess.OpenCurrentDatabase :  
       "False" es si quieres abrir en modo exclusivo o no la BD.
       "DEMO"  seria la clave de la BD.

Avisas como vas....
Saludos;

Hola:
creo haber encontrado la solucion a tu problema....
chequea...

http://support.microsoft.com/default.as ... -us;235422

saludos;