VC++下使用ADO访问Access数据库完整篇

VC++下使用ADO访问Access数据库完整篇2009年10月18 | 分类: 编程开发 | 3 条评论 | 标签: Visual Studio这次先整理一下ADO的全套流程方便有类似需求的网友参考。

实际上，根据天缘的经验，接口类编程只需要遵守人家的约定就可以了，很多做软件的网友也都是忙的很，没有时间一一深究。

1、在StdAfx.h中引入ADO类支持方法是在StdAfx.h中增加下面两句话：#include <comdef.h>//如果需要则添加本句#import "c:\program files\common files\system\ado\msado15.dll"no_namespace rename ("EOF", "adoEOF")2、初始化COM环境在MFC中可以用AfxOleInit()或CoInitialize(NULL)，该函数一般放在InitInstance()历程里。

非MFC使用用CoInitialize(NULL)。

卸载COM环境使用CoUnInitialize()，一般放在主程序的析构函数里。

这样我们就会三个指针可用：_ConnectionPtr、_RecordsetPtr和_CommandPtr，分别代表：_ConnectionPtr接口返回一个记录集或一个空指针，通常使用它来创建一个数据连接或执行一条不返回任何结果的SQL语句，对于要返回记录的操作通常使用_RecordserPtr来实现。

而用 _ConnectionPtr操作时要想得到记录条数得遍历所有记录，用_RecordserPtr则不需要。

_RecordsetPtr指针是一个记录集对象。

可以对记录集提供了更多的控制功能。

它不一定要使用一个已经创建的数据连接，可以用一个连接串代替连接指针赋给 _RecordsetPtr的connection成员变量，让它自己创建数据连接。

如果你要使用多个记录集，最好的方法是使用已经创建了数据库连接的全局_ConnectionPtr接口，然后使用_RecordsetPtr执行存储过程和SQL语句。

_CommandPtr指针接口返回一个记录集。

CommandPtr提供了一种简单方法来执行返回记录集的存储过程和SQL语句。

可以利用全局 _ConnectionPtr接口，也可以在_CommandPtr接口里直接使用连接串。

一次或少量数据库访问操作，一般是直接使用连接串，如果需要频繁访问数据库，涉及返回多个记录集，那么，建议同_RecordsetPtr用法一样，使用全局数据库连接后，再使用_CommandPtr 接口执行存储过程和SQL语句。

各指针的定义方法：_ConnectionPtr m_pConnection;_RecordsetPtr m_pRecordset;_CommandPtr m_pCommand;3、连接、关闭数据库1、连接数据库示例连接ACCESS，以昨天的FavorMan为例。

::CoInitialize(NULL);//数据库操作前先初始化COM环境CString strSQL; //配置初始连接串strSQL="Provider=Microsoft.Jet.OLEDB.4.0;DataSource=blogurl.mdb;";strSQL=strSQL+"Provider=Microsoft.Jet.OLEDB.4.0;"+"DataSource=blogurl.mdb;"+"Jet OLEDB:Database Password="+//str为上面读到数据库路径信息! DB_PASSWRD_STRING+";"+"Persist Security Info=False;"; //注意一定需要输入四个\\\\才能表示"\\"//如果单独输入，必须形式为"\\\\Abc\\db\\blogurl.mdb"格式!//--连接数据库-----------------HRESULT hr;try{hr = m_pConnection.CreateInstance("ADODB.Connection");///创建Connection对象if(SUCCEEDED(hr)){hr =m_pConnection->Open((_bstr_t)strSQL,"","",adModeUnknown);///连接数据库///上面一句中连接字串中的Provider是针对ACCESS2000环境的，对于ACCESS97,需要改为:Provider=Microsoft.Jet.OLEDB.3.51; }}}catch(_com_error e)///捕捉异常{CString errormessage;errormessage.Format("连接数据库失败!\r\n错误:%s!",e.ErrorMessage());AfxMessageBox(errormessage);///显示错误信息return FALSE;}2、关闭数据库if( m_pConnection->State )//如果连接有效m_pConnection->Close();m_pConnection = NULL;4、数据库访问_RecordsetPtr m_pRecordset;m_pRecordset.CreateInstance("ADODB.Recordset");try{//打开数据库m_pRecordset->Open("SELECT * FROM BlogUrl",m_pConnection.GetInterfacePtr(),//或使用_variant_t((IDispatch*)theApp.m_pConnection,true),，但需要extern声明theApp;adOpenDynamic,adLockOptimistic,adCmdText);//遍历读取while(!m_pRecordset->adoEOF)//adoEOF判断数据库指针是否已经到结果集末尾；BOF判断是否在第一条记录前面{vID =m_pRecordset->GetCollect("ID");//这里已经读到当前记录的ID，需要进行非空等判断，非空之后就可以处理，比如添加到列表框等。

//....m_pRecordset->MoveNext();}m_pRecordset->Close();//关闭记录集}catch(_com_error error){CString errorMessage;errorMessage.Format("%s",(LPTSTR)error.Description()); AfxMessageBox(errorMessage);}取得某字段的值有两种办法，一种是指定该字段名，另一种是指定该字段的ID 编号，从0开始。

假设上文的ID是从0开始，那么可以采用：m_pRecordset->GetCollect(_variant_t(long(0));也可以采用：pRecordset->get_Collect("ID");其它索引值读取类似处理。

附一些常用的执行语法：1、添加记录a、调用m_pRecordset->AddNew();b、调用m_pRecordset->PutCollect("ID",vID);给ID字段赋值c、调用m_pRecordset->Update();//确认并刷新入库2、修改记录方法类似添加记录，只是起初按照查询指定记录打开接口，比如SELECT * FROM ulist where ID=%d形式，不需要m_pRecordset->AddNew();，直接使用PutCollect("ID",vID)。

3、删除记录删除记录只需要把记录指针移动到要删除的记录上,然后调用m_pRecordset->Delete(adAffectCurrent)移动到指定记录上也有两种方法，一种直接使用查询指定记录（需要唯一字段）方式定位，另一种是使用Move(index)方式。

下面例子是使用Move方式到指定记录。

try{m_pRecordset->MoveFirst();//如果是采用SELECT * FROM ulist where ID=5方式打开数据库连接则不需要本句m_pRecordset->Move(5);//假设删除第5条记录，如果是采用SELECT * FROM ulist where ID=5方式打开数据库连接则不需要本句m_pRecordset->Delete(adAffectCurrent);m_pRecordset->Update();}catch(_com_error error){CString errorMessage;errorMessage.Format("%s",(LPTSTR)error.Description());AfxMessageBox(errorMessage);}4、_CommandPtr用法参考a、_CommandPtr指针初始化m_pCommand->ActiveConnection = m_pConnection;// 将库连接赋于它，或单独再创建也可以，根据实际需要定m_pCommand->CommandText = "SELECT * FROM BlogUrll";b、_CommandPtr与_RecordsetPtr配合读取记录集m_pRecordset = m_pCommand->Execute(NULL, NULL,adCmdText);//执行SQL语句，返回结果记录集c、直接使用_ConnectionPtr执行SQL语句m_pConnection->Execute( _bstr_t CommandText,VARIANT * RecordsAffected,long Options )例如：m_pConnection->Execute("UPDATE BlogUrl SET ID= 1 WHERE ID =5",&RecordsAffected,adCmdText);5、遍历数据库中所有表名m_pRecordset = m_pConnect->OpenSchema(adSchemaTables);while(!(m_pRecordset ->adoEOF)){_bstr_t tblname =m_pRecordset->Fields->GetItem("TABLE_NAME")->Value;//获取表格_bstr_t tbltype =m_pRecordset->Fields->GetItem("TABLE_TYPE")->Value;//获取表格类型//这里可以对表格类型进行判断，判断后即可处理tblnameif (!strcmp(tbltype ,"TABLE")){AfxMessageBox(tblname);}m_pRecordset->MoveNext();}m_pRecordset->Close();6、遍历一个表中的所有字段//方法1：m_pRecordset = m_pConnect->OpenSchema(adSchemaColumns);while(!(m_pRecordset ->adoEOF)){_bstr_t colname =m_pRecordset->Fields->GetItem("COLUMN_NAME")->Value;//获取字段名AfxMessageBox(colname);m_pRecordset->MoveNext();}m_pRecordset->Close();//方法2：FieldsPtr pFields = NULL;HRESULT hr = m_pRecordset->get_Fields (&pFields);//得到记录集的字段集if(!SUCCEEDED(hr)) return;int iColCount;pFields->get_Count(&iColCount);//字段总数BSTR bstrColName;for(int i=0;i<iColCount;i++)//按记录集的各字段循环{//pFields->GetItem(_variant_t(i))->get_Name(&bstrColName);pFields->Item(_variant_t(i))->get_Name(&bstrColName);//获得字段名字CString csName=bstrColName;//pField->Item[i]->get_Type(&fType);//获取字段类型//pField->Item[i]->get_DefinedSize(&lSize);//获得字段的大小AfxMessageBox(csName);}if(NULL != hr)tblfields ->Release();//释放指针7、常用数据格式转换_variant_t var;BSTR bvar;CString csVar;_bstr_t bstr;_variant_t 转化为long型： (long)var;_variant_t转化为 CString型： csVar= (LPCSTR)_bstr_t(var);CString转化为_variant_t型： _variant_t(csVar);或(LPTSTR)(LPCTSTR)csVar;CString转化为BSTR型： bvar= csVar.AllocSysString(); BSTR转化为CString型：csVar= (LPCSTR)bvar;CString转化为_bstr_t型： bstr = (_bstr_t)csVar;_bstr_t 转化为CString型：csVar= (LPCSTR)bstr;。