您的位置:首页 > 编程语言 > Delphi

在Delphi中如何创建和使用udl文件

2009-04-27 20:12 316 查看
如何在Delphi中创建和使用udl文件:
方法一:
直接弹出UDL对话框:
use
ADOConed;
EditConnectionString(ADOQuery1);

方法二:
⑴、右键---新建---文本文档,重命名为 connSet.udl 。
⑵、双击打开 connSet.udl 按提示操作配置数据库,选择本地或远程数据库,配置好后退出。
⑶、使用Delphi 控件TADOConnection连接代码:
在Form1的OnCreate事件如下

try
ADOC.Connected := false;
ADOC.ConnectionString := '';
ADOC.ConnectionString := 'FILE NAME='+ExtractFilePath(ParamStr(0))+'/connSet.udl';
ADOC.Provider := ExtractFilePath(ParamStr(0))+'/connSet.udl';
ADOC.Connected := true;
except
showmessage('连接失败,请重新配置connSet.udl文件');
EXIT;
end;


 try
ADOC.Connected := false;
ADOC.ConnectionString := '';
ADOC.ConnectionString := 'FILE NAME='+ExtractFilePath(ParamStr(0))+'/connSet.udl';
ADOC.Provider := ExtractFilePath(ParamStr(0))+'/connSet.udl';
ADOC.Connected := true;
except
showmessage('连接失败,请重新配置connSet.udl文件');
EXIT;
end;

⑷、如果你要把应用程序分发到局域网中使用,数据库服务器没有改变,直接复制应用程序就可以了,不用再配置connSet.udl 文件。当在另外一个局域网中安装有不同名的数据库服务器时,右键用记事本打开connSet.udl 文件,会看到:

[oledb]
; Everything after this line is an OLE DB initstring
Provider=SQLOLEDB.1;Persist Security Info=False;User ID=jfgl_sa;Initial Catalog=jfgl;Data Source=192.168.0.117
[oledb]
; Everything after this line is an OLE DB initstring
Provider=SQLOLEDB.1;Persist Security Info=False;User ID=jfgl_sa;Initial Catalog=jfgl;Data Source=192.168.0.117

上面几行文件,这是新建connSet.udl 文件,并配置好数据库后自动生成的代码。我默认的登录用户为jfgl_sa,密码为空,数据库为jfgl,局域网数据库服务器名IP:192.168.0.117,你可按照自己的实际环境进行配置。
⑸、不同的局域网数据库服务器,你只要修改配置connSet.udl连接文件就可以了,不用修改Delphi代码,很方便哦。
⑹、故障处理:如果运行应用程序时,出现错误提示“无效的授权说明”,是因为前面我们已经新建了connSet.udl 连接,现在只要把Delphi控件TADOConnection的属性ConnectionString值删除为空,这是静态连接数据库的字符串值,所以删除ConnectionString值后,再重新编译就可以了。
内容来自用户分享和网络整理,不保证内容的准确性,如有侵权内容,可联系管理员处理 点击这里给我发消息
标签: