[转帖]在Visual C++中用ADO进行数据库编程(上)

god

1. 生成应用程序框架并初始化OLE/COM库环境

　　创建一个标准的MFC AppWizard(exe)应用程序，然后在使用ADO数据库的InitInstance函数中初始化OLE/COM库（因为ADO库是一个COM DLL库）。
# H: D1 P& k! \4 A) Z3 o6 ?本例为：

　BOOL CAdotestDlg::OnInitDialog()
　{
3 T& [* w- D+ g: P& w. x  M! a       ::CoInitialize(NULL); //初始化OLE/COM库环境
}

　　程序最后要调用 ::CoUninitialize()；//释放程序占用的COM 资源。
! ]; a8 {" }) w' G& u) g9 d+ S
; M1 w! z& g+ ^$ n- Q  C6 R1 U　　另外：

% A7 P* s% {8 |) T% Y0 [6 a# ~m_pRecordset->Close(); 注意！！！不要多次关闭！！！！！！！！！！！！
m_pConnection->Close();
m_pRecordset = NULL;
3 i& i+ k2 h  _; S# {% P- Pm_pConnection = NULL;
$ @, f* _. k: k- k4 \2 N* y4 M  e3 Z: P　　2. 引入ADO库文件
" g* m$ a" L' Q3 \, x
　　使用ADO前必须在工程的stdafx.h文件最后用直接引入符号＃import引入ADO库文件，以使编译器能正确编译。代码如下：
' w- H7 U3 t7 d4 D#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的其他库冲突。
9 v) G. |* O) ^' ]$ O+ }+ x
　　3．利用智能指针进行数据库操作

　　在CaboutDlg头文件中定义两个ADO智能指针类实例,并在对话框中加入一个ListCtrl。

2 k3 k2 B7 d0 E/ ?% Lclass CAdotestDlg : public CDialog
9 T$ e* G, ^. \% z{
    _ConnectionPtr m_pConnection;
    _RecordsetPtr m_pRecordset;
　　 ClistCtrl m_List;
    ......
% V$ t$ E6 F0 j}     
) j) b( j" f2 c/ g  U
　　ADO库包含三个智能指针:_ConnectionPtr、_CommandPtr和_RecordsetPtr。

4 `. `. ^+ x3 p7 w# n# r( Q　　_ConnectionPtr通常被用来创建一个数据连接或执行一条不返回任何结果的SQL语句，如一个存储过程。
: I4 a# `4 K7 l　　_CommandPtr返回一个记录集。它提供了一种简单的方法来执行返回记录集的存储过程和SQL语句。在使用_CommandPtr接口时，可以利用全局_ConnectionPtr接口，也可以在_CommandPtr接口里直接使用连接串。　　_RecordsetPtr是一个记录集对象。与以上两种对象相比，它对记录集提供了更多的控制功能，如记录锁定、游标控制等。
, v! f: d) c4 v6 n
　　在使用ADO程序的事件响应中OnButton1加入以下代码:

: v  s8 {& B8 ]3 @$ ~# @void CAdotestDlg::OnButton1()
* Y7 ^/ S+ \# s' c+ z" W3 \{
% {# ^8 a' V3 Q. d$ v! G/ n3 [m_List.ResetContent();
m_pConnection.CreateInstance(_uuidof(Connection)); //初始化Connection指针
m_pRecordset.CreateInstance(_uuidof(Recordset));//初始化Recordset指针
! h5 ~0 i7 ~4 T% J) ltry
{
m_pConnection->Open("DSN=ADOTest","","",0); //连接叫作ADOTest的ODBC数据源
( `7 b7 a7 X$ `  ?2 K) Q //注意：这是连接不需要用户ID或密码的open 函数
// 否则形式为 ->Open("DSN=test;uid=sa;pwd=123;","","",0);
, m$ M) o+ h9 K4 W1 p6 |1 a
2 k. _* _7 b9 K+ ~ // 执行SQL语句得到一个记录集把其指针赋值给m_pRecordset
. M3 x; I) U2 m& }! N- |7 e CString strSql="select * from middle";
1 t/ R9 Y. n8 R2 ~( E7 k/ o. y! {7 N BSTR bstrSQL = strSql.AllocSysString();
( k2 L' i+ H0 ?& s+ l5 v m_pRecordset->Open(bstrSQL,(IDispatch*)m_pConnection,adOpenDynamic,adLockOptimistic,adCmdText);
//adOpenDynamic：动态 adLockOptimistic乐观封锁法 adCmdText：文本查询语句
while(!m_pRecordset->adoEOF)//遍历所有记录
{
  //取纪录字段值方式之一
  _variant_t Thevalue; //VARIANT数据类型
  Thevalue = m_pRecordset->GetCollect("BIG_NAME");//得到字段BIG_NAME的值
$ V8 V  X8 g3 y% W. j  if(Thevalue.vt!=VT_NULL)
& g+ E2 C3 G4 P7 t5 G1 }5 ?   m_List.AddString((char*)_bstr_t(Thevalue));
  //将该值加入到列表控件中
$ a/ d/ G. @; B# Z# a! I) `( {
  //取纪录字段值方式之二
* A, Z3 W. d& x% M( R' j  // _bstr_t Thevalue1=m_pRecordset->Fields->GetItem("BIG_NAME")->value;
  // CString temp=Thevalue1.copy();
  // m_List.AddString(temp);
  //数据类型转换
  _variant_t vUsername,vBirthday,vID,vOld;
  TRACE("id:%d,姓名:%s,年龄:%d,生日:%s\r\n",
  vID.lVal,(LPCTSTR)(_bstr_t)vUsername,vOld.lVal,(LPCTSTR)(_bstr_t)vBirthday);

5 g2 N/ W& t0 C- L( E: E6 A3 n9 f  m_pRecordset->MoveNext();//转到下一条纪录
4 i& F5 {5 o* B0 _4 i/ B }
m_pRecordset->Close();
m_pConnection->Close();
6 M( ]8 E  ]! |- Z}
catch (_com_error e)//异常处理
{
  W  h0 |* n6 {0 U  y5 b AfxMessageBox(e.ErrorMessage());
}
m_pRecordset->Close(); //注意！！！不要多次关闭！！！！否则会出错
m_pConnection->Close();
m_pRecordset = NULL;
m_pConnection = NULL;
}

　　程序中通过_variant_t和_bstr_t转换COM对象和C＋＋类型的数据, _variant_t类封装了OLE自治VARIANT数据类型。在C++中使用_variant_t类要比直接使用VARIANT数据类型容易得多。
7 h4 f" V' N- h) u' E8 R
　　好，编译后该程序就能运行了，但记住运行前要创建一个叫ADOTest的ODBC数据源。该程序将把表middle中的BIG_NAME字段值显示在列表控件中。

chenlk

有用