[转帖]在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. 记录集的遍历、更新

  Q8 Z  r7 c0 U6 n6 k     根据我们刚才通过执行SQL命令建立好的users表，它包含四个字段:ID,username,old,birthday
7 ~6 d2 j& V  h( k$ ?以下的代码实现：打开记录集，遍历所有记录，删除第一条记录，添加三条记录，移动光标到第二条记录，
更改其年龄，保存到数据库。
_variant_t vUsername,vBirthday,vID,vOld;
8 F# r6 A9 g# g' }1 o0 K( Y_RecordsetPtr m_pRecordset;
" T4 R, J- l7 r2 ~9 |% hm_pRecordset.CreateInstance("ADODB.Recordset");
m_pRecordset-&gt;Open("SELECT * FROM users",
$ X; a& a$ O9 D. e7 x; P/ O _variant_t((IDispatch*)m_pConnection,true),
adOpenStatic,
adLockOptimistic,
1 q2 B; M$ i4 b/ ^2 V5 H. Y. L adCmdText);
1 H8 {3 d; Q0 r5 m3 M, u7 wwhile(!m_pRecordset-&gt;adoEOF)
, |/ o3 P& D" K2 k{
# V$ Y! j6 T. N- |: A  S( w$ J   vID = m_pRecordset-&gt;GetCollect(_variant_t((long)0));///取得第1列的值,从0开始计数，
   ///你也可以直接给出列的名称，如下一行
   vUsername = m_pRecordset-&gt;GetCollect("username");///取得username字段的值
% K( p0 X% X! q2 N   vOld = m_pRecordset-&gt;GetCollect("old");
   vBirthday = m_pRecordset-&gt;GetCollect("birthday");
   ///在DEBUG方式下的OUTPUT窗口输出记录集中的记录
  s) z% n/ D, `2 v- k4 D   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",
3 ~4 u* z! j8 H* Q" ?( p1 t, Y* b vID.lVal,
(LPCTSTR)(_bstr_t)vUsername,
1 D- h2 |9 e/ T vOld.lVal,
; F1 S1 u& d& S* d+ B9 e (LPCTSTR)(_bstr_t)vBirthday);
   m_pRecordset-&gt;MoveNext();///移到下一条记录
- a; N5 c$ }0 n9 e6 a( t7 q}
m_pRecordset-&gt;MoveFirst();///移到首条记录
m_pRecordset-&gt;Delete(adAffectCurrent);///删除当前记录
" U# H: e/ B6 H! n; G1 b5 N, ]9 z2 E; k///添加三条新记录并赋值
for(int i=0;i&lt;3;i++)
) I# F7 A' k6 E9 C$ R( ~# j. k+ v{
   m_pRecordset-&gt;AddNew();///添加新记录
   m_pRecordset-&gtutCollect("ID",_variant_t((long)(i+10)));
   m_pRecordset-&gtutCollect("username",_variant_t("叶利钦"));
   m_pRecordset-&gtutCollect("old",_variant_t((long)71));
$ c" _' ~% O0 L% c   m_pRecordset-&gtutCollect("birthday",_variant_t("1930-3-15"));
}
+ Z5 e! k0 \% ?. U& F* f( \7 gm_pRecordset-&gt;Move(1,_variant_t((long)adBookmarkFirst));///从第一条记录往下移动一条记录,即移动到第二条记录处
m_pRecordset-&gtutCollect(_variant_t("old"),_variant_t((long)45));///修改其年龄
m_pRecordset-&gt;Update();///保存到库中   
: Z* o0 {; {6 i$ z) Q( f# s& i8 I- f备注：多次查询可把查询过程做成一个函数ExecuteSQL让m_pRecordset获得连接指针m_pConnection查询结果
void ExecuteSQL(_ConnectionPtr  m_pConnection, _RecordsetPtr  m_pRecordset,CString strSql)
  A) N6 w* d- l+ ]6 A7 S{
   //执行Select 语句
   BSTR bstrSQL = strSql.AllocSysString();           
( a! ?3 G, @: v* ]) r- t5 P- n    try
    {
: U# C! n' V" ?5 ~       m_pRecordset-&gt;Open(bstrSQL,(IDispatch*)m_pConnection,adOpenDynamic,adLockOptimistic,adCmdText);
           //adOpenDynamic：动态  adLockOptimistic乐观封锁法  adCmdText：文本查询语句
    }
3 s% v+ d+ u2 a' Z6 f4 M    catch(_com_error error)
    {
( _4 U2 ~. ^( Y* s+ m# i8 [       CString errorMessage;
       errorMessage.format("%s",(LPTSTR)error.Description());
5 a( w2 f% u! t( I       AfxMessageBox(errorMessage);
    }
! `* N: g9 S+ P; q6 }- h  t7 U}        
+ W9 M8 \* X- L+ A( z: ^( M//出错处理：
/ l* T( O- A! ~3127——没有找到目标表
3092——目标表已经存在
例如：
! p8 ?! K" D2 a. y: q! u! ecatch(const _com_error e)
{
    AfxMessageBox(e.Description());
" W, z& V5 C6 q( x    long errorCode=e.WCode();
$ g# C2 g! L4 B, D( I3 U# s8 z    if(3127==errorCode) AfxMessageBox("表不存在");
- {+ {* U  U7 Z% p9 [    if(3092==errorCode) AfxMessageBox("表已经存在");
6 m8 n: c, U- L8 }4 s- R    return FALSE;
) P7 O+ h1 d! a: X( b4 j+ m}

& @2 l3 L; R3 ~. C0 g9 G</TD></TR></TABLE>

wangyu249

<p>不错</p>