Within my form, I need to open an external DB another Form but when I run the command, the window sits in minimize mode....
Private Sub Command38_Click()
Dim appAccess As Access.Application
Set appAccess = CreateObject("Access.Application")
appAccess.OpenCurrentDatabase "G:\Source\Distribution\ABCD.accdb"
appAccess.DoCmd.OpenForm "Home Page"
appAccess.Visible = True
appAccess.UserControl = True
Set appAccess = Nothing
End Sub
Private Sub Command38_Click()
Dim appAccess As Access.Application
Set appAccess = CreateObject("Access.Application")
appAccess.OpenCurrentDatabase "G:\Source\Distribution\ABCD.accdb"
appAccess.DoCmd.OpenForm "Home Page"
appAccess.Visible = True
appAccess.UserControl = True
Set appAccess = Nothing
End Sub