start another access dbatabase from an access database 1

[Panchovia]

Hi I am trying to run an access database from another access database with the following code in ms access 2010

Private Sub Command21_Click()
Call Shell("""C:\Program Files\Microsoft Office\OFFICE11\MSACCESS.EXE"" "" C:\Users\Rudolf\Desktop\Signinfo playitmovie,1")

End Sub

 

[PWise]

try

Dim appAccess As Access.Application
 appAccess.OpenCurrentDatabase "PathToDatabase"
 appAccess.Visible = -1

 

[PWise]

sorry should be

 Dim appAccess As Access.Application
 Set appAccess = CreateObject("Access.Application")
 appAccess.OpenCurrentDatabase "C:\Users\Pincus\Desktop\be.accdb"
 appAccess.Visible = -1

 

[rudolfelizabeth]

Hi PWise tried your code as follows without succes
Private Sub Command23_Click()
Dim appAccess As Access.Application
Set appAccess = CreateObject("Access.Application")
appAccess.OpenCurrentDatabase "C:\Users\Rudolf\Desktop\Signinfo\playitmovie"
appAccess.Visible = -1

End Sub

 

[rudolfelizabeth]

Hi Pwise I forgot the extention accde
Private Sub Command23_Click()
Dim appAccess As Access.Application
Set appAccess = CreateObject("Access.Application")
appAccess.OpenCurrentDatabase "C:\Users\Rudolf\Desktop\Signinfo\playitmovie.accde"
appAccess.Visible = -1

End Sub
It error message appAcess .Vissible wrong code