数学建模社区-数学中国
标题:
[转帖]在Visual C++中用ADO进行数据库编程(上)
[打印本页]
作者:
god
时间:
2005-3-30 22:50
标题:
[转帖]在Visual C++中用ADO进行数据库编程(上)
1. 生成应用程序框架并初始化OLE/COM库环境
' ~! [9 p v+ O& S# q8 y1 ]! {' h
) O' P! d% J) X! L% U
创建一个标准的MFC AppWizard(exe)应用程序，然后在使用ADO数据库的InitInstance函数中初始化OLE/COM库（因为ADO库是一个COM DLL库）。
- ~. F+ q/ i5 t8 w2 [3 l( c
本例为：
7 E5 F+ E" s0 H& I# X5 y
0 P" e( H5 E- f2 m
BOOL CAdotestDlg::OnInitDialog()
- K0 z3 r1 \. K: s/ K
{
- B. D; o0 m' \* c" V! r3 x
::CoInitialize(NULL); //初始化OLE/COM库环境
) q) n% t6 |3 G8 R
}
% H& i# i9 d; a6 B3 Q: H9 C* H% t
& t. n8 c6 T+ u
程序最后要调用 ::CoUninitialize()；//释放程序占用的COM 资源。
0 @8 o# }/ `5 l. a
# U! b9 m: u* h4 v. x8 y5 ^
另外：
$ L# @% ~ V3 I5 c8 u% R- S9 ?
8 Y3 H/ e/ V9 k! l& O
m_pRecordset->Close(); 注意！！！不要多次关闭！！！！！！！！！！！！
" d6 \* U& D9 q" C% P- b
m_pConnection->Close();
6 }9 |" c. G9 j5 ~
m_pRecordset = NULL;
. A$ X( o9 a9 A2 i u/ ?
m_pConnection = NULL;
1 r8 ~5 I: o2 Q8 e& Y9 ?1 O) T
2. 引入ADO库文件
+ a/ M9 b, r }4 I1 O4 U
4 g- B; ~ t* ?
使用ADO前必须在工程的stdafx.h文件最后用直接引入符号＃import引入ADO库文件，以使编译器能正确编译。代码如下：
[& X7 ~0 [% Y T
#import "C:\Program Files\common files\system\ado\msado15.dll" no_namespace rename("EOF","adoEOF")
S' h- m9 g/ H/ z
ADO类的定义是作为一种资源存储在ADO DLL(msado15.dll）中，在其内部称为类型库。类型库描述了自治接口，以及C＋＋使用的COM vtable接口。当使用＃import指令时，在运行时Visual C＋＋需要从ADO DLL中读取这个类型库，并以此创建一组C＋＋头文件。这些头文件具有.tli 和.tlh扩展名，读者可以在项目的目录下找到这两个文件。在C＋＋程序代码中调用的ADO类要在这些文件中定义。
6 Z5 E6 ?8 x# o
程序的第三行指示ADO对象不使用名称空间。在有些应用程序中，由于应用程序中的对象与ADO中的对象之间可能会出现命名冲突，所以有必要使用名称空间。如果要使用名称空间，则可把第三行程序修改为： rename_namespace("AdoNS")。第四行代码将ADO中的EOF(文件结束)更名为adoEOF，以避免与定义了自己的EOF的其他库冲突。
6 b: ~" z$ F( M
% m& o# S6 T, k: I3 {
3．利用智能指针进行数据库操作
, b3 b+ A n# S+ I2 ]& g% Q& w
; p$ Z+ |: C2 r' O9 @7 }# _: J, f" s
在CaboutDlg头文件中定义两个ADO智能指针类实例,并在对话框中加入一个ListCtrl。
) A/ |3 w# i+ M6 r9 ^
2 f( |# {& k! c0 p/ d3 W- R
class CAdotestDlg : public CDialog
5 u5 b" P% z5 ?
{
$ L4 Q1 G8 X8 x) o ~
_ConnectionPtr m_pConnection;
" M. }1 f5 l8 ^% c! u( v# F
_RecordsetPtr m_pRecordset;
3 \! u6 n4 X8 c" `" r. K, s
ClistCtrl m_List;
4 _3 k9 K; x4 o5 G/ ]8 j' r a
......
- c4 n6 y/ S# D V1 R
}
! Y& _& G. W3 O' ^; x' V+ u& k( A
- n4 ^0 W% W. m4 Z
ADO库包含三个智能指针:_ConnectionPtr、_CommandPtr和_RecordsetPtr。
4 }7 Q& v& r( x1 o5 I" Y
. M: \) J8 L5 j7 h8 B
_ConnectionPtr通常被用来创建一个数据连接或执行一条不返回任何结果的SQL语句，如一个存储过程。
' z* w% E; g. L: V3 _4 b
_CommandPtr返回一个记录集。它提供了一种简单的方法来执行返回记录集的存储过程和SQL语句。在使用_CommandPtr接口时，可以利用全局_ConnectionPtr接口，也可以在_CommandPtr接口里直接使用连接串。 _RecordsetPtr是一个记录集对象。与以上两种对象相比，它对记录集提供了更多的控制功能，如记录锁定、游标控制等。
' b; n7 ~% M: D: m! V
" C2 o; t6 S9 @( Y
在使用ADO程序的事件响应中OnButton1加入以下代码:
" \9 a& Y) ?% s4 G
. C: @/ y6 B$ F( ~6 B" @5 P3 x
void CAdotestDlg::OnButton1()
2 v) m) ^$ A" j4 Y, n8 D9 j f
{
! a/ O' u* U9 p. K3 O
m_List.ResetContent();
. |% @. ?4 l( [+ y
m_pConnection.CreateInstance(_uuidof(Connection)); //初始化Connection指针
$ U& J' x5 ?8 O
m_pRecordset.CreateInstance(_uuidof(Recordset));//初始化Recordset指针
% Z2 _+ X& {' \+ X. I* `: X
try
& W$ f' ^, G9 n) }+ ]
{
3 |8 h4 y7 G. [: Q
m_pConnection->Open("DSN=ADOTest","","",0); //连接叫作ADOTest的ODBC数据源
( y/ Q; o& R6 h1 h
//注意：这是连接不需要用户ID或密码的open 函数
/ L+ G0 [( f; C0 i. I3 C! W, u* T
// 否则形式为 ->Open("DSN=test;uid=sa;pwd=123;","","",0);
7 [: w0 ]/ `9 ?8 L: F
. m, h! E1 N# L
// 执行SQL语句得到一个记录集把其指针赋值给m_pRecordset
( R5 b/ n. Z3 g2 V2 `- D
CString strSql="select * from middle";
. F: k2 X1 l' P, h# h' a
BSTR bstrSQL = strSql.AllocSysString();
5 {0 X3 l( ?& s; f5 ~( n
m_pRecordset->Open(bstrSQL,(IDispatch*)m_pConnection,adOpenDynamic,adLockOptimistic,adCmdText);
& m& J0 _. m2 s+ {, o* j4 U
//adOpenDynamic：动态 adLockOptimistic乐观封锁法 adCmdText：文本查询语句
8 X. f4 @. r6 h1 V
while(!m_pRecordset->adoEOF)//遍历所有记录
5 ]# c" V2 {1 e+ s9 \4 v( L t
{
& d: K0 n2 |& N8 ^" C) ]: f. o
//取纪录字段值方式之一
; v: k& H$ n* h6 N4 \0 l0 i7 \
_variant_t Thevalue; //VARIANT数据类型
! k! {5 h, ~ h
Thevalue = m_pRecordset->GetCollect("BIG_NAME");//得到字段BIG_NAME的值
2 b+ }& t# c6 X( y; a4 ~
if(Thevalue.vt!=VT_NULL)
R. A5 ?6 u/ z0 @3 k
m_List.AddString((char*)_bstr_t(Thevalue));
" W: N! D2 K0 B' T& q0 u) E
//将该值加入到列表控件中
- f6 u; E) N& b4 H8 d
5 r+ \; B3 |+ P! P0 ^6 Z
//取纪录字段值方式之二
+ J* r5 q! \% R7 o0 \! J. q
// _bstr_t Thevalue1=m_pRecordset->Fields->GetItem("BIG_NAME")->value;
* K) `9 x3 t" k9 h# J
// CString temp=Thevalue1.copy();
6 _- p. X% g" E8 L9 U% S
// m_List.AddString(temp);
3 x& u: I c# d* L/ p% L
//数据类型转换
' C* O- U1 i6 K' s$ u$ R. g8 y& @
_variant_t vUsername,vBirthday,vID,vOld;
, T5 L! [) C0 B! b5 @
TRACE("id:%d,姓名:%s,年龄:%d,生日:%s\r\n",
) x0 |2 c1 b( G v: q" n
vID.lVal,(LPCTSTR)(_bstr_t)vUsername,vOld.lVal,(LPCTSTR)(_bstr_t)vBirthday);
2 p$ k0 K6 u R& ~7 S* m% F* D
" A# Q8 J) N) H" n; }% q5 C( V
m_pRecordset->MoveNext();//转到下一条纪录
; W" J- T0 P% }7 a7 X( j' i
}
) z) v4 l/ M. B7 G2 C0 v( ~1 k
m_pRecordset->Close();
! Y; G, t$ r" \. D4 Y( [
m_pConnection->Close();
4 U9 B; p& |6 W& L" ]5 Z; T
}
5 l" [' a) f% ^+ R- F U# y" t8 K: O
catch (_com_error e)//异常处理
* |/ e7 Z' Q+ \
{
; Y1 E9 s9 B( M7 |$ P* M
AfxMessageBox(e.ErrorMessage());
' f' h( ^0 u+ r; O/ `$ q3 V6 C
}
( P9 n6 L- p! q7 S7 _4 `; _, n
m_pRecordset->Close(); //注意！！！不要多次关闭！！！！否则会出错
% p+ ^. ^- b6 J' O4 _' s
m_pConnection->Close();
6 p! f- n z O
m_pRecordset = NULL;
5 f/ ~6 Y' ]2 c- y5 ~1 m! C
m_pConnection = NULL;
6 Z$ ^: ^: Z5 x* w8 r
}
+ F; k* t: }7 _; C) l. a. W
. c" I! G6 k8 `
程序中通过_variant_t和_bstr_t转换COM对象和C＋＋类型的数据, _variant_t类封装了OLE自治VARIANT数据类型。在C++中使用_variant_t类要比直接使用VARIANT数据类型容易得多。
% }# Q4 X. H* f& b; J
& x3 `- z0 P' z/ v0 W4 r5 ^8 }
好，编译后该程序就能运行了，但记住运行前要创建一个叫ADOTest的ODBC数据源。该程序将把表middle中的BIG_NAME字段值显示在列表控件中。
作者:
chenlk
时间:
2005-4-9 16:35
有用
欢迎光临 数学建模社区-数学中国 (http://www.madio.net/)
Powered by Discuz! X2.5