ADO数据库编程--总结
1、导入ADO动态链接库
在工程的stdafx.h中加入如下语句：
#import "C:\Program Files\Common Files\System\ado\msado15.dll"\
no_namespace rename("EOF", "adoEOF")
这一语句有何作用呢？
其最终作用同我们熟悉的 #include 类似，编译的时候系统会为我们生成msado15.tlh和ado15.tli两个C++头文件来定义ADO库，
即加载ADO动态库(msado15.dll)。
其中，no_namespace表明不使用命名空间，rename("EOF","adoEOF")表明把ADO中用到的EOF改为adoEOF，防止发生命名冲突。
注意：
该代码需要在一行中完成，如果写成两行或者多行，行末要加上“\”符号，表示把这几行看成一行，如本例。
// ---------------------------------------------------------------------------------------------------------------------------------
2、初始化OLE/COM库环境
在基于MFC的应用中初始化OLE/COM库环境的一个比较好的位置，是在应用程序类CXXXApp的InitInstance成员函数中直接调用AfxOleInit()，
而在退出应用时该函数也负责COM资源的释放，将此函数添加在InitInstance中的如下位置：
BOOL CExpApp::InitInstance() { AfxEnableControlContainer(); // 初始化OLE DLL
if (!AfxOleInit()) { AfxMessageBox(_T("初始化OLE DLL失败!")); return FALSE; } // 其他操作...
}
说明：
也可以在InitInstance中使用::CoInitialize初始化OLE/COM库环境，
但须在ExitInitInstance中使用::CoUninitialize释放占用的COM资源。
比较之下，显然是使用AfxOleInit更为方便。
// ---------------------------------------------------------------------------------------------------------------------------------
3、连接数据库
在Doc\View程序中，通常在应用程序类（CXXXApp）中进行数据库的连接。
具体操作如下：
1）声明一个Connection指针
_ConnectionPtr m_pConnection;
注：
ADO最重要的对象有三个：
连接对象（Connection）、命令对象（Command）和记录集对象（RecordSet）。
在使用这三个对象的时候，需要定义与之相对应的智能指针，分别为_ConnectionPtr、_CommandPtr、_RecordsetPtr。
由上述ConnectionPtr指针的使用步骤可知，和C++中的类指针使用方法一样，智能指针也要先定义指针变量、
创建其实例（实例化），然后就可以调用它的方法和属性。 不同的是，该智能指针最后是自动进行内存释放的。
所有的智能指针都是基于_com_ptr_t模板类的，该类封装了IUnknow接口的3个方法：QueryInterface、Addref和Release。
它具有自动计数的机制，即在构造对象时，自动为该对象计数加1。析构对象时，自动调用Release方法。
（即该类型的指针在使用后不需要手动释放内存）（但需要调用Close方法，关闭连接或者记录集）
所以智能指针会使代码更加简洁并且不易出错。
2）创建Connection对象
方法有如下两种：
m_pConnection.CreateInstance(__uuidof(Connection));
m_pConnection.CreateInstance("ADODB.Connection");
注意：
上面调用_ConnectionPtr接口指针的方法CreateInstance时，用的是"."而非"->"。
3）设置连接字符串，以便指定需要的连接
对应不同的数据库，其连接字库串有所不同：
3.1) 使用JET数据库引擎实现对Acess2000类型的数据库info.mdb的连接
CString strSQ L= "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=info.mdb;User ID=admin;Passward=;";
或者
CString strSQL = _T("Provider=Microsoft.Jet.OLEDB.4.0;Data Source=info.mdb;User ID=admin;Passward=;");
3.2) 使用OLE DB提供者实现对SQL Server的标准安全连接串
strConnect = _T("Provider=SQLOLEDB;Data Source=MyServerName;\
Initial Catalog=MyDateBaseName;\
User ID=MyUserName;Password=MyPassword;");
或者
strConnect = _T("Provider=SQLOLEDB;Server=MyServerName;\
Database=MyDateBaseName;\
Uid=MyUserName;Pwd=MyPassword;");
例程：
_bstr_t strConnect("Provider=SQLOLEDB;Server=MYSERVER;Database=MYDATADABE;Uid=sa;Pwd=12345678;");
m_pConnection->Open((_bstr_t)strSQL,"","",adModeUnknown);
或者, 是在此处不设置User ID和Password，而直接在Open函数的第2、3个参数中设置，这也可以。
_bstr_t strConnect("Provider=SQLOLEDB;Server=MYSERVER;Database=MYDATADABE;");
m_pConnection->Open((_bstr_t)strSQL,"sa","12345678",adModeUnknown);
注意：
上面设置连接字符串的时候，如果过长需要分行时，可用反斜杠"\"。
如果是本地服务器，则DataSource=local或本地服务器名均可。
若数据库没有设置密码，在连接字符串中可以将其省略，但User ID不能省。
若数据库和程序文件不在同一文件夹下，直接写数据库名即可，在InitialCatalog中不需加上该数据库的存储器地址。
3.3) 使用OLE DB提供者实现对远程SQL Server的标准安全连接串
strConnec t= _T("Provider=sqloledb;Network Library=DBMSSOCN;\
Data Source=130.120.110.001,1433;
Initial Catalog=MyDateBaseName;
User ID=MyUserName;Password=MyPassword;");
4）、使用m_pConnection的Open方法实现对数据库的连接
在ADO的操作中建议使用 try...catch( )来捕获错误信息，因为它有时会经常出现一些意想不到的错误
try { m_pConnection-> //...
m_pRecordSet-> //...
} catch(_com_error e) //捕捉异常
{ CString strError; strError.Format( "连接数据库发生异常! \r \n错误信息:%s", e.ErrorMessage( ) ); //显示错误信息
AfxMessageBox(errormessage); }
// ---------------------------------------------------------------------------------------------------------------------------------
4、关闭连接
一般重载App类的ExitInstace( )函数实现。
调用m_pConnection的Close方法关闭连接即可。
代码如下：
m_pConnection->Close( );
m_pConnection=NULL;
注意：
由于初始化COM库调用的是AfxOleInit，这种方法初始化COM库的优点就在于资源的释放也是自动进行的，所以不必担心资源泄漏的问题。
二、数据库操作 ADO库中包含的三个基本接口为： _ConnectionPtr接口、_CommandPtr接口、_RecordsetPtr接口。
// ---------------------------------------------------------------------------------------------------------------------------------
1、_ConnectionPtr接口
该接口返回一个记录集或一个空指针。
通常用它来创建一个数据库连接，或执行一条不返回任何结果的SQL语句，如一个存储过程。
不推荐使用_ConnectionPtr接口返回一个记录集，对于要返回记录集的操作通常用_RecordsetPtr来实现。
而且使用_ConnectionPtr时要想得到记录数目必须遍历所有记录，但使用_RecordsetPtr时则不需要。
// ---------------------------------------------------------------------------------------------------------------------------------
2、_CommandPtr接口
该接口返回一个记录集。
它提供了一种简单的方法来执行返回记录集的存储过程和SQL语句。
在使用_CommandPtr接口时，可以利用全局_ConnectionPtr接口，也可以在_CommandPtr 接口里直接使用连接串。
如果只执行一次或者几次数据库访问操作，后者是比较好的选择。
但是，如果频繁访问数据库，并要返回很多记录集，那么应该使用全局_ConnectionPtr接口创建一个数据库连接，然后使用_CommandPtr接口执行存储过程和SQL语句。
// ---------------------------------------------------------------------------------------------------------------------------------
3、_RecordsetPtr接口
该接口是一个记录集对象。
与前两种对象相比，它对记录集提供了更多的控制功能，如记录锁定、游标控制等。
同_CommandPtr接口一样，它不一定使用一个已经创建的数据库连接，可以用一个连接串代替连接指针赋给_RecordsetPtr的connection成员变量，让它自己创建数据库连接。
如果使用多个记录集，最好的方法是同Command对象一样使用已经创建了数据连接的全局_ConnectionPtr接口，然后使用_RecordsetPtr执行存储过程和SQL语句。
注意：
可以使用Recordset对象来执行查询命令，但如果查询或者存储过程是需要参数的，这时就只能使用Command对象。
使用Recordset对象操作数据库：
假定已经成功使用Connection对象创建了数据源的连接，连接指针为m_pConnection
1）创建记录集
_RecordsetPtr m_pRecordset; // 声明记录集指针
m_pRecordset.CreateInstance(__uuidof(Recordset)); // 创建记录集
或者：
_RecordsetPtr m_pRecordset; // 声明记录集指针
m_pRecordset.CreateInstance("ADODB.Recordset"); // 创建记录集
2）打开记录集
记录集指针创建完毕后，调用该指针的Open方法打开记录集。
该函数声明如下：
HRESULT Recordset15::Open(const _variant_t & Source,
const _variant_t & ActiveConnection,
enum CursorTypeEnum CursorType,
enum LockTypeEnum LockType,
long Options);
各个参数的含义如下：
参数Source：
为_variant_t类型的引用，可以为有效的Command对象、SQL语句、表名、存储过程调用等。
参数ActiveConnection：
为_variant_t类型的引用，为已经建立好的连接。
参数CursorType：
用于设置在打开Recordset时提供者应使用的游标类型，它可取CursorTypeEnum 中的任一值，默认值为adOpenForwardOnly。
参数 LockType：
用于设置在打开Recordset时提供者应使用的锁定类型，它可取枚举LockTypeEnum中的任一值，默认值为adLockReadOnly。
参数 Options：
用于设置获取Source（即Open第一个参数）的方式，其类型long。
例程1：
CString strSQL = "select * from mytablename";
m_pRecordset->Open(_variant_t (strSQL),
m_pConnection.GetInterfacePtr( ),
adOpenDynamic,
adLockOptimistic,
adCmdText);
使用SQL语句作为Open方法的第一个参数Source的值，此时Options为adCmdText
例程2：
m_pRecordset->Open(_variant_t ("tbDVDInfo"),
m_pConnection.GetInterfacePtr( ),
adOpenDynamic,
adLockOptimistic,
adCmdTable);
直接使用表名作为第一个参数，此时Options应为adCmdTable
3）遍历记录集
一般在返回记录集时，通常要遍历结果记录集，以便查看或编辑某一条记录，Recoreset指针提供了几个用于实现遍历的方法。
注意：
为了避免发生异常，一般在使用MoveFirst、MovePrev之前，需要使用记录集的指针BOF属性来检测当前的记录集指针是否位于第一条记录之前；
在使用MoveLast、MoveNext之前需要使用记录集指针的EOF属性来检测当前的记录集指针是否位于最后一条记录之后。
4）记录集定位
记录集接口类提供了两种定位方法： 绝对定位和书签定位
前者通过设置或者获取AbsolutePosition属性即可，其值从1开始，并且当前记录为记录集中第一条记录时等于1
对于后者可以通过设置或获取BookMark属性即可。
5）访问记录集
读写记录集中某一记录中的一个字段，有具体有两种方法：
一：
读取操作：
_variant_t var = m_pResultSet->Fields->GetItem(_variant_t("字段名"))->Value;
也可用GetValue方法：
_variant_t var = m_pResultSet->Fields->GetItem(_variant_t("字段名"))->GetValue();
写入操作：
_variant_t var = ..... // 初始化
m_pResultSet->Fields->GetItem(_variant_t("字段名"))->Value = var;
也可用PutValue方法：
m_pResultSet->Fields->GetItem(_variant_t("字段名"))->PutValue(var);
二：
最简单的方法是直接使用如下语句：
读取操作：
_variant_t var = m_pRecordset->GetCollect (_variant_t("字段名"));
写入操作：
_variant_t var = ... // 初始化
m_pRecordset->PutCollect (_variant_t("字段名"), var);
两个方法的原型：
_variant_t GetCollect(const _variant_t & Index )
void PutCollect(const _variant_t & Index, const _variant_t &pvar)
其中：
参数Index可以是字符串表示字段名，也可以是整型，表示字段对应的序号。
pvar表示要写入的变量值。
例如：
_variant_t var;
var = m_pRentRecordset->GetCollect(_variant_t("ID"));
var = m_pRentRecordset->GetCollect(long(0)); // 都可以
6）记录集更新
更新记录集包括添加新的记录、编辑当前记录和删除当前记录
记录集接口指针对这三种操作分别提供了相应的方法
添加新的记录：AddNew
编辑当前记录：Edit
删除当前记录：Delete
注意：
记录集接口指针针对AddNew以及Edit方法提供了Update方法，用于在数据库中更新新添加或者编辑后的记录。
AddNew方法：
用于添加新纪录（该添加是直接在表的末尾续加的），该方法可以使用参数，在参数中指定要添加的新纪录；
也可以不使用参数，而在后面使用PutCollect方法，并需使用Update函数保存新纪录。
Update方法：
用于保存从调用AddNew方法以来所作的任何更改。
例程：
//在表的末尾增加新纪录
m_pRecordset->AddNew();
m_pRecordset->PutCollect(_variant_t("姓名"),
_variant_t(m_strName));
m_pRecordset->PutCollect(_variant_t("工作单位"), _variant_t(m_strComName));
m_pRecordset->PutCollect(_variant_t("单位地址"), _variant_t(m_strComAddr));
//更新数据库-将新纪录存入数据库
m_pRecordset->Update();
7）记录集关闭
在对记录集的操作完成后，必须及时关闭记录集。
if ( m_pRecordset != NULL )
{
m_pRecordset ->Close( );
m_pRecordset =NULL;
}
三、ADO中的数据类型
在使用ADO技术操作数据库时，存取变量的数据类型都是COM类型，这就要求经常在COM类型和普通数据类型之间进行类型转换。
ADO中特有的数据类型包括以下三种：
// ---------------------------------------------------------------------------------------------------------------------------------
1、Variant
该类型是结构化的数据类型，它包含值成员和数据类型成员。
Variant可以包含许多其他的数据类型：如Variant、BSTR、Boolean、IDispatch或者IUnknow指针、货币、日期等。
COM中由_variant_t 类来封装和管理Variant数据类型。
在使用ADO对象模型操作数据库时，如果对象的某个方法或者属性操作数接受某个值，那么通常表明该值在_variant_t 中传递。
注意：
在利用ADO对象进行C++数据类型的相关数据库操作（如将CString类型的值添加到数据库）时，需要进行强制类型转换
例如：
对于 CString m_strName;
m_pRecordset->PutCollect("姓名", _variant_t(m_strName));
// ---------------------------------------------------------------------------------------------------------------------------------
2、BSTR
该类型 ( Basic STRing )也是结构化的数据类型，它包含字符串和字符串的长度。
COM提供分配、处理和释放BSTR的方法，由_bstr_t类来封装和管理BSTR数据类型
在使用ADO对象模型操作数据库时，如果对象的某个方法或者属性操作数接受一个字符串值，那么通常表明该值的形式为_bstr_t，而非一般的CString。
// ---------------------------------------------------------------------------------------------------------------------------------
3、SafeArray 同样是一种结构化的数据类型，包含其它数据类型的数组。
在使用ADO对象模型操作数据库时，如果对象的某个方法或者属性操作数接受或者返回一个数组，则数组类型只能是SafeArray，而非通常意义上的C/C++数组。
通常，从数据库中取出的字段值大都在_variant_t中传递，下面给出从COM类型Variant向CString类型转换的通用函数。
该函数将为数据库的访问和操作提供极大便利。
1 CString CLeftTreeView::VariantToCString(const _variant_t &var) 2 { 3 CString strValue; 4 switch (var.vt) 5 { 6 case VT_BSTR: //字符串
7 case VT_LPSTR: 8 case VT_LPWSTR: 9 strValue = (LPCTSTR)(_bstr_t)var; 10 break; 11 case VT_I1: //无符号字符
12 case VT_UI1: 13 strValue.Format("%d", var.bVal); 14 break; 15 case VT_I2: //短整型
16 strValue.Format("%d", var.iVal); 17 break; 18 case VT_UI2: //无符号短整型
19 strValue.Format("%d", var.uiVal); 20 break; 21 case VT_INT: //整型
22 strValue.Format("%d", var.intVal); 23 break; 24 case VT_I4: //整型
25 case VT_I8: //长整型
26 strValue.Format("%d", var.lVal); 27 break; 28 case VT_UINT: //无符号整型
29 strValue.Format("%d", var.uintVal); 30 break; 31 case VT_UI4: //无符号整型
32 case VT_UI8: //无符号长整型
33 strValue.Format("%d", var.ulVal); 34 break; 35 case VT_VOID: 36 strValue.Format("%8x", var.byref); 37 break; 38 case VT_R4: //浮点型
39 strValue.Format("%.4f", var.fltVal); 40 break; 41 case VT_R8: //双精度型
42 strValue.Format("%.8f", var.dblVal); 43 break; 44 case VT_DECIMAL://小数
45 strValue.Format("%.8f", (double)var); 46 break; 47 case VT_CY: 48 { 49 COleCurrency cy = var.cyVal; 50 strValue = cy.Format(); 51 } 52 break; 53 case VT_BLOB: 54 case VT_BLOB_OBJECT: 55 case 0x2011: 56 strValue = "[BLOB]"; 57 break; 58 case VT_BOOL: //布尔型
59 strValue = var.boolVal ? "TRUE" : "FALSE"; 60 break; 61 case VT_DATE: //日期型
62 { 63 DATE dt = var.date; 64 COleDateTime da = COleDateTime(dt); 65 strValue = da.Format("%Y-%m-%d %H:%M:%S"); 66 } 67 break; 68 case VT_NULL: //NULL值
69 case VT_EMPTY: //空
70 strValue = ""; 71 break; 72 case VT_UNKNOWN://未知类型
73 default: 74 strValue = "UN_KNOW"; 75 break; 76 } 77 return strValue; 78 }