ADO数据库编程入门

1、使用ADO编程的方法有三种：
（1）使用预处理指令#import，例如：
#import "c:\Program Files\Common Files\System\ado\msado15.dll" no_namespace rename("EOF", "adoEOF") rename("BOF", "adoBOF")
程序在编译时读取msado15.dll中的类型库信息，自动生成两个该类型库的头文件和实现文件msado15.tlh和msado15.tli（在Debug或Release目录下）。两个文件中定义了ADO的所有对象和方法，以及一些枚举类型的变量，程序只要直接调用这些方法即可。
（2）通过读取msado15.dll中的类型库信息，建立一个ColeDispatchDriver类的派生类，然后通过它调用ADO对象。
（3）直接使用COM提供的API，例如：
CLSID clsid;
HRESULT hr = ::CLSIDFromProgID(L"ADODB.Connection", &clsid);
if (FAILED(hr))
{
...
}
::CoCreateInstance(clsid, NULL, CLSCTX_SERVER, IID_IDispatch, (void **)&pDispatch);
if (FAILED(hr))
{
...
}
前两种方法类似，第3种方法编程可能最麻烦，但效率最高，程序尺寸最小，并且对ADO的控制能力也最强。
2、以下使用#import方法操作数据库
（1）可以在stdafx.h的所有include指令之后import
（2）使用AfxOleInit()初始化COM库，通常在CwinApp::InitInstance的重载函数中添加。
（也可以使用::CoInitialize(NULL)，之后在ExitInstance中调用::CoUninitialize）
（3）定义_ConnectionPtr变量后调用Connection对象的Open方法建立与服务器的连接。
数据类型_ConnectionPtr实际上是由类模板_com_ptr_t得到的一个具体的实例类。_ConnectionPtr类封装了Connection对象的Idispatch接口指针及其一些必要的操作。可以通过这个指针操纵Connection对象。
例如连接SQLServer数据库，代码如下：
// 连接到MS SQL Server
_ConnectionPtr pMyConnect = NULL;
HRESULT hr = pMyConnect.CreateInstance(__uuidof(Connection));
if (FAILED(hr))
return;

_bstr_t strConnect = "Provider=SQLOLEDB; Server=hch; Database=mytest; uid=sa; pwd=sa;";

try
{
// Open方法连接字串必须四BSTR或者_bstr_t类型
pMyConnect->Open(strConnect, "", "", NULL);
}
catch(_com_error &e)
{
MessageBox(e.Description(), "警告", MB_OK|MB_ICONINFORMATION);
}
（4）
//定义_RecordsetPtr变量，调用它Recordset对象的Open，即可打开一个数据集
_RecordsetPtr pRecordset;
if (FAILED(pRecordset.CreateInstance(__uuidof(Recordset))))
{
return;
}
try
{
pRecordset->Open(_variant_t("userinfo"), _variant_t((IDispatch*)pMyConnect),
adOpenKeyset, adLockOptimistic, adCmdTable);
}
catch (_com_error &e)
{
MessageBox("无法打开userinfo表", "系统提示", MB_OK|MB_ICONINFORMATION);
}
（5）
//定义_RecordsetPtr变量，调用它Recordset对象的Open，即可打开一个数据集
_RecordsetPtr pRecordset;
if (FAILED(pRecordset.CreateInstance(__uuidof(Recordset))))
{
return;
}
try
{
pRecordset->Open(_variant_t("userinfo"), _variant_t((IDispatch*)pMyConnect),
adOpenKeyset, adLockOptimistic, adCmdTable);
}
catch (_com_error &e)
{
MessageBox("无法打开userinfo表", "系统提示", MB_OK|MB_ICONINFORMATION);
}
（6）
// 读取当前记录集
try
{
pRecordset->MoveFirst();
while (pRecordset->adoEOF == VARIANT_FALSE)
{
// Fields是Recordset对象的容器，GetItem方法返回Field对象，Value是Field对象的属性，也可以用GetValue方法
CString sName = (char*)(_bstr_t)(pRecordset->Fields->GetItem(_variant_t("UserName"))->Value);
// 或者使用GetValue()
//CString sName = (char*)(_bstr_t)(pRecordset->Fields->GetItem(_variant_t("UserName"))->GetValue());
AfxMessageBox(sName);
pRecordset->MoveNext();
}
}
catch (_com_error &e)
{
MessageBox(e.Description(), "系统提示", MB_OK|MB_ICONINFORMATION);
}
（7）
// 修改记录
try
{
pRecordset->MoveFirst();
while(pRecordset->adoEOF == VARIANT_FALSE)
{
pRecordset->Fields->GetItem(_variant_t("Address"))->Value = _bstr_t("北京大学");
pRecordset->Update();
pRecordset->MoveNext();
}
}
catch (_com_error &e)
{
MessageBox(e.Description(), "系统提示", MB_OK|MB_ICONINFORMATION);
}
（8）添加，删除，使用带参数的命令，相应ADO的通知事件，绑定数据，设置过滤条件，索引和排序，事务处理。（略去，请参考其它资料）