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

god

<TABLE cellPadding=0 cellSpacing=0 height=325 style="TABLE-LAYOUT: fixed" width="100%">

<TR>
<TD vAlign=top width=32></TD>
<TD  vAlign=top>5. 记录集的遍历、更新
, ]5 M6 ]+ A  Q
     根据我们刚才通过执行SQL命令建立好的users表，它包含四个字段:ID,username,old,birthday
以下的代码实现：打开记录集，遍历所有记录，删除第一条记录，添加三条记录，移动光标到第二条记录，
更改其年龄，保存到数据库。
_variant_t vUsername,vBirthday,vID,vOld;
_RecordsetPtr m_pRecordset;
/ u6 ^) w3 S! a; \9 a2 |m_pRecordset.CreateInstance("ADODB.Recordset");
/ {( j, k" H4 b( p9 P( H4 n0 Dm_pRecordset-&gt;Open("SELECT * FROM users",
6 [! C( [, T% `$ O, o8 ]4 z) n% D% k6 k _variant_t((IDispatch*)m_pConnection,true),
adOpenStatic,
9 h$ N$ j+ @9 X) O0 o adLockOptimistic,
adCmdText);
" C) g' T+ U) ]6 B' Hwhile(!m_pRecordset-&gt;adoEOF)
{
0 X) N. q- Q) r$ @* K4 E/ j! D5 @   vID = m_pRecordset-&gt;GetCollect(_variant_t((long)0));///取得第1列的值,从0开始计数，
   ///你也可以直接给出列的名称，如下一行
/ t* @+ Z0 E7 `* [9 h1 ~' P7 m$ g   vUsername = m_pRecordset-&gt;GetCollect("username");///取得username字段的值
   vOld = m_pRecordset-&gt;GetCollect("old");
' N( Z; ?* J  `' Z   vBirthday = m_pRecordset-&gt;GetCollect("birthday");
0 v# }  |& U! k2 }+ N& ^" A! Z   ///在DEBUG方式下的OUTPUT窗口输出记录集中的记录
   if(vID.vt != VT_NULL &amp;&amp; vUsername.vt != VT_NULL &amp;&amp; vOld.vt != VT_NULL &amp;&amp; vBirthday.vt != VT_NULL)
       TRACE("id:%d,姓名:%s,年龄:%d,生日:%s\r\n",
vID.lVal,
, p$ I9 V, p. t- Z (LPCTSTR)(_bstr_t)vUsername,
  A3 Y, d9 ]2 p( q% ^7 c% j! L, G vOld.lVal,
(LPCTSTR)(_bstr_t)vBirthday);
! u1 ~. o4 z4 K3 F   m_pRecordset-&gt;MoveNext();///移到下一条记录
}
7 D/ w. [! v" {" Y% Gm_pRecordset-&gt;MoveFirst();///移到首条记录
/ u$ x1 Q* _3 bm_pRecordset-&gt;Delete(adAffectCurrent);///删除当前记录
  |" l7 W) h  }5 o3 G; l) x///添加三条新记录并赋值
for(int i=0;i&lt;3;i++)
: l; j& K2 L+ l' i4 F{
   m_pRecordset-&gt;AddNew();///添加新记录
. _, E( b) e, i2 V  u* D# c   m_pRecordset-&gtutCollect("ID",_variant_t((long)(i+10)));
( ]9 Q1 B$ I4 B$ z5 V* M   m_pRecordset-&gtutCollect("username",_variant_t("叶利钦"));
   m_pRecordset-&gtutCollect("old",_variant_t((long)71));
1 `3 L3 |9 Q# b8 s/ n& q/ [   m_pRecordset-&gtutCollect("birthday",_variant_t("1930-3-15"));
& Z  t" ]; ^2 |8 ]5 |; |9 w}
, X- d0 @+ i! c5 Z2 \1 Am_pRecordset-&gt;Move(1,_variant_t((long)adBookmarkFirst));///从第一条记录往下移动一条记录,即移动到第二条记录处
m_pRecordset-&gtutCollect(_variant_t("old"),_variant_t((long)45));///修改其年龄
m_pRecordset-&gt;Update();///保存到库中   
# C8 x5 U/ [: V" e' }/ F备注：多次查询可把查询过程做成一个函数ExecuteSQL让m_pRecordset获得连接指针m_pConnection查询结果
void ExecuteSQL(_ConnectionPtr  m_pConnection, _RecordsetPtr  m_pRecordset,CString strSql)
2 ?* W  Y, ], `! T3 Y0 {/ K{
   //执行Select 语句
   BSTR bstrSQL = strSql.AllocSysString();           
" c4 V6 _  S, g4 V! p    try
    {
4 \1 T& A8 J. `: p. P       m_pRecordset-&gt;Open(bstrSQL,(IDispatch*)m_pConnection,adOpenDynamic,adLockOptimistic,adCmdText);
/ F% e0 Q) {, K" ~           //adOpenDynamic：动态  adLockOptimistic乐观封锁法  adCmdText：文本查询语句
    }
0 r& ~; f0 p/ l) \    catch(_com_error error)
    {
" x5 {" W# l6 R% _5 ]       CString errorMessage;
       errorMessage.format("%s",(LPTSTR)error.Description());
. T' B+ O+ s) O) m1 o0 C& T& q       AfxMessageBox(errorMessage);
1 B9 J% ?* a2 `7 o7 f2 v- p    }
% f- F7 B3 F$ ^  ?4 D}        
- T  Q" Z7 [, ?. `' Y# d, G" m, n//出错处理：
3127——没有找到目标表
3092——目标表已经存在
例如：
0 a) U) I+ h, v0 g5 s: g$ |: d( {" \catch(const _com_error e)
{
4 |; `5 [" z" }    AfxMessageBox(e.Description());
    long errorCode=e.WCode();
    if(3127==errorCode) AfxMessageBox("表不存在");
/ ?; S3 }& ~6 Y% ^! C9 a    if(3092==errorCode) AfxMessageBox("表已经存在");
. Y0 S4 \; h% d! x/ ?, h    return FALSE;
& m& T( c5 ^8 y& P% K9 E3 o  F6 q}
$ W3 x9 a! A# N0 n: i
$ a5 g: N! J: B# {</TD></TR></TABLE>

wangyu249

<p>不错</p>