请问delphi中怎么样才能把连接access数据库的路径改为相对路径,使编辑的软件可以在其他电脑上运行
连同数据库一起考入其他电脑,不必更改路径就可以直接运行。(目前状态是到其他电脑上运行显示mdb不是有效的连接路径)...
连同数据库一起考入其他电脑,不必更改路径就可以直接运行。(目前状态是到其他电脑上运行显示mdb不是有效的连接路径)
展开
展开全部
我经常都是加一个“Data Modul”存放ADO控件的,加入一个ADOConnection1,将“Data Modul”的Evenl中的“OnCreate”中加入代码;源代码如下:
procedure TDM.DataModuleCreate(Sender: TObject);
begin
constrtmp := ExtractFilePath(ParamStr(0)); //这里一定要用到这个;
con1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ constrtmp +'\Data\db.mdb;Persist Security Info=False';
con1.open;
end;
procedure TDM.DataModuleCreate(Sender: TObject);
begin
constrtmp := ExtractFilePath(ParamStr(0)); //这里一定要用到这个;
con1.ConnectionString := 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+ constrtmp +'\Data\db.mdb;Persist Security Info=False';
con1.open;
end;
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询