C++ Builder動態設定odbc數據源

本文以access為例

需要文件 odbcinst.h（bcb或vc的include目錄）　odbccp32.dll（winnt\system32\目錄） implib.exe（通過dll生成lib庫） coff2omf.exe （將coff庫轉化為omf庫）

首先將上面文件拷貝到工程目錄，執行下面命令：

implib.exe odbccp32.lib odbccp32.dll

coff2omf odbccp32.lib

下面程序的功能為當應用程序啟動時，動態添加/修改一個指向當前目錄的,名為test的系統數據源。

新建一個工程,在工程主文件（含有winmain函數）中添加

#include <odbcinst.h>

uselib("odbccp32.lib");//lib在工程當前目錄

修改後的代碼如下;

//---------------------------------------------------------------------------
#include <vcl.h>
#include <odbcinst.h>
#pragma hdrstop
useform("main.cpp", form1);
//工程的其他單元申明.....
uselib("odbccp32.lib");
//---------------------------------------------------------------------------
winapi winmain(hinstance, hinstance, lpstr, int)
{
　　　　 try
　　　　 {
　　　　　　　　 application->initialize();
　　　　　　　　 ansistring　data,datapath,dbpath;
　　　　　　　　 unsigned char temp[255];//接收轉化後的連接字符串
　　　　　　　　 lpstr ch;//字符串指針相當於char *
　　　　　　　　 datapath=getcurrentdir();//獲取當前目錄
　　　　　　　　 data=datapath+"\\test.mdb\b";//假定當前數據庫為test.mdb
　　　　　　　　 dbpath="dsn=test\bdbq="+data+"defaultdir="+datapath+"\b\b";
　　　　　　　　　 //構造odbc連接字符串，test為數據源名，非法字符先用\b代替

　　　　　　　　 ch=dbpath.c_str();//將ansistring轉化為字符串
　　　　　　　　　 int i=0;
　　　　　　　　 while(*ch!='\0')//查找並替換非法字符，並裝入字符數組
　　　　　　　　 {
　　　　　　　　　 if(*ch=='\b')
　　　　　　　　　 *ch='\0';
　　　　　　　　　 temp[i]=*ch;
　　　　　　　　　 ch++;
　　　　　　　　　 i++;
　　　　　　　　 }

　　　　　　　　 if(::sqlconfigdatasource(null,odbc_add_sys_dsn,(lpstr)"microsoft access driver (*.mdb)\0",(lpstr)temp))//修改或添加數據源，如果成功，程序正常啟動
　　　　　　　 {

　　　　　　　　 application->title = "動態設定odbc數據源";
　　　　　　　　 application->createform(__classid(tform1), &form1);

　　　　　　　　 application->run();
　　　　　　　　 }
　　　　　　　　 else
　　　　　　　　 {
　　　　　　　　　 showmessage("數據庫設定失敗！");
　　　　　　　　　 application->terminate();
　　　　　　　　 }
　　　　 }
　　　　 catch (exception &exception)
　　　　 {
　　　　　　　　 application->showexception(&exception);
　　　　 }
　　　　 return 0;
}