C++ Builder動態設定odbc數據源
2019-09-06 23:33:31
供稿：網友
本文以access為例
需要文件 odbcinst.h（bcb或vc的include目錄） odbccp32.dll（winntsystem32目錄） 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)
{
/ttry
/t{
/t/t application->initialize();
/t/t ansistring data,datapath,dbpath;
/t/t unsigned char temp[255];//接收轉化后的連接字符串
/t/t lpstr ch;//字符串指針相當于char *
/t/t datapath=getcurrentdir();//獲取當前目錄/t
/t/t data=datapath+"/test.mdb";//假定當前數據庫為test.mdb
/t/t dbpath="dsn=testdbq="+data+"defaultdir="+datapath+"";
/t/t //構造odbc連接字符串，test為數據源名，非法字符先用代替
/t/t
/t/t ch=dbpath.c_str();//將ansistring轉化為字符串
/t/t int i=0;
/t/t while(*ch!='')//查找并替換非法字符，并裝入字符數組
/t/t {
/t/t if(*ch=='')
/t/t *ch='';
/t/t temp=*ch;
/t/t ch++;
/t/t i++;
/t/t }
/t/t
/t/t if(::sqlconfigdatasource(null,odbc_add_sys_dsn,(lpstr)"microsoft access driver (*.mdb)",(lpstr)temp))//修改或添加數據源，如果成功，程序正常啟動
/t {
/t/t
/t/t application->title = "動態設定odbc數據源";
/t/t application->createform(__classid(tform1), &form1);
/t/t
/t/t application->run();
/t/t }
/t/t else
/t/t {
/t/t showmessage("數據庫設定失??！");
/t/t application->terminate();
/t/t }
/t}
/tcatch (exception &exception)
/t{
/t/t application->showexception(&exception);
/t}
/treturn 0;
}
