ms-access - 在计算机上未安装 MS Access 的情况下使用 Excel 从 Access 中读取

Question

我编写了代码，使用 Excel 中的下拉列表提供的标准将两个表连接起来，然后将数据返回到电子表格上的特定位置(工作表上已经有标题)。

这在我的机器上和其他机器上使用 MS Access 的机器上都可以正常工作，但写这篇文章的目的是让那些在他们的机器上没有 MS Access 的人(同事)(他们中的大多数人)能够做到对数据库的简单查询。

当我们尝试在没有 MS Access 的机器上运行它时，我们收到错误消息

"Compile Error: Can't find project or library."

由于这在迄今为止具有 Access 的任何机器上都可以正常工作，但在其他机器上却不行，我想知道如果没有实际的 Access 软件，这是否不可能。任何帮助或见解将不胜感激。

Answer 1

您需要使用 ADO 和“jet”提供程序。这将允许您在没有安装 Access 权限的情况下查询 Access 数据库

set conn=Server.CreateObject("ADODB.Connection")
conn.Provider="Microsoft.Jet.OLEDB.4.0"
conn.Open "c:/webdata/northwind.mdb"

set objRecordset=Server.CreateObject("ADODB.recordset")
objRecordset.activeconnection = conn
objRecordset.source = "select * from table where field1 = 'asdf'"
objRecordset.open

'do you work here

objRecordset.close
conn.close