请教，access2000+ado如何解决使用者安装目录与我开发目录不同的问题

Question

我用access2000+ado做了一个程序，打包到别的机子使用，是不是只能安装在与我开发时一样的目录？安装在别的目录为什么不行？（我猜是ado connection string设置的问题）那如何能实现让用户自由选择安装目录呢？

Answer 1

with ADOConnection1 do
  begin
    ConnectionString := 'Provider = MicroSoft.jet.OLEDB.4.0;'+
                        'Persist Security Info = False'+
                        'Data Source=D:\*.mdb;'+//数据库本地目录
                        'Mode = ReadWrite;'+
                        'Jet OLEDB:Database Password=*****;'// 加入密码
    Connected := True;//Open DataBase
  end;

Answer 2

ado connectionstring里面的文件直接使用相对路径就可以了，很简单。

Answer 3

请问，flyingkiller(大飞虫)，相对路径应该怎么使呀？
比如我的开发目录是：G:\决策支持系统\决策课程设计ADO，里面有一个access数据库叫mydb

Answer 4

如果程序在这个目录，数据库就是mydb.mdb

Answer 5

写到form的onshow事件里面
with ADOConnection1 do
  begin
    ConnectionString := 'Provider = MicroSoft.jet.OLEDB.4.0;'+
                        'Persist Security Info = False'+
                'Data Source='+ExtractFilePath(Application.ExeName)+'mydb.mdb;'
                        'Mode = ReadWrite;'+
                        'Jet OLEDB:Database Password=*****;'// 加入密码
    Connected := True;//Open DataBase
  end;