如何从前端访问数据库后端执行 VB 代码？答案

【问题标题】：How do I execute VB code on an access db backend from the frontend?如何从前端访问数据库后端执行 VB 代码？
【发布时间】：2012-07-25 18:48:24
【问题描述】：

我将我的数据库拆分为一个包含数据表的后端和一个包含表单、查询、报告和模块的前端，这些表是链接的。其中一张表从 Excel 表中获取数据；通常我会使用链接表，但是如果打开了任何查询，则无法打开 excel 表，因此我使用保存的导入将所有数据从 excel 表中提取到表中。

现在，我想在运行DoCmd.RunSavedImportExport "savedimportnamehere" 的前端菜单中添加一个按钮，但保存的导入在后端，所以我必须将该命令发送到后端...我不太确定该怎么做。如果有人能指出我正确的方向，我将不胜感激。

【问题讨论】：

【解决方案1】：

您可以针对 MS Access 实例运行命令，因此：

Dim apAccess As New Access.Application
apAccess.OpenCurrentDatabase ("c:\docs\backend.mdb")
apAccess.DoCmd.RunSavedImportExport "savedimportnamehere"

您还可以针对数据库或连接的实例运行查询：

sSQL="INSERT INTO Table1 ( ADate ) " _
& "SELECT SomeDate " _
& "FROM [Excel 8.0;HDR=YES;DATABASE=Z:\Docs\Test.xls].[Sheet1$a1:a4]"

【讨论】：