Abrir un .mdb haciendo click en un boton de VB

[sebastian H.]

hola a todos!!
necesito abrir una base de datos haciendo click en un boton de un formulario que estoy diseñando en VB.

por ejemplo si oprimo el boton A, el formulario se cierra y abre datosa.mdb , y si hago click en el boton B el formulario se cierra y abre datosb.mdb .

Gracias a quien me pueda ayudar.

[nephsus]

Para hacer esto necesitas una api y tener instalado el access ok

la api se llama ShellExecute y ejecuta el archivo con el programa q tiene asociado
primero la declaras en un modulo.

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

declara tambien esta aunq creo q no te hace falta, pero asi qeda mas correcto.

Declare Function GetDesktopWindow& Lib "User32" ()

depues la llamas con

r = ShellExecute(GetDesktopWindow, "Open", ruta del fichero, vbNullString, vbNullString, 1)

y ya ta