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;
}
