【发布时间】:2015-10-28 13:15:04
【问题描述】:
我在尝试链接到 Microsoft Access 2013 数据库的程序时遇到问题。在程序中,我在将数据库链接到 Delphi 的单元中有以下代码:
unit udbSrc;
interface
Uses DB, ADODB, Forms;
Var DBDataBase : TADOQuery;
Procedure OpenDB;
implementation
Procedure OpenDB;
Begin
DBDataBase := TADOQuery.Create(Application);
DBDataBase.ConnectionString := 'Provider=Microsoft.ACE.OLEDB.12.0;Data Source=' + '''DataBase.accdb'';Persist Security Info=False';
end;
end.
在主单元中,单击一个按钮,我有以下代码:
DBDataBase.Close;
DBDataBase.SQL.Text := 'Select * From tblPlayerInfo';
DBDataBase.ExecSQL;
DBDataBase.Open
DBDataBase.First;
当我单击按钮时,程序没有运行并显示以下错误消息:
找不到提供程序。它可能没有正确安装。
它识别出这行代码中的错误:
DBDataBase.ExecSQL;
我已经研究并下载并安装了AccessDatabaseEngine_x64,但没有任何效果。如果有人可以请提出解决方案。
【问题讨论】:
-
在我看来您正在向数据源添加引号,这在连接字符串 connectionstrings.com/access 中并不常见
-
@Fionnuala 在以前安装了 MS Access 2010 的计算机上的程序中,我使用了完全相同的连接字符串,唯一的区别是而不是说:DBDataBase.ConnectionString := 'Provider=Microsoft.ACE。 OLEDB.12.0;数据源='+'''DataBase.accdb'';Persist Security Info=False';我会说 DBDataBase.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source=' + '''DataBase.mdb'';Persist Security Info=False';结束;
-
您必须安装 32 位版本的 ACE。顺便说一句,您不应该将
ExecSQL与'SELECT'语句一起使用。使用Open。 -
@kobik 谢谢。问题在于我运行的是 64 位版本的 ACE,而我应该运行的是 32 位版本。
标签: delphi delphi-7 ado ms-access-2013