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

god

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

/ Y( H) S) s# B<TR>
; W0 K+ e2 ~4 U6 f( A<TD vAlign=top width=32></TD>
<TD  vAlign=top>5. 记录集的遍历、更新
& ~3 Z1 B+ ~! s
     根据我们刚才通过执行SQL命令建立好的users表，它包含四个字段:ID,username,old,birthday
, R" e) I9 C- ]4 M, s以下的代码实现：打开记录集，遍历所有记录，删除第一条记录，添加三条记录，移动光标到第二条记录，
更改其年龄，保存到数据库。
_variant_t vUsername,vBirthday,vID,vOld;
" G+ Y% n% v) u+ J_RecordsetPtr m_pRecordset;
& c* O+ N# m+ }6 n  Y: |m_pRecordset.CreateInstance("ADODB.Recordset");
, I" W4 x  k3 t* w. m7 Em_pRecordset-&gt;Open("SELECT * FROM users",
# ~  ]5 j) ]& q+ @$ R" W$ O& x _variant_t((IDispatch*)m_pConnection,true),
# F  T0 R: o# V adOpenStatic,
adLockOptimistic,
adCmdText);
$ k# l/ B& s. I6 ]% lwhile(!m_pRecordset-&gt;adoEOF)
: R2 M7 n2 n2 K( _/ g2 Q- c{
) l9 V# M# Q2 P/ K/ O) V   vID = m_pRecordset-&gt;GetCollect(_variant_t((long)0));///取得第1列的值,从0开始计数，
3 C. W3 z% T( I   ///你也可以直接给出列的名称，如下一行
  }5 @  Y9 B" n6 Y$ U   vUsername = m_pRecordset-&gt;GetCollect("username");///取得username字段的值
   vOld = m_pRecordset-&gt;GetCollect("old");
   vBirthday = m_pRecordset-&gt;GetCollect("birthday");
* A* \: U+ b$ I6 J# ~   ///在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)
2 ]  X- x; W; V, K       TRACE("id:%d,姓名:%s,年龄:%d,生日:%s\r\n",
vID.lVal,
(LPCTSTR)(_bstr_t)vUsername,
vOld.lVal,
(LPCTSTR)(_bstr_t)vBirthday);
   m_pRecordset-&gt;MoveNext();///移到下一条记录
# N7 \' S. P7 v" p}
. B/ I) ]- V( }) Y+ `m_pRecordset-&gt;MoveFirst();///移到首条记录
# q! h! M6 L# {! u/ H* ~7 Em_pRecordset-&gt;Delete(adAffectCurrent);///删除当前记录
1 L( L- v4 I  r+ V  D///添加三条新记录并赋值
' s& W- Z. R, ?/ q/ a9 R: z. ]for(int i=0;i&lt;3;i++)
{
   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));
   m_pRecordset-&gtutCollect("birthday",_variant_t("1930-3-15"));
}
m_pRecordset-&gt;Move(1,_variant_t((long)adBookmarkFirst));///从第一条记录往下移动一条记录,即移动到第二条记录处
% x4 K; k/ \+ R- Gm_pRecordset-&gtutCollect(_variant_t("old"),_variant_t((long)45));///修改其年龄
1 B9 n& O3 R. O  p! z9 Em_pRecordset-&gt;Update();///保存到库中   
备注：多次查询可把查询过程做成一个函数ExecuteSQL让m_pRecordset获得连接指针m_pConnection查询结果
void ExecuteSQL(_ConnectionPtr  m_pConnection, _RecordsetPtr  m_pRecordset,CString strSql)
{
* A( p6 d. i  G, U& V; M   //执行Select 语句
   BSTR bstrSQL = strSql.AllocSysString();           
$ H/ A* z1 E$ J( z; f4 K& U    try
    {
, Q" M& n/ r8 l" u* b" L0 t       m_pRecordset-&gt;Open(bstrSQL,(IDispatch*)m_pConnection,adOpenDynamic,adLockOptimistic,adCmdText);
% c9 y2 R- q  Y: A/ e* V* U           //adOpenDynamic：动态  adLockOptimistic乐观封锁法  adCmdText：文本查询语句
    }
    catch(_com_error error)
    {
, ]0 h/ F! a- C$ ]# B+ z( l4 V" `& r1 g       CString errorMessage;
       errorMessage.format("%s",(LPTSTR)error.Description());
       AfxMessageBox(errorMessage);
    }
4 V8 s0 z" k2 ^% b: m3 ~+ A, W( i- v}        
//出错处理：
9 ?- e4 k* O$ Y3127——没有找到目标表
3092——目标表已经存在
' N& u) q  x' q, D0 u/ T例如：
: H- z* o* ^' \$ d" v% ~catch(const _com_error e)
{
    AfxMessageBox(e.Description());
0 r1 a% q( S/ `$ Q- l4 y# r    long errorCode=e.WCode();
1 E9 _% I( Q0 a  _    if(3127==errorCode) AfxMessageBox("表不存在");
" `# K; U: _: l3 O- D1 E    if(3092==errorCode) AfxMessageBox("表已经存在");
    return FALSE;
}
" U! J. K" }$ X/ ]2 e
</TD></TR></TABLE>

wangyu249

<p>不错</p>