Delphi中用BDE连接ms access数据库总是出错?
用BDE链接msaccess数据库,在链接的时候总是出错,提示信息GeneralSQLerror-2147221164。我在网上搜了一下,有人说是DAO目录下的Dao35...
用BDE链接ms access数据库,在链接的时候总是出错,提示信息General SQL error -2147221164。
我在网上搜了一下,有人说是DAO目录下的Dao35.dll文件丢失所致,我的DAO目录下时dao360.dll,我的装的delphi是7.0,office是2003版,请高手指教,如何能使BED顺利链接access2003。 展开
我在网上搜了一下,有人说是DAO目录下的Dao35.dll文件丢失所致,我的DAO目录下时dao360.dll,我的装的delphi是7.0,office是2003版,请高手指教,如何能使BED顺利链接access2003。 展开
展开全部
你试试 ADO 呢?
//开始初始化数据库
if gConnLC<> nil then
begin
gConnLC.Free;
gConnLC:= nil;
end;
gConnLC:= TADOConnection.Create(nil);
gConnLC.KeepConnection:= True;
sPath:= ExtractFilePath(Application.ExeName) + 'db.mdb';
if FileExists(sPath) then
begin
//Access
with gConnLC do
begin
ConnectionString:= ' Provider=Microsoft.Jet.OLEDB.4.0;Data Source= ' + sPath + ';';
LoginPrompt:= False;
gConnLC.Open();
end;
end
else begin
MsgBox('本地数据库连接失败!', '提示', MB_OK + MB_ICONINFORMATION);
//Application.Terminate;
end;
//开始初始化数据库
if gConnLC<> nil then
begin
gConnLC.Free;
gConnLC:= nil;
end;
gConnLC:= TADOConnection.Create(nil);
gConnLC.KeepConnection:= True;
sPath:= ExtractFilePath(Application.ExeName) + 'db.mdb';
if FileExists(sPath) then
begin
//Access
with gConnLC do
begin
ConnectionString:= ' Provider=Microsoft.Jet.OLEDB.4.0;Data Source= ' + sPath + ';';
LoginPrompt:= False;
gConnLC.Open();
end;
end
else begin
MsgBox('本地数据库连接失败!', '提示', MB_OK + MB_ICONINFORMATION);
//Application.Terminate;
end;
展开全部
sjdfjsf
本回答被网友采纳
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
不要用BDE了, 直接用ADO, 不需要另外安装, 很方便!
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
建议采用ado。方便
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
展开全部
把loginPrompt属性设为false
已赞过
已踩过<
评论
收起
你对这个回答的评价是?
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询