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

god

<TABLE cellPadding=0 cellSpacing=0 height=325 style="TABLE-LAYOUT: fixed" width="100%">
. q0 o; `- J% ]" a3 Q, R
; j+ |* r3 T8 s$ r5 Q1 I<TR>
<TD vAlign=top width=32></TD>
<TD  vAlign=top>5. 记录集的遍历、更新

     根据我们刚才通过执行SQL命令建立好的users表，它包含四个字段:ID,username,old,birthday
以下的代码实现：打开记录集，遍历所有记录，删除第一条记录，添加三条记录，移动光标到第二条记录，
+ {4 |& R! _' j; M" a: }8 {更改其年龄，保存到数据库。
_variant_t vUsername,vBirthday,vID,vOld;
4 [: C% S8 v9 Z* T# J0 h5 \_RecordsetPtr m_pRecordset;
m_pRecordset.CreateInstance("ADODB.Recordset");
2 `4 w$ E; m, c9 I" E' h+ ?m_pRecordset-&gt;Open("SELECT * FROM users",
; S# s% n& o8 E( O' \ _variant_t((IDispatch*)m_pConnection,true),
2 s" ^( B/ p/ ` adOpenStatic,
1 `/ h2 c  C4 l4 z1 I8 A5 z6 ~ adLockOptimistic,
adCmdText);
; n3 G: O1 V3 C% }. t: Awhile(!m_pRecordset-&gt;adoEOF)
{
   vID = m_pRecordset-&gt;GetCollect(_variant_t((long)0));///取得第1列的值,从0开始计数，
   ///你也可以直接给出列的名称，如下一行
( N) w/ c3 i0 _& v" h" U1 ~   vUsername = m_pRecordset-&gt;GetCollect("username");///取得username字段的值
2 b& m/ X9 C, L& u3 @* P" b   vOld = m_pRecordset-&gt;GetCollect("old");
( C$ m3 ?* \5 T3 w" o* i   vBirthday = m_pRecordset-&gt;GetCollect("birthday");
   ///在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",
5 R+ g9 y% T9 `2 U4 Z5 V/ Y vID.lVal,
1 j, i2 [6 ^5 n. _3 u (LPCTSTR)(_bstr_t)vUsername,
vOld.lVal,
(LPCTSTR)(_bstr_t)vBirthday);
) ?( I: q9 [- M. y* H$ L   m_pRecordset-&gt;MoveNext();///移到下一条记录
}
m_pRecordset-&gt;MoveFirst();///移到首条记录
5 _) e2 L3 p/ C' s' Y) n8 Rm_pRecordset-&gt;Delete(adAffectCurrent);///删除当前记录
///添加三条新记录并赋值
for(int i=0;i&lt;3;i++)
5 r, p' k% i4 [! v6 W{
/ R+ v7 L: k/ O( r   m_pRecordset-&gt;AddNew();///添加新记录
/ d7 H( \( V( Y6 L; }7 n   m_pRecordset-&gtutCollect("ID",_variant_t((long)(i+10)));
   m_pRecordset-&gtutCollect("username",_variant_t("叶利钦"));
/ }8 h5 n4 X! a5 J   m_pRecordset-&gtutCollect("old",_variant_t((long)71));
   m_pRecordset-&gtutCollect("birthday",_variant_t("1930-3-15"));
}
; w0 `; X7 M) t  T5 R$ mm_pRecordset-&gt;Move(1,_variant_t((long)adBookmarkFirst));///从第一条记录往下移动一条记录,即移动到第二条记录处
" Z0 v" O9 U& X" B3 Y3 Bm_pRecordset-&gtutCollect(_variant_t("old"),_variant_t((long)45));///修改其年龄
m_pRecordset-&gt;Update();///保存到库中   
  W3 L% W2 R# ~5 |8 j. q0 J6 O备注：多次查询可把查询过程做成一个函数ExecuteSQL让m_pRecordset获得连接指针m_pConnection查询结果
! [- E7 e# X" Z% i( U9 f5 Cvoid ExecuteSQL(_ConnectionPtr  m_pConnection, _RecordsetPtr  m_pRecordset,CString strSql)
6 r2 I: l8 X8 b{
- V4 ?% f" [! j8 ]$ z6 a   //执行Select 语句
& ^, D5 S6 I! W2 w! C$ g  k   BSTR bstrSQL = strSql.AllocSysString();           
9 c: B+ M5 A4 L( [8 ^: `: U' n    try
    {
9 a5 d2 R* x' o  ^% l       m_pRecordset-&gt;Open(bstrSQL,(IDispatch*)m_pConnection,adOpenDynamic,adLockOptimistic,adCmdText);
           //adOpenDynamic：动态  adLockOptimistic乐观封锁法  adCmdText：文本查询语句
    }
; ~( w+ V! F3 y- F4 W    catch(_com_error error)
) D. D( e8 Z% q2 J8 L    {
1 I: d% E4 K1 J3 \3 A       CString errorMessage;
       errorMessage.format("%s",(LPTSTR)error.Description());
       AfxMessageBox(errorMessage);
- P6 ]# d% b9 n, W6 P    }
0 J, x7 N) b4 s' k}        
//出错处理：
3127——没有找到目标表
5 H! m4 U* x$ z1 D' d1 b8 k3092——目标表已经存在
例如：
catch(const _com_error e)
{
    AfxMessageBox(e.Description());
    long errorCode=e.WCode();
. o4 R$ a5 q) n* B( o; D; m8 v    if(3127==errorCode) AfxMessageBox("表不存在");
    if(3092==errorCode) AfxMessageBox("表已经存在");
/ a' S5 X$ [2 D8 [& g    return FALSE;
7 `3 B& ?! P5 X0 \* I}

8 v8 Q. E) n) \</TD></TR></TABLE>

wangyu249

<p>不错</p>