請問各位大大: 如何利用程式修改ODBC的DSN,驅動程式是Microsoft Access 2000,Database=test.mdb SQLConfigDataSource如何寫啊

http://delphi.ktop.com.tw/topic.php?TOPIC_ID=21498 --- 每個人都是一本書

謝謝大大: 但是我的程式不能執行ㄝ,出現[Linker Error] Unresolved external 'SQLConfigDataSource' referenced from D:\BORLAND\CBUILDER5\PROJECTS\VCLTEST\UNIT1.OBJ 錯誤ㄝ 我是要改變ODBC的Access database名稱,由test2.mdb改為test1.mdb SQLConfigDataSource(0, 2,"Microsoft Access Driver (*.mdb)","DSN=MS Access Database;Driver=ODBCJT32.DLL;DBQ=C:\\windows\\desktop\\TEST.mdb;DefaultDir=C:\;Description=;FIL=MS Access;UID=;");

若是你的 odbc 已存在的話, 建議你可以使用修改 registry 的方式, 程式如下:

uses Registry;
//...
procedure TForm1.Button1Click(Sender: TObject);
var
  Reg: TRegistry;
  sODBC_NAME : string;
begin
  Reg := TRegistry.Create;
  sODBC_NAME := 'myodbc'; //你的 odbc name
  try
    Reg.RootKey := HKEY_LOCAL_MACHINE;
    if Reg.OpenKey('\Software\ODBC\ODBC.INI\' sODBC_NAME, True) then
  begin
      //showmessage(Reg.ReadString('DBQ'));
      Reg.WriteString('DBQ', StringReplace(Reg.ReadString('DBQ'), 'test2.mdb', 'test1.mdb', [rfReplaceAll, rfIgnoreCase]));
      Reg.CloseKey;
    end;
  finally
    Reg.Free;
  end;
end;

謝謝大大: 修改了Registry 但是在odbc的資料管理員還沒有更正衣料來源 哪裡錯了ㄋ

引言: 謝謝大大: 但是我的程式不能執行ㄝ,出現[Linker Error] Unresolved external 'SQLConfigDataSource' referenced from D:\BORLAND\CBUILDER5\PROJECTS\VCLTEST\UNIT1.OBJ 錯誤ㄝ 我是要改變ODBC的Access database名稱,由test2.mdb改為test1.mdb SQLConfigDataSource(0, 2,"Microsoft Access Driver (*.mdb)","DSN=MS Access Database;Driver=ODBCJT32.DLL;DBQ=C:\\windows\\desktop\\TEST.mdb;DefaultDir=C:\;Description=;FIL=MS Access;UID=;");

在 Delphi 內得自己宣告 SQLConfigDataSource 我想您那個錯誤應該是在 C 兄也得自己宣告吧! 至於怎麼宣告嘛! 小弟不會 C . --- 每個人都是一本書

引言: 修改了Registry 但是在odbc的資料管理員還沒有更正衣料來源

弟試過沒有問題啊.. 更新 registry 後確實是會更新進odbc中沒有問題, 會不會是你先連入資料庫後才修改 registry , 這樣不會馬上變成新的資料庫, 必須將 TADOConnection 或 TDatabase 斷線後重連才會用新的設定連接哦