Delphi 动态连接ACCESS数据库,不需要设置ConnectionString 1

在DataModule里面编写它的DataModuleCreate 事件代码
procedure TDataModule2.DataModuleCreate(Sender: TObject);
var
  path:string;
begin
  path:=extractfilepath(paramstr(0));//注意你的ACCESS数据库必须和你的程序放在同一个文件夹里面,此代码是获得执行文件的路径
  ADOConnection1.ConnectionString:='Provider=Microsoft.Jet.OLEDB.4.0;Data Source='+path+'shujuku.mdb;Persist Security Info=true';
  try
    ADOConnection1.Open;
  except
    showmessage('CONNECTION ERROR.');
  end;
end;
阅读更多
想对作者说点什么? 我来说一句

DelphiXE直接访问MySQL的另一方法

2012年02月14日 126KB 下载

delphi连接ACCESS数据库

2010年07月13日 442B 下载

没有更多推荐了,返回首页

加入CSDN,享受更精准的内容推荐,与500万程序员共同成长!
关闭
关闭