Delphi中使用ADO连接带密码的Access

本文整理自网络，侵删。

 
 Delphi中使用ADO连接带密码的Access
 
var gDBConn:string;

try
self.ADOConnection1.Close;
//无密码连接方式 Password="";
//gDBConn:='Provider=Microsoft.Jet.OLEDB.4.0;Password="";Data Source=MyDB.mdb;Persist Security Info=True';
//有密码连接方式 Jet OLEDB:Database Password=delphi7;
gDBConn:='Provider=Microsoft.Jet.OLEDB.4.0;Jet OLEDB:Database Password=123456;Data Source='+ExtractFilePath(application.ExeName)+'MyDB.mdb;Persist Security Info=True';
self.ADOConnection1.ConnectionString := gDBConn;
self.ADOConnection1.Open;
except
//raise;
self.ADOConnection1.Close;
self.ADOConnection1.Free;
application.MessageBox('不能连接到数据库!','提示信息',64);
application.Terminate;
end; 

 

相关阅读 >>

Delphi webbrowser同时访问两个网址导致程序出错的解决办法

Delphi 鼠标拖动控件自由移动位置

Delphi splitstring 字符串分割成字符串组

Delphi复制文件夹内所有文件

Delphi fmx检查应用程序状态更改

Delphi 遍历fdquery1所有结果

Delphi 检查当前用户权限

Delphi 控制台程序获取系统信息

Delphi 之 tpagecontrol组件

Delphi编写涂鸦桌面的小程序

更多相关阅读请进入《Delphi》频道 >>

转载请注明出处：木庄网络博客 » Delphi中使用ADO连接带密码的Access