程序代码如下,
#include "sql.h"
#include <odbcinst.h>
#pragma comment( lib, "Odbccp32.lib" )
void CMyDlg::OnOK()
{
RETCODE retcode;
CString str, str1;
CFileFind finder;
BOOL bResult = finder.FindFile("通讯录.mdb");
if (bResult)
{
finder.FindNextFile();
str=(LPCTSTR) finder.GetFilePath();
str.Replace("//","");
str1=(LPCTSTR) finder.GetRoot();
tr1.Replace("//","");
str="DSN=通讯录;DBQ="+str+";DEFAULTDIR="+str1+";/0 ";
fxMessageBox("数据源安装成功!") ;
etcode = SQLConfigDataSource(NULL,
DBC_ADD_SYS_DSN,
"Microsoft Access Driver (*.mdb)/0",
str);
}
else
AfxMessageBox("无法找到数据源“通讯录.mdb”,请检查文件路径是否在本目录!") ;
}
将数据源文件放置程序目录下即可!