本文以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;
}