[AccessD] Import Specifications

Randall R Anthony RRANTHON at sentara.com
Fri May 27 12:48:01 CDT 2005


Is this what your looking for Barbara?

 Dim acapp As Access.Application
    
   Set acapp = New Access.Application
   With acapp
    '
    'the db_paths are set in module mdlmain
      .OpenCurrentDatabase DB_PATH1
           'import the queries
      .DoCmd.TransferDatabase acImport, "Microsoft Access", DB_PATH2,
acModule, "m_module", "m_module"
      .DoCmd.TransferDatabase acImport, "Microsoft Access", DB_PATH2,
acQuery, "A_query", "A_query"
 End With
    'clean up
   acapp.Quit
   Set acapp = Nothing



More information about the AccessD mailing list