Shell "nombrearchivo.extension"

Mira es muy facil
























yo tampoco se

Form (load)
cn.open "Driver= {microsof acces driver(*mdb)}; Dbq=\\bipman_54\carpeta empresa\base.mdb; admin; Pwd= Contraseña de la base de datos"

la anterior linea conecta a la base de datos base.mdb almacenada en la carpeta bipman_54 ubicada en la carpeta empresa.

CONTACTAME Y TE DIGO COMO ES LA VUELTA

Aquí tenes la respuesta:
----------------------------
Vos necesitas abrir el archivo con el programa asociado.
----------------------------
Bueno colocas en la cabecera del formulario la siguiente declaración.
------------------------------------------------------------­--------------------
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
--------------------------------------------------------------------------------

Luego agregas un commandbutton, y el siguiente código
---------------------------------------
Private Sub Command1_Click()
Dim Resul As Long
Resul = ShellExecute(Me.hwnd, "Open", "c:\base_datos_empleados.mdb", "", "", 1)
End Sub
---------------------------------------

suponiendo que "base_datos_empleados.mdb" sea la base de datos y este en el raiz del "C"

Luego te vas a "archivo" y "Generar Proyecto1.exe" y listo tendrás tu ejecutable.

Un abrazo.

Luis