Visual C++ ADO数据库编程入门
Visual C++ ADO数据库编程入门
3 t- Q# `: }; A# [+ SADO 是目前在Windows环境中比较流行的客户端数据库编程技术。ADO是建立在OLE DB底层技术之上的高级编程接口,因而它兼具有强大的数据处理功能(处理各种不同类型的数据源、分布式的数据处理等等)和极其简单、易用的编程接口,因而得到了广泛的应用。而且按微软公司的意图,OLE DB和ADO将逐步取代 ODBC和DAO。现在介绍ADO各种应用的文章和书籍有很多,本文着重站在初学者的角度,简要探讨一下在VC++中使用ADO编程时的一些问题。我们希望阅读本文之前,您对ADO技术的基本原理有一些了解。) }& N! {4 f% ?
一、在VC++中使用ADO编程7 f2 j- L% h8 l# Z }2 _* _
ADO实际上就是由一组Automation对象构成的组件,因此可以象使用其它任何Automation对象一样使用ADO。ADO中最重要的对象有三个:Connection、Command和Recordset,它们分别表示连接对象、命令对象和记录集对象。如果您熟悉使用MFC中的ODBC类(CDatabase、CRecordset)编程,那么学习ADO编程就十分容易了。
- E* W2 w9 M; J" L" e% Z 使用ADO编程时可以采用以下三种方法之一:
$ h( B/ F" g5 l! C- j3 g 1、使用预处理指令#import
# c8 u' a3 K$ K; @# @8 B" j9 m1 v- w+ O#import "C:\Program Files\Common Files\System\ADO\msado15.dll" \
% Y8 }1 X8 e( l9 |$ V3 `' |no_namespace rename("EOF", "EndOfFile")
' k; T# [9 o- [+ a 但要注意不能放在stdAfx.h文件的开头,而应该放在所有include指令的后面。否则在编译时会出错。5 x3 G7 p; R4 d" l" S
程序在编译过程中,VC++会读出msado15.dll中的类型库信息,自动产生两个该类型库的头文件和实现文件msado15.tlh和msado15.tli(在您的Debug或Release目录下)。在这两个文件里定义了ADO的所有对象和方法,以及一些枚举型的常量等。我们的程序只要直接调用这些方法就行了,与使用MFC中的COleDispatchDriver类调用Automation对象十分类似。
, I2 [: H& \3 ^( W n 2、使用MFC中的CIDispatchDriver
! x# F2 b8 U7 n; ?7 q0 P 就是通过读取msado15.dll中的类型库信息,建立一个COleDispatchDriver类的派生类,然后通过它调用ADO对象。# _4 K( ~ d: t! }' v9 m B
3、直接用COM提供的API% k* T) j' V4 _- @0 R o
如使用如下代码:
" B$ t) c( y- J7 H+ b1 }CLSID clsid;
4 h$ ]3 z1 ]4 ^4 jHRESULT hr = ::CLSIDFromProgID(L"ADODB.Connection", &clsid);# K& ~* z d: p' r7 x
if(FAILED(hr))
* H: [ a8 T' z& B{...}
( m7 V# O& P+ ^ n' u e::CoCreateInstance(clsid, NULL, CLSCTX_SERVER, IID_IDispatch, (void **)
- T u1 T( L# Z+ J0 u&pDispatch);1 f5 N+ ]- O* F0 {8 M
if(FAILED(hr))8 r) P$ I# M! a; ~9 t' X! @
{...} ' V: G& I. t. F. [" s. |+ n# D2 n# o
以上三种方法,第一和第二种类似,可能第一种好用一些,第三种编程可能最麻烦。但可能第三种方法也是效率最高的,程序的尺寸也最小,并且对ADO的控制能力也最强。
# y2 A+ g/ G: ]2 K! M 据微软资料介绍,第一种方法不支持方法调用中的默认参数,当然第二种方法也是这样,但第三种就不是这样了。采用第三种方法的水平也最高。当你需要绕过ADO而直接调用OLE DB底层的方法时,就一定要使用第三种方法了。( J5 w- m* a" F z9 B V+ j* i
ADO编程的关键,就是熟练地运用ADO提供的各种对象(object)、方法(method)、属性(property)和容器(collection)。另外,如果是在MS SQL或Oracle等大型数据库上编程,还要能熟练使用SQL语言。7 \) d( D; i7 e2 \ ^( p4 d9 b1 t3 a
二、使用#import方法的编程步骤* T5 n- @0 T6 ~' g
这里建议您使用#import的方法,因为它易学、易用,代码也比较简洁。
' ^2 g5 b) A% c4 `$ k% w2 | 1、 添加#import指令: ^, X# O. A+ g- R" ~4 Q
打开stdafx.h文件,将下列内容添加到所有的include指令之后:
; ~9 ]% r! i) s* f7 r) _2 }#include //Include support for VC++ Extensions/ c/ t# b5 {$ b7 o. w( u& K
#import "C:\Program Files\Common Files\System\ADO\msado15.dll" \
/ [1 H* a3 K8 y4 Y8 i( N( \no_namespace rename("EOF", "adoEOF") ( l3 T9 }* c. T# B6 k* }
其中icrsint.h文件包含了VC++扩展的一些预处理指令、宏等的定义,用于COM编程时使用。3 I/ E- z1 H2 L; ?
2、定义_ConnectionPtr型变量,并建立数据库连接
w9 f+ \) {$ u5 Y, ]) O3 w) _ } 建立了与数据库服务器的连接后,才能进行其他有关数据库的访问和操作。ADO使用Connection对象来建立与数据库服务器的连接,所以它相当于MFC中的CDatabase类。和CDatabase类一样,调用Connection对象的Open方法即可建立与服务器的连接。/ s' o$ a) ^# x/ ^5 W
数据类型 _ConnectionPtr实际上就是由类模板_com_ptr_t而得到的一个具体的实例类,其定义可以到msado15.tlh、comdef.h 和comip.h这三个文件中找到。在msado15.tlh中有:
: f2 ~# t) D. r! L" L_COM_SMARTPTR_TYPEDEF(_Collection, __uuidof(_Collection)); }5 C/ k9 G5 {) `3 K8 z
经宏扩展后就得到了_ConnectionPtr类。_ConnectionPtr类封装了Connection对象的Idispatch接口指针,及一些必要的操作。我们就是通过这个指针来操纵Connection对象。类似地,后面用到的_CommandPtr和_RecordsetPtr类型也是这样得到的,它们分别表示命令对象指针和记录集对象的指针。
6 c. Z$ k; }8 H3 ~9 d (1)、连接到MS SQL Server
4 Z5 e8 J8 M8 R+ U/ @* A; ^ 注意连接字符串的格式,提供正确的连接字符串是成功连接到数据库服务器的第一步,有关连接字符串的详细信息参见微软MSDN Library光盘。
( f9 k- S# \6 \9 a2 Q# @: M3 j 本例连接字符串中的server_name,database_name,user_name和password在编程时都应该替换成实际的内容。' g3 k# ^) b7 x# b2 r0 d$ C
_ConnectionPtr pMyConnect=NULL;/ o) _* Z) d! K; b* A5 _; C* x4 Y
HRESULT hr=pMyConnect.CreateInstance(__uuidof(Connection)));
k" C5 \- A* a2 Y7 |8 dif(FAILED(hr))return;
# h1 V& Z* d. U: D2 ]_bstr_t strConnect="Provider=SQLOLEDB; Server=server_name;"1 R, {: `9 N+ Y3 F/ E: h# n
"Database=database_name; uid=user_name; pwd=password;";
% O d& X& L: D, x8 N% z: U' b//connecting to the database server now:
i1 c0 |. \* S# Htry{pMyConnect->Open(strConnect,"","",NULL);}
6 F& N& n/ o0 H# T8 x4 Acatch (_com_error &e)
0 [* T, ?/ F# B1 K. C: \( M% n{# W3 ^4 \$ X) d- z4 c- m, M, R5 f+ }( O
::MessageBox(NULL,e.Description(),"警告",MB_OK │ MB_ICONWARNING);
% I' G5 p z! M1 | `4 W9 X}
- X1 T: ?0 ~! O0 s/ u2 q2 k: p% h5 c 注意Connection对象的Open方法中的连接字符串参数必须是BSTR或_bstr_t类型。另外,本例是直接通过OLE DB Provider建立连接,所以无需建立数据源。
' z: D) d W1 p; D: ^ (2)、通过ODBC Driver连接到Database Server连接字符串格式与直接用ODBC编程时的差不多:/ y& K) Z7 d7 ?* ]& B
_bstr_t strConnect="DSN=datasource_name; Database=database_name; uid=user_name; pwd=password;";
; \, x% G% }& w) {0 a5 V" Z7 G 此时与ODBC编程一样,必须先建立数据源。
3 n+ m+ c1 O3 ~- _* F: v5 c$ `. N 3、定义_RecordsetPtr型变量,并打开数据集% [) i* N# _ |3 |$ G0 n, b
定义_RecordsetPtr型变量,然后通过它调用Recordset对象的Open方法,即可打开一个数据集。所以Recordset对象与MFC中的CRecordset类类似,它也有当前记录、当前记录指针的概念。如:3 `( h' p! E; J+ b
_RecordsetPtr m_pRecordset;
; z1 r; L2 U$ q* Q' u/ Pif(!FAILED(m_pRecordset.CreateInstance( __uuidof( Recordset )))( k, x7 q" K: L7 y6 D
{
, S, J4 i9 j! P' @4 T6 ]m_pDoc->m_initialized=FALSE;: N/ }/ i, K ?: q
return;
! Q/ _2 R& |- C3 z: b}; y2 I( j. h: T4 ?/ G
try{+ I3 V' Z( L$ Y: e+ G! @* b" |. A2 t- m
m_pRecordset->Open(_variant_t("mytable"),
" j: X: {7 o6 v5 A( D/ U- t_variant_t((IDispatch *)pMyConnect,true), adOpenKeyset,4 x" z. {5 ^* f7 [* y! o4 _
adLockOptimistic, adCmdTable);' V1 v- W! r/ K I
}1 c# J! {: k* n( W! S$ L, y
catch (_com_error &e)* d+ X4 u* D) ]1 [7 W" T% R
{& l, ]0 X/ R' ^% Z3 t: O. u
::MessageBox(NULL,"无法打开mytable表。","提示",
" j9 w5 Y& v! d" cMB_OK │ MB_ICONWARNING);
" O' H- [" C& W3 ^+ n6 E* q2 d}
/ H+ v R& D: v2 q: x1 W" e1 u/ {8 H Recordset对象的Open方法非常重要,它的第一个参数可以是一个SQL语句、一个表的名字或一个命令对象等等;第二个参数就是前面建立的连接对象的指针。此外,用Connection和Command对象的Execute方法也能得到记录集,但是只读的。4 E, ]) w: M% V1 r- l5 J! T2 o) \" }
4、读取当前记录的数据
9 A9 D$ D) t4 S) O. }2 N; D2 g 我认为读取数据的最方便的方法如下:3 A. O3 N$ ] Z6 L
try{: X! M# U5 o. z& d* S
m_pRecordset->MoveFirst();
: s+ T7 i# d- n+ o- I* C- iwhile(m_pRecordset->adoEOF==VARIANT_FALSE)
# h% ~, Z/ i7 A" s$ [) Z$ ?* H{
5 H% e y, C2 r) B- E//Retrieve column's value: - i! K7 S6 F3 i- _$ ]& a5 T' A: r
CString sName=(char*)(_bstr_t)(m_pRecordset->Fields->GetItem% R" }* x g1 n: H& X
(_variant_t("name"))->Value);
7 a. E* R% ]- Z6 m& ?1 _5 c3 pshort cAge=(short)(m_pRecordset->Fields->GetItem2 B% |, \' D+ D
(_variant_t("age"))->Value);
( }' V3 o% ?2 y) u4 m//Do something what you want to do:
8 M+ `. k' A9 \: `; \......4 n2 \" v6 o9 k: V8 F3 C: M
m_pRecordset->MoveNext(); / `9 B4 L Y. j9 i3 W/ I* u; v
}
" a& J9 c1 ~: H1 ^: {}//try
$ n" Z- u" m/ a& I2 H8 G# h3 {catch (_com_error &e)
/ r+ R% i: \. y) X3 N- W; f+ X{( [5 K. _" l0 {: ^" O. o- R8 S2 S
CString str=(char*)e.Description();1 I( H( \& J8 q# {- i5 G; A
::MessageBox(NULL,str+"\n又出毛病了。","提示",
* j7 ?7 i( W( eMB_OK │ MB_ICONWARNING);
3 Z% T, E; B" \$ }}
" b$ s @) V' H 本例中的name和age都是字段名,读取的字段值分别保存在sName和cAge变量内。例中的Fields是Recordset对象的容器,GetItem方法返回的是Field对象,而Value则是Field对象的一个属性(即该字段的值)。通过此例,应掌握操纵对象属性的方法。例如,要获得Field 对象的Value属性的值可以直接用属性名Value来引用它(如上例),但也可以调用Get方法,例如:' E0 B( {9 g- Y$ R
CString sName=(char*)(_bstr_t)(m_pRecordset->Fields->GetItem. R" U8 g, v0 H% h
(_variant_t("name"))->GetValue()); # _( y P7 k% `# ^0 f
从此例还可以看到,判断是否到达记录集的末尾,使用记录集的adoEOF属性,其值若为真即到了结尾,反之则未到。判断是否到达记录集开头,则可用BOF属性。- x& ?* N$ a9 @0 Y) y+ B
另外,读取数据还有一个方法,就是定义一个绑定的类,然后通过绑定的变量得到字段值(详见后面的介绍)。
- y3 g; m! z7 F$ `# E 5、修改数据
# M7 L8 u- D" e' d 方法一:
$ K. V# C. m& i- P7 Ttry{/ r$ q( m; Q$ c( z% x
m_pRecordset->MoveFirst();
0 I3 f# D1 O6 i6 t( e& w V% Rwhile(m_pRecordset->adoEOF==VARIANT_FALSE) 0 i5 I9 f& k, x6 i6 G) Q$ h
{ ; V$ m; m* }1 d; T' L2 u
m_pRecordset->Fields->GetItem2 D6 m7 N3 m1 x4 X: O4 G
(_variant_t("姓名"))->Value=_bstr_t("赵薇");; O) P9 D0 F& y% c( q- h7 G. w( K
......
. m( Q( Z3 A: @! `/ p( g+ c+ x/ Nm_pRecordset->Update();' s" M U% _6 j3 F
m_pRecordset->MoveNext(); " }6 Z" @ D# z3 h" m# w
}
6 @' H! d, A" z4 X, z}//try
! y. Z0 x6 X5 t1 j I 改变了Value属性的值,即改变了字段的值。
6 J" b5 M& X, O: _9 U' F8 ]& j 方法二:/ g; l& m- U. C- p* Z
m_pRecordset->Fields->GetItem
6 O0 @/ }9 T) L0 z/ T3 d(_variant_t("姓名"))->PutValue(_bstr_t("赵薇"));
* v' E/ M' Y% Q" ?( w 方法三:就是用定义绑定类的方法(详见后面的介绍)。8 `) x T2 n2 w4 D* {# g
6、添加记录4 v/ j( [ B a, s+ Q; ?9 m
新记录添加成功后,即自动成为当前记录。AddNew方法有两种形式,一个含有参数,而另一个则不带参数。9 b' W0 w0 n- U" q- a1 r$ @0 ^9 o
方法一(不带参数):4 z+ T* r. t# _' M
// Add new record into this table:
6 _& e( i/ Q% c& G" K: [try{
- C3 Y! \0 Y( T! M6 aif(!m_pRecordset->Supports(adAddNew)) return;1 ~/ R; P3 M8 n7 {9 P8 n
m_pRecordset->AddNew(); R5 P7 U8 T/ N# j
m_pRecordset->Fields->GetItem3 @" ]6 T* X2 s5 y
(_variant_t("姓名"))->Value=_bstr_t("赵薇");
' Z0 ^. k! H" ?% c* D5 e0 h. J! pm_pRecordset->Fields->GetItem
( H6 [: R" [4 J(_variant_t("性别"))->Value=_bstr_t("女");8 u. p* I' ^' Q( e
m_pRecordset->Fields->GetItem
$ \9 H6 E! T1 V' S$ B7 X6 O2 q" I. Z(_variant_t("age"))->Value=_variant_t((short)20);
: y" N) ]& [0 t& b4 R7 v0 vm_pRecordset->Fields->GetItem
; u. y& X2 p7 Z, i* }2 c(_variant_t("marry"))->Value=_bstr_t("未婚");7 T; x' i E4 O3 E9 M
m_pRecordset->Update();
( Q( m4 f- s; \- \$ }- }4 Q) L}//try
% c6 \6 V4 W* S. F6 k8 ^catch (_com_error &e) p$ Z) y2 }% Z& j$ W
{. M) z2 J/ {7 E: d2 `4 c& J
::MessageBox(NULL, "又出毛病了。","提示",MB_OK │ MB_ICONWARNING);
$ T( E% T- n* U R8 P+ C2 k}
搜索更多相关主题的帖子:
ADO 数据库 Visual 入门