delphi - 使用带有 MS Access 的 TADODataset 组件时出错

Question

我正在尝试用 MS Access DB 替换 InterBase DB 作为测试，我正在使用 TADOConnection 组件成功连接到 MS Access DB；但是，当我尝试使用 TADODataset 连接到表时，我可以将 Connection 属性设置为 TADOConnection 组件，但是当我想设置 CommandText 属性时，我收到以下错误：

连接字符串如下：Provider=ADsDSOObject;User ID=admin;Encrypt Password=False;Data Source=C:\StudyTime\StudyTime.accdb;Mode=Read;Bind Flags=0;ADSI Flag=-2147483648;

有人可以帮助我吗？

Answer 1

您使用了错误的提供程序：ADsDSOObject用于 ms-access。

使用Provider=Microsoft.Jet.OLEDB.4.0或Provider=Microsoft.ACE.OLEDB.12.0;代替。

例如

MdbFileName := 'C:\StudyTime\StudyTime.accdb';
ADOConnection1.ConnectionString := Format('Provider=Microsoft.Jet.OLEDB.4.0;Data Source=%s;', [MdbFileName]);
ADOConnection1.Open;