This will open Ms Access but now How Do I get it to open a database. The
whole database not a table or a form but all of it.
Thank you
Private Sub Command17_Click()
On Error GoTo Err_runapp_Click
Dim stAppName As String
stAppName = "C:\Program Files\Microsoft Office\Office10\MSACCESS.EXE"
Call Shell(stAppName, 1)
'DoCmd.Open.stAppName
Exit_runapp_Click:
Exit Sub
Err_runapp_Click:
MsgBox Err.Description
Resume Exit_runapp_Click
End Sub