Delphi 通用数据库连接文件(*.udl)方法
扫描二维码
随时随地手机看文章
一、右键---新建---文本文档,重命名为 connection.udl 。
二、双击打开 connection.udl 按提示操作配置数据库,选择本地或远程数据库,配置好后退出。
三、使用Delphi 控件TADOConnection连接代码:
form1的OnCreate事件如下
try
ADOC.Connected := false;
ADOC.ConnectionString := 'FILE NAME='+ExtractFilePath(ParamStr(0))+'/pymee.udl';
ADOC.Provider := ExtractFilePath(ParamStr(0))+'/pymee.udl';
ADOC.Connected := true;
except
showmessage('连接失败,请重新配置pymee.udl文件');
EXIT;
end;
四、如果你要把应用程序分发到局域网中使用,数据库服务器没有改变,直接复制应用程序就可以了,不用再配置connection.udl 文件。当在另外一个局域网中安装有不同名的数据库服务器时,右键用记事本打开connection.udl 文件,会看到:
[oledb]
; Everything after this line is an OLE DB initstring
Provider=SQLOLEDB.1;Persist Security Info=False;User ID=sa;Initial Catalog=jbdatabase0;Data Source=JIABAO9/JIABAO9
上面几行文件,这是新建connection.udl 文件,并配置好数据库后自动生成的代码。我默认的登录用户为sa,密码为空,数据库为bdatabase0,局域网数据库服务器名为JIABAO9/JIABAO9(IP:192.168.0.9),你可按照自己的实际环境进行配置。
五、不同的局域网数据库服务器,你只要修改配置connection.udl连接文件就可以了,不用修改Delphi代码,很方便哦。
六、故障处理:运行应用程序时,出现错误提示“无效的授权说明”,是因为前面我们已经新建了connection.udl 连接,现在只要把Delphi控件TADOConnection的属性ConnectionString值删除为空,这是静态连接数据库的字符串值,所以删除ConnectionString值后,再重新编译就可以了。