如何从一个数据库中打开另一个数据库?

young　发表于：2009-08-07 15:28:57 　

复制

比如我在运行数据库A

该如何写代码,才能关闭数据库A再打开数据B?

谢谢

Top

贺德才发表于：2009-08-07 16:13:32

绝对是可以的，但不知这样做有什么意义？

Top

young 发表于：2009-08-07 16:53:03

我要做个自动更新.

数据库A判断服务器是是否有新版本的数据库B,如果有拷贝新版数据库B覆盖掉本地的数据库B,

如果没有,直接运行数据库B.

Top

汪武龍发表于：2009-08-07 17:07:52

Dim strDB As String
strDB = CurrentProject.Path & "數據庫名及地址.mdb"

     Set appAccess = CreateObject("Access.Application")
    Set db = appAccess.DBEngine.OpenDatabase(strDB, False, False, ";PWD=這里為有密碼保護")
    appAccess.OpenCurrentDatabase strDB
    'appAccess.DoCmd.OpenForm "開啟初始表單"
    appAccess.Visible = True

Quit acQuitSaveNone

Top

总记录：3篇页次：1/1 9 1 :

Access交流中心

如何从一个数据库中打开另一个数据库?