how to connect to other access datbase

[rahul2310]

When we want to connect to database we simply write

set db= current db
 

What if i want to connect to other access database

[zmbd]

Dim zdb as DAO.Database
set zdb = Opendatabase( [full path and name of file] )
 

Will work for Access databases.
There are various other methods for connecting to MySQL, SQLServer, ORACLE, etc...

[ADezii]

You can also use the OpenCurrentDatabase() Method to open an external Access Database via Automation, but within the context of the Current Database.

1. The following Code Sample will Open an Access Database within the Current DB, Open a Form from that DB, then Close it at some point.
   

   '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
    

[zmbd]

rahul2310
FYI:

----------

application.opencurrentdatabase method (access)
office 2010

don't confuse the opencurrentdatabase method with the activex data objects (ado) open method or the data access object (dao) opendatabase method. The opencurrentdatabase method opens a database in the microsoft access window. The dao opendatabase method returns a database object variable, which represents a particular database but don't actually open that database in the microsoft access window.

----------