#import "C:\Program Files\Common Files\System\ado\msado20.tlb" ////////////连接数据库//////////////
HRESULT hr;
try
{
hr = m_pConnection.CreateInstance("ADODB.Connection");///创建Connection对象
if(SUCCEEDED(hr))
{
hr = m_pConnection->Open("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=table.mdb","","",adModeUnknown);///连接数据库
///上面一句中连接字串中的Provider是针对ACCESS2000环境的 }
}
catch(_com_error e)///捕捉异常
{
CString errormessage;
errormessage.Format("连接数据库失败!\r\n错误信息:%s",e.ErrorMessage());
AfxMessageBox(errormessage);///显示错误信息
return FALSE;

////在要用的地方
_RecordsetPtr m_recordset;
_ConnectionPtr m_connection;
//上两行可以放在头文件中
_variant_t sql="select * from "+m_tableName;
//创建记录集
try
{
m_recordset.CreateInstance("ADODB.Recordset");
m_recordset->Open(sql,_variant_t((IDispatch*)theApp.m_pConnection,true),adOpenStatic,adLockOptimistic,adCmdText);
}
catch(_com_error e)///捕捉异常
{
AfxMessageBox("读取数据库失败!");///显示错误信息
}
//接下来就可以操作数据了。比如插入 _variant_t data="test";
m_recordset->AddNew();
m_recordset->PutCollect("test",data);
         m_recordset->update();
//最后在退出的地方
         m_recordset->close;