AdoQuery 连接数据库的问题

Question

各位delphi爱好者，我是一位新手，我编了一个登录窗口
我用AdoQuery 连接Access数据库，我编好程序后拿到另一台
机子上试用，出错提示（“找不到F:\data.mdb数据库”）请帮忙解决。

Answer 1

把数据库考过去. 还不行 装 MDAC

Answer 2

我把数据库拷过去了还是不行，你提到的MDAC是什么呀？

Answer 3

try
  TempS := extractfilepath(Application.ExeName)+'DataBase\name.mdb';
  form1.ADOConn .ConnectionString :=
  'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source='+ TempS +
  ';Jet OLEDB:Database Password=1111';
  form1.ADOConn.Connected := false;
  form1.ADOConn.Connected := true;
  except
  Application.MessageBox('系統數據發現錯誤(號碼:RSGZ001),系統將自動關閉!'+#13+'請檢測數據庫連接是否正確!','錯誤:',mb_ok+MB_ICONERROR);
  Application.Terminate;
  end;

Answer 4

ADO的连接串试试这样写
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=E:\工程\test\DB\emis.mdb;Persist Security Info=False;Jet OLEDB:Database Password=1234
注意把数据库的路径和Password换掉

Answer 5

mdac
网上有下栽的驱动

Answer 6

你那连接路径有没有变？是不是和原来的一样？
用OPENDIALOG选择数据库路径也可以解决问题！
var
  Fname:string;
begin
   if OPENDIALOG.Exute then
      Fname:=OPENDIALOG.Fieldname;
  ADOConn.create;
  ADOConn.ConnectionString :=
  'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source='+ Fname+
  ';Jet OLEDB:Database Password=1111';
  ADOConn.Connected := false;
  ADOConn.Connected := true;
end;

Answer 7

ADOConn.ConnectionString :=
  'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source='+ Fname+
  ';Jet OLEDB:Database Password=1111';
可能有错！用复制方法就可以了，把路径改为Fname就可以了！
ADOConn.ConnectionString :=
  'Provider=Microsoft.Jet.OLEDB.4.0;User ID=Admin;Data Source='+ Fname+...

Answer 8

使用相对路径，
同时安装下MDAC

Answer 9

我在其他的机子安装程序都要装MDAC不是很麻烦吗？能有更好的解决办法吗？

Answer 10

数据库的路径错了。
用相对路径。
或在运行时生成 ConectionString 'Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+
ExtractFilePath(Application.Exename)
+'DB\emis.mdb;Persist Security Info=False;'

Answer 11

extractfiledir(Application.ExeName)
通过获取你的程序的执行路径来动态配置连接字符串，这样，你可以把你的程序copy到任何位置。

Answer 12

通过ttoth提供的方法，在本机上可以copy到任何位置，但移植到win98就不行了，是不是
要安装MDAC才可以？