Question

是否可以从Access数据库中打开第二个Access数据库，并在第二个数据库中编辑查询？我知道你可以从另一个开放一个Access DB，但我不确定你是否可以用这种方式编辑查询。

如果有可能，有人可以向我展示一些示例代码吗？

Answer 1

使用OpenDatabase返回对远程数据库的DAO.Database引用。然后，您可以通过其QueryDefs集合访问已保存的查询。

以下是立即窗口中的示例：

set db = OpenDatabase("C:\share\Access\Database1.mdb")

Debug.Print db.QueryDefs("Query1").SQL
SELECT dbo_foo.bar, TypeName(bar) AS TypeOfBar
FROM dbo_foo;

db.QueryDefs("Query1").SQL = "SELECT d.bar, TypeName(d.bar) AS TypeOfBar" & vbcrlf & _
    "FROM dbo_foo AS d;"

Debug.Print db.QueryDefs("Query1").SQL
SELECT d.bar, TypeName(d.bar) AS TypeOfBar
FROM dbo_foo AS d;

db.close

在另一个DB中编辑查询

1 个答案: