請問大家，因為我的USER數太多，每一台電腦都需要設定ODBC的dsn, 想請問一下是否可以用程式的方式動態的新增一項DSN,而不用一台一台的設定? 謝謝!!

參考: 1.用 SQLConfigDataSource 這個 API: http://delphi.ktop.com.tw/topic.php?topic_id=128 2.用 registry(Miles 大大的回答):  如何動態建立ODBC Alias (SQL Server) http://forum.vclxx.org/topic.php?TOPIC_ID=7762&FORUM_ID=9&CAT_ID=2&Topic_Title=%A6p%A6%F3%B0%CA%BAA%AB%D8%A5%DFODBC+Alias+%28SQL+Server%29&Forum_Title=WinAPI    如何遠端更動Registry 資料  http://forum.vclxx.org/topic.php?TOPIC_ID=9319&FORUM_ID=3&CAT_ID=2&Topic_Title=%A6p%A6%F3%BB%B7%BA%DD%A7%F3%B0%CARegistry+%B8%EA%AE%C6&Forum_Title=Misc    -- 歡迎光臨 KTop 研究院!

不好意思，插個花: 寒自己一下，小弟王婆賣瓜，也請看看這篇 >人生在勤，不索何獲 <>業精於勤荒於嬉，行成於思毀於隨 <>臨淵羡魚不如退而結網

------
人生在勤，不索何获？

再插一束花，我可是花匠哦，哈哈 打開註冊表編輯器，在<>>中存放著安裝了的>>的各個鍵中，鍵名是驅動程式名稱(如>>(>>的鍵值，一般爲<>">。系統>>中，在 class="code"> procedure TForm1.Button1Click(Sender: TObject); var reg: TRegistry; bData: array[0..1] of byte; begin reg := TRegistry.Create; with reg do begin RootKey := HKEY_LOCAL_MACHINE; OpenKey('Software\ODBC\ODBC.INI\ODBC Data Source',True); WriteString('test_access','Microsoft Access Driver(*.mdb)'); OpenKey('Software\ODBC\ODBC.INI\test_access',True); WriteString('DBQ','C:\test.mdb'); WriteString('Description','利用code建立ODBC Access資料源'); WriteString('Driver','C:\winnt\system32\odbcjt32.dll'); WriteString('DriverId',25); WriteString('FILE','Ms Access;'); WriteString('SafeTransaction',0); WriteString('UID',''); bData[0] := 0; WriteBinaryData('Exclusive',bData,1); WriteBinaryData('ReadOnly',bData,1); OpenKey('Software\ODBC\ODBC.INI\test_access\Engines\Jet',True); WriteString('ImplicitCommitSync','Yes'); WriteInteger('MaxBufferSize',512); WriteInteger('PageTimeout'10); WriteInteger('Threads',3); WriteString('UserCommitSync','Yes'); CloseKey; Free; end; end; 世間本無沙漠，我每想KTop一次，上帝就落下一粒沙，從此便有了撒哈拉！ ================================= <>人生在勤，不索何獲 <>業精於勤荒於嬉，行成於思毀於隨 <>臨淵羡魚不如退而結網

------
人生在勤，不索何获？