2012-07-25 80 views
3

我把我的数据库拆分成一个包含数据表的后端和一个包含表单,查询,报表和模块的前端,并将这些表链接起来。其中一个表格从excel表单中获取数据;通常我会使用一个链接表,但是如果有任何查询打开,那么Excel工作表不能打开,所以我使用保存的导入工具将所有数据从Excel工作表中拉出。如何从前端执行访问数据库后端的VB代码?

现在,我想添加一个按钮到我的前端运行DoCmd.RunSavedImportExport "savedimportnamehere"的菜单上,除了保存的导入位于后端,所以我必须将该命令发送到后端...并且我'我不太清楚该怎么做。如果任何人都能指出我正确的方向,我会很感激。

回答

4

您可以对MS Access实例运行命令,因此:工作就像一个

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

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

你也可以对数据库或连接的实例运行查询魅力!感谢您及时的回复 :) – 2012-07-25 18:53:07

相关问题