如何列举ODBC中所有的数据源(DSN)

[thinhorse]

我用Delphi的ADO控件打开数据库，要提供DSN,请问怎么列出odbc中所有的user dsn 和system dsn?

[qiubolecn]

注册表中

HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\ODBC Data Sources

还有就是

local_machine里的

[thinhorse]

如果不用注册表也不使用BDE,而像VC中一样使用SQLDataSources得到所有的数据源名称，Delphi有没有类似的方法。反正Delphi自己能列举出所有的dsn，faint......

[抱朴守拙]

还是读注册表的好:

HKEY_CURRENT_USER\Software\ODBC\ODBC.INI\ODBC Data Sources

还有就是

local_machine里的
HKEY_Local_machine\Software\ODBC\ODBC.INI\ODBC Data Sources

[jzr]

试试Session.GetAliasNames(stringlist)

[王集鹄]

^
Session.GetAliasNames(Memo1.Lines)

[thinhorse]

用到了session就用到了BDE. 看来只有把Boland公司的人拉来先奸后杀，再奸再杀了,hehe....

[3fly]

关注

[thygw]

其实最好还是利用读注册表的方法比较好些！

包括动态创建ODBC！

[NetCobra]

还是没有人说怎么列举……

[dansan]

var
Reg : TRegistry ;
Names : TStringList ;
begin
Reg := TRegistry.Create ;
try
Reg.RootKey = HKEY_LOCAL_MACHINE ;
if Reg.OpenKey('\Software\ODBC\ODBC.INI\ODBC Data Sources', true) then
begin
Names = Reg.GetValueNames ;
end ;
finally
Reg.Free ;
end ;
end ;