如何在程序开始就自动配置ODBC数据源(100分)

  • 主题发起人 主题发起人 wdsdragon
  • 开始时间 开始时间
W

wdsdragon

Unregistered / Unconfirmed
GUEST, unregistred user!
大家好,麻烦各位一点时间:
我已经知道如何自动配置ODBC数据源,各位大虾给的例子都是用一个按钮来实现,我想在project的开始就实现知道配置,可是不知道将代码放在什么位置,试了几次没成功,提示“未发现数据源并未指定数据源名称”,那应该放在哪个位置合适呢??谢谢!!!
 
放在INI文件里 。程序运行就读取数据从INI文件里。
 
像楼上说的,你把连接参数放ini文件,在生成数据连接的时候,把这些参数读出来建立数据连接。
 
怎么写?给个例子,好么?我也不会。
 
话题2627309的标题是: 关于INI文件! (30分)
分类:数据库-文件型 attempter (2004-05-25 18:08:00)
请教INI文件的创建及读写方法,我要用它来保存数据库连接的参数,
详细点,谢谢!

zurich (2004-05-25 18:28:34)
----------------------新建一个ini文件 ,说白了就是 txt 文件,扩展名改成 ini[DateBase]
DatebaseName =SMSCenter
UserName =sa
PassWord =sa
DataSource =192.168.0.2
SavePassWord =True
-------------------------------------------------
--------------读 ini 文件------------------------
IniFilename := ExtractFilePath(paramstr(0))+'SHFY.ini';
SiniFile := TiniFile.create(Inifilename);
DatebaseName := SiniFile.readstring ('DateBase','DatebaseName','');
UserName := SiniFile.readstring ('DateBase','UserName','');
PassWord := SiniFile.readstring ('DateBase','PassWord','');
DataSource := SiniFile.readstring ('DateBase','DataSource','');

-----------------------读完文件之后的链接----------------------
adoquery1.ConnectionString := 'Provider=SQLOLEDB.1;Password='+ PassWord +';Persist Security Info=True;User ID=' + UserName +';Initial Catalog='+DatebaseName+';Data Source='+DataSource;


czcn (2004-05-25 18:29:40)
取自delphi的帮助
uses IniFiles;
procedure TForm1.FormActivate(Sender: TObject);
var
AppIni: TIniFile;
begin
AppIni := TIniFile.Create('WIN.INI');
AppIni.ReadSections(ListBox1.Items); //读取节点,也就是[..]内的DD
AppIni.ReadSection('Ports',Listbox2.Items); //读取ports节点下的所有=前的部分
AppIni.ReadSectionValues('Ports',ListBox3.Items); //读取ports节点下的所有=后的部分
AppIni.Free;
end;

attempter (2004-05-25 20:10:59)
虽然我已经搞定了,但还是要感谢两位特别是zurich,你的答案简直跟我要做的一模一样.
 
现在基本上都不用ODBC了,用ADO吧。
 

Similar threads

S
回复
0
查看
3K
SUNSTONE的Delphi笔记
S
S
回复
0
查看
2K
SUNSTONE的Delphi笔记
S
D
回复
0
查看
2K
DelphiTeacher的专栏
D
后退
顶部