来源:CSDN作者:简单就是美 发布时间:2008-03-28 00:00:00


当发布一个使用 ADO 连接的应用程式时,研发者有时需要在应用程式里配置 ADO 的连接串。ADO 连接串既长又复杂。我常将他们存贮在注册表中。但是,假如我需要生成一个新的串,困难出现了。为解决这个问题,现推荐两种方式:
方法一:将连接字符串信息用UDL文档保存,程式读取UDL文档的信息,这样,您只需要更改UDL文档的内容,就能够完成连接字符串的更改。用记事本打开UDL文档,您会发现,他其实就是个ini配置文档。使用方法如下:
- 新建一个空白的文本文档
- 将文本文档改名为connect.udl
- 然后打开这个UDL文档,配置连接字符串
- 在程式中将刚才UDL文档信息传递给ADO组件的connectString 属性,DELPHI下的一个例子:
try ADOConnection1.Connected := FALSE; ADOConnection1.ConnectionString := ’FILE NAME=’+ExtractFilePath(ParamStr(0))+’connect.udl’; ADOConnection1.Provider := ExtractFilePath(ParamStr(0))+’connect.udl’; ADOConnection1.Connected := false; ADOConnection1.LoginPrompt := false; except exit; end;
方法二:使用AdoConEd 单元,步骤如下:
- 在 uses 语句中包含进 AdoConEd 单元。然后在应用程式需要触发 ADO 连接串编辑器的地方写入如下简单代码。
ADOConnection1.Close;
// calling EditConnectionString displays the dialog, and
// sets the ConnectString property to the resulting value.
if EditConnectionString(ADOConnection1) then begin
//display the resulting ADO Connect String, just for fun.
label11.caption := ADOConnection1.ConnectionString;
end; |
还没有关于此文章的相关评论!