vc下动态创建access数据库的实现

本文描述如何在VC下动态创建access数据库(mdb)文件，方法是用ADO和ADOX来操作数据库,操作环境为winxp/VC6.0/ACCESS2000。具体方法如下。　　

使用ADO前必须在工程的stdafx.h文件最后用直接引入符号＃import引入ADO库文件，以使编译器能正确编译。代码如下：
#import "C:/Program Files/common files/system/ado/msado15.dll" no_namespace rename("EOF","adoEOF")
　　ADO类的定义是作为一种资源存储在ADO DLL(msado15.dll）中，在其内部称为类型库。类型库描述了自治接口，以及C＋＋使用的COM vtable接口。当使用＃import指令时，在运行时Visual C＋＋需要从ADO DLL中读取这个类型库，并以此创建一组C＋＋头文件。这些头文件具有.tli 和.tlh扩展名，读者可以在项目的目录下找到这两个文件。在C＋＋程序代码中调用的ADO类要在这些文件中定义。
　　程序的第三列指示ADO对象不使用名称空间。在有些应用程序中，由于应用程序中的对象与ADO中的对象之间可能会出现命名冲突，所以有必要使用名称空间。如果要使用名称空间，则可把第三行程序修改为： rename_namespace("AdoNS")。第四行代码将ADO中的EOF(文件结束)更名为adoEOF，以避免与定义了自己的EOF的其他库冲突。 这里直接引用一程序当中的一个函数作为例子来说明。

BOOL CConvertmdbDlg::Createmdb()
{
WIN32_FIND_DATA fd;
HANDLE hFind = FindFirstFile(m_mdbpath, &fd);
if (hFind != INVALID_HANDLE_VALUE)
return TRUE;

::CoInitialize(NULL);
HRESULT hr = S_OK;

try
{
ADOX::_CatalogPtr pCatalog = NULL;
hr = pCatalog.CreateInstance(__uuidof (ADOX::Catalog));

if(FAILED(hr))
{
_com_issue_error(hr);
}
else
{
pCatalog->Create(_bstr_t(m_strconn)); //Create mdb
}
//Create table
m_pConn.CreateInstance(__uuidof(Connection));
m_pConn->Open(_bstr_t(m_strconn), "", "", adConnectUnspecified);

_variant_t RecordsAffected;
CString strSql;
BSTR bstrSQL;

strSql = _T("CREATE TABLE AXISSave(ID INTEGER,X_Axis REAL,/
Y_Axis REAL,TestResult INTEGER)");
bstrSQL = strSql.AllocSysString();
m_pConn->Execute(bstrSQL, &RecordsAffected, adCmdText);
}
catch(_com_error &e)
{
AfxMessageBox(e.ErrorMessage());

m_pConn = NULL;
::CoUninitialize();
return FALSE;
}

m_pConn->Close();

m_pConn = NULL;
::CoUninitialize();

return TRUE;
}

看如下语句

ADOX::_CatalogPtr pCatalog = NULL;
hr = pCatalog.CreateInstance(__uuidof (ADOX::Catalog));

if(FAILED(hr))
{
_com_issue_error(hr);
}
else
{
pCatalog->Create(_bstr_t(m_strconn)); //Create mdb
}

上面就是动态创建mdb文件的语句，其中m_strconn为如下格式的字符串，比如：

pCatalog->Create(_bstr_t("Provider=Microsoft.JET.OLEDB.4.0;Data source=C://test.mdb"));

将在C盘跟目录下创建一个test.mdb文件

strSql = _T("CREATE TABLE AXISSave(ID INTEGER,X_Axis REAL,/
Y_Axis REAL,TestResult INTEGER)");
bstrSQL = strSql.AllocSysString();
m_pConn->Execute(bstrSQL, &RecordsAffected, adCmdText);

上面语句就是动态创建test.mdb数据库中表的核心语句，它是利用Connection对象的Execute方法来执行SQL命令

上面例子创建一个名为AXISSave，字段分别为ID,X_Axis,Y_Axis,TestResult的表，注意不能创建字段index

创建之后就可以利用ADO库三个智能指针:_ConnectionPtr、_CommandPtr和_RecordsetPtr进行数据库的操作