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

god

<TABLE cellPadding=0 cellSpacing=0 height=325 style="TABLE-LAYOUT: fixed" width="100%">
* _% R6 \  b4 v/ r9 E, L& S
" ~: h0 b. Q8 S- \# v  S# v<TR>
<TD vAlign=top width=32></TD>
. ?( |" v( q* Y# a, J) y& X<TD  vAlign=top>5. 记录集的遍历、更新

, ^. Y* b& _  @1 O     根据我们刚才通过执行SQL命令建立好的users表，它包含四个字段:ID,username,old,birthday
: R( n* p' B1 V. p以下的代码实现：打开记录集，遍历所有记录，删除第一条记录，添加三条记录，移动光标到第二条记录，
4 L) K8 X( }4 j: @/ C' e更改其年龄，保存到数据库。
! ?) v; m; q' T* T_variant_t vUsername,vBirthday,vID,vOld;
0 H! Z$ u& U; j3 m_RecordsetPtr m_pRecordset;
m_pRecordset.CreateInstance("ADODB.Recordset");
m_pRecordset-&gt;Open("SELECT * FROM users",
_variant_t((IDispatch*)m_pConnection,true),
adOpenStatic,
adLockOptimistic,
4 Y: q. ]6 Q' ~: p0 R& R3 t adCmdText);
7 t- G  @' G* e; ]" |0 C$ Wwhile(!m_pRecordset-&gt;adoEOF)
{
& l2 p4 V% I& B' i+ P) K   vID = m_pRecordset-&gt;GetCollect(_variant_t((long)0));///取得第1列的值,从0开始计数，
3 ?# a; Y4 V! o6 v+ r' C4 }( W   ///你也可以直接给出列的名称，如下一行
   vUsername = m_pRecordset-&gt;GetCollect("username");///取得username字段的值
5 N' j( [0 |+ e3 c! w& C   vOld = m_pRecordset-&gt;GetCollect("old");
   vBirthday = m_pRecordset-&gt;GetCollect("birthday");
   ///在DEBUG方式下的OUTPUT窗口输出记录集中的记录
: N% v- \4 z( D$ A! R; h   if(vID.vt != VT_NULL &amp;&amp; vUsername.vt != VT_NULL &amp;&amp; vOld.vt != VT_NULL &amp;&amp; vBirthday.vt != VT_NULL)
, i: F" ]! P3 Y0 L8 p0 L# Y       TRACE("id:%d,姓名:%s,年龄:%d,生日:%s\r\n",
9 b& r6 q. b$ z vID.lVal,
0 A* ~, `7 F1 \$ r- [; G1 T: p (LPCTSTR)(_bstr_t)vUsername,
1 F- d4 |* L" }0 T, t4 D vOld.lVal,
(LPCTSTR)(_bstr_t)vBirthday);
   m_pRecordset-&gt;MoveNext();///移到下一条记录
$ G: K0 Q% `" N$ b}
- F  m4 H- Y  x: y  Zm_pRecordset-&gt;MoveFirst();///移到首条记录
m_pRecordset-&gt;Delete(adAffectCurrent);///删除当前记录
! f* }( K3 ?, P! f0 {///添加三条新记录并赋值
for(int i=0;i&lt;3;i++)
{
   m_pRecordset-&gt;AddNew();///添加新记录
! M4 r: M, T' g' h' R   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"));
+ z" Y1 F! T, |9 P$ N}
$ {. }# z( J; q$ Z, G) rm_pRecordset-&gt;Move(1,_variant_t((long)adBookmarkFirst));///从第一条记录往下移动一条记录,即移动到第二条记录处
m_pRecordset-&gtutCollect(_variant_t("old"),_variant_t((long)45));///修改其年龄
m_pRecordset-&gt;Update();///保存到库中   
  w+ T5 z7 a! K. f9 ^/ [5 R$ a备注：多次查询可把查询过程做成一个函数ExecuteSQL让m_pRecordset获得连接指针m_pConnection查询结果
void ExecuteSQL(_ConnectionPtr  m_pConnection, _RecordsetPtr  m_pRecordset,CString strSql)
{
   //执行Select 语句
   BSTR bstrSQL = strSql.AllocSysString();           
    try
    {
& K/ d- C* C9 D+ B- f9 M/ F       m_pRecordset-&gt;Open(bstrSQL,(IDispatch*)m_pConnection,adOpenDynamic,adLockOptimistic,adCmdText);
           //adOpenDynamic：动态  adLockOptimistic乐观封锁法  adCmdText：文本查询语句
: T5 B' W6 g; z1 a; N    }
+ B$ I" j3 X6 O7 A. ~/ |! B    catch(_com_error error)
    {
       CString errorMessage;
       errorMessage.format("%s",(LPTSTR)error.Description());
4 ]' z4 D# V  t- f  H- O  O7 A% W       AfxMessageBox(errorMessage);
: q# c! M: d, ?  }9 O! ^' G    }
- o0 l: ^& N* n( a* i9 L5 C$ ~}        
//出错处理：
3127——没有找到目标表
' Q4 o& S+ g3 W7 R% h7 L3092——目标表已经存在
例如：
; a: Y% z/ _3 _: Tcatch(const _com_error e)
) M) P" `+ L. K8 ^) s2 e{
    AfxMessageBox(e.Description());
+ c1 y* h! i6 M+ Y( d+ q0 J! _    long errorCode=e.WCode();
    if(3127==errorCode) AfxMessageBox("表不存在");
% l) R! x2 ~+ H6 T: p# O% k    if(3092==errorCode) AfxMessageBox("表已经存在");
    return FALSE;
: m. f: t% o! z5 {# J1 ]}

2 \( J) a4 W$ v* b. v7 x6 i% n$ l</TD></TR></TABLE>

wangyu249

<p>不错</p>