拆分数据库后访问VBA错误

Question

我创建了一个Access数据库，它运行得很好。成功将数据库拆分为后端和前端后，我在本地共享驱动器和前端文件中共享了_be文件，我尝试运行前端，当宏执行时我收到错误：

我甚至把后端和前端放在我的本地机器中，但我仍然收到错误，我试图删除宏但仍然出错，因为我不是开发此应用程序的人。

Dim fdb As Database
Dim utab As Table, otab As Table
DBEngine.SystemDB = "System.mdw"
Set fdb = CurrentDb() 
Set utab = fdb.OpenTable("Users")
Set otab = fdb.OpenTable("Organization")

跟踪函数findorg()后发现此错误

  

在集合中找不到项目

对于这一行

Set utab = fdb.OpenTable("Users")

我尝试将代码更改为

Set utab = fdb.Rescordsets("Users")

但我仍然得到同样的错误。

请注意，我正在使用后端和前端，我已将所有表格链接起来。

Answer 1

“用户”表未在运行此代码的数据库中链接。再次链接并检查，检查所有应该链接的表。

Answer 2

我能够通过使用 DAO 3.6对象库解决问题，因为我发现当前的数据库应用程序正在使用 DAO 2.5 ，所以我重新编译了应用程序并且修复了所有错误。我还设法重命名宏调用的函数，我发现在宏编写调用函数时， findorg（）不起作用，但在函数名中我指定“findorg” 之间双引号，运行成功。