When we want to connect to database we simply write
What if i want to connect to other access database
Code:
set db= current db
'Include the following in Declarations section of Module. Dim appAccess As Access.Application
'Initialize string to database path.
Const conPATH_TO_DB = "C:\Business\2013\Invoices.mdb"
'Create new instance of Microsoft Access.
Set appAccess = CreateObject("Access.Application")
'Open Database in Microsoft Access window.
appAccess.OpenCurrentDatabase conPATH_TO_DB
'Open Orders form.
appAccess.DoCmd.OpenForm "frmInvoices"
'Close the Database at some point appAccess.CloseCurrentDatabase
Comment