怎么动态连接数据库？

[sevenren]

我的程序里面现在有一个adoconnection控件，不过他的connectionstring属性是我在添加控件的时候直接设置的
现在我想做一个数据库连接文件conn.ini
里面包含了odbc数据源的连接信息，用户名，密码，数据源名称等
我的程序若是换了另外一个环境，用户名和密码改变了，直接从conn.ini中读取就行了
怎么去写这段程序啊？
能说的详细点么？

[CWYCN]

可以在登陆的窗口中放置一个编辑框，从中读取要连接的数据库名进行参数传递来实现。从文件中读也可以，只是把adoconnection的connectionstring用代码设定一下就行了。

[CWYCN]

另外，你用的是adoconnection控件，怎么下面有说设置odbc数据源，adoconnection控件访问数据库应该不是用odbc的方法吧，难道我记错了。

[真如实观]

请用UDL文件！不要用ini文件。如：
[oledb]
; Everything after this line is an OLE DB initstring
Provider=Microsoft.Jet.OLEDB.4.0;Data Source=BOOK.mdb;Persist Security Info=False

[叶子哟]

可以!
直接动态修改连接参数就行了

[comefirst]

ISQL=Provider=SQLOLEDB.1;Password=123456;Persist Security Info=True;User ID=sa;Initial Catalog=jwgl;Data Source=fang;Use Procedure for Prepare=1;Auto Translate=True;Packet Size=4096.
然后读取文件，取isql字段

[sevenren]

能够举一个具体的例子么
老出错！读文件的程序写不好

[lmxlj]

void __fastcall Tfrm_main::FormActivate(TObject *Sender)
{
AnsiString AppPath,sIniFilename;
int i,k;
char tem1[10],temp[100],temp1[100];
strcpy(tem1,"100");
GetProfileString("机器名","机器名",tem1,temp,50);
GetProfileString("数据库","数据库",tem1,temp1,50);
AnsiString ss,ss1;
ss = AnsiString(temp);
ss1 = AnsiString(temp1);
pcname = ss.Trim();
databasename = ss1.Trim();
Edit1->Text = ss;
Edit2->Text = ss1;
}
这个是直接对win.ini进行操作。不用自己建立INI文件了。
如果想自己建立的话。也用这个函数参数改下就好了。
对INI文件写操作的函数是：
BOOL WriteProfileString(LPCTSTR lpAppName,LPCTSTR lpKeyName,LPCTSTR lpString );

[lmxlj]

在运行上面的程序之前。得先把win.ini配置好。
在win.ini文件中写入
[机器名]
机器名=xlj
[数据库]
数据库=U8
运行下看看结果吧。

[lmxlj]

也可以在程序中用我说的INI写操作函数来写入：
WriteProfileString("数据库1","数据库1","u8");
WriteProfileString("机器名1","机器名1","xlj");

[aloneone]

我有个类似的问题标题是“如何动态配置数据库的访问引擎（aloneone）”
我出了50
欢迎大家也去出个主意