计算机四级考试数据库重难点汇总（12）

会计考友

17.10 ADO对象模型
4 L" |2 g$ V( f# K; \Connection对象 -----ErrorS集合-----Error对象
Command对象 -----Parameters集合 ------Parameter对象
RecordSet对象 -----Fields集合 -----Field对象
17.11 Connection对象可以完成的操作：连接数据源打开数据库；执行一个数据库操作命令；利用Error对象检查数据源返回的出错信息。
17.12 销毁内存中的对象：Set 对象名= Nothing
8 D* n5 _0 ?" r17.13 Command对象的CommandText属性相当于ADO数据控件的RecordSource属性；
$ E# D6 y' V4 M% s4 N$ ?Command对象的CommandType属性相当于ADO数据控件的CommandType属性
8 ~; w8 W; V# r1 X# _4 ?+ V17.14 RecordSet对象的主要功能是建立记录集，并支持对记录集中各数据的各种操作。允许用户直接获取数据，因此RecordSet对象与ADO的访问过程无关。
17.15 CursorType属性：
4 d! {. l( K  g6 hadOpenDynamic动态游标：反映所有用户对数据的修改，支持向前及向后移动；
) J( g  ], @; O. j- B8 D+ M2 J- GadOpenStatic静态游标：不能反映其他用户的修改，支持向前及向后，当打开客户端RecordSet对象时，adOpenStatic为唯一允许的游标类型。当打印报表和其他不需要即时完成更新数据的应用程序来说很有用。
) Y& Y/ m6 @' R% {8 z& R; padOpenFowardOnly仅向前游标：默认值。仅支持向前移动，其他与adOpenStatic一致。
6 p5 `7 n( \$ L% Q/ U" H9 ?adOpenKeyset键集游标：介于动态和静态游标。只看到其他用户更改的看不到添加删除的
17.16 CursorLocation属性：
adUseClient：本地客户端游标。将整个结果集传给客户端，网络流量大但下载后浏览速度快
adUseServer：默认值，仅传送客户端需要的数据，网络流量小但服务器资源消耗大。不支持BookMark属性（书签，快速再定位）和AbsolutePosition属性
8 E9 _' \( n# [' _' nadUseNone：没有使用游标服务。
17.17 RecordSet.Open方法：
  {) s/ p6 b$ q5 E) C3 VmyRs.Open Source， ActiveConnection， CursorType， LockType， Options
9 [5 j8 q9 K4 v5 H: g/ a# [" Q1）Source支持的类别： 5）Options的可选项
; Y9 ^( w8 l8 U; c一个返回记录的Command对象 ///adCmdFile
7 V' e6 U+ U6 A# j: e3 kSQL语句 ――adCmdText
: r2 e/ D8 q4 d5 ^6 P表名 ――adCmdTable
存储过程名 ――adComdStoredProc
2）ActiveConnection：已打开的Connection对象；一个连接字符串
示例： Dim myCnn As New ADODB.Connection
8 k1 Q" }2 U' v- _& F2 }' }- d2 E4 FDim myRs As New ADODB.RecordSet
5 b  D! N2 `$ D, L6 ?( t% ~) C* umyCnn.Connection = “Provider = SQLOLEDB.1;User ID = sa;”_

会计考友

& “Initial Catalog = 商品经营管理数据库;Data Source=（local）”
3 i, N+ [) P0 G( V* \! SmyCnn.Open ‘别忘了“打开”
myRs.Source = “select * from T_Customer”
myRs.ActiveConnection = myCnn
: y8 t  t' X& P8 U* O, T+ `: C4 _myRs.CursorType = adOpenDynamic
  E6 q5 {; n+ W% A* v0 omyRs.CursorLocation = adUseClient
myRs.Open ， ， ， ， adCmdTalbe
17.18 创建RecordSet对象的三种方法：
9 k/ r7 c# G/ I' @( W6 [1）使用Connection对象：Set myRs = myConn.Execute（“select * from T_customer”）；
2）使用Command对象：Set myRs = myComm.Execute；
; K& |7 D% P0 c  W4 u" ?- A3）直接使用Open方法：myRs.Open ， ， ， ，
17.19 Error对象：如果最后一次的操作成功则这个集合为空。只有在OLE DB层产生错误才会将每个错误被翻译成Error对象，如果指向一个不存在的提供者则Errors集合不会得到任何信息，因为ADO不能发现这个指定的驱动程序，因此会将错误传递到Visual Basic Errors中。
% j; Y7 v) \8 S4 k17.20 三对象结合使用的典型示例：
Dim myCnn As New ADODB.Connection
Dim myCmm As New ADODB.Command
0 \, y+ T; T4 U1 M# _5 RDim myRs As New ADODB.RecordSet
0 J" ]. R# g* ?. q. o3 `9 f$ t9 QmyCnn.ConnectionString = “Provider = SQLOLEDB.1;User ID = loginID;” _
& “Initial Catalog = jessymin;Data Source =（local） ”
myCnn.Open ‘别忘了“打开”
Set myCmm.ActiveConnection = myCnn
1 k8 E6 I/ O- c- ~myCmm.CommandText = “select * from T_Customer”
- y, j7 x* F* S) O! k. SSet myRs = myCmm.Execute
17.21 VB自定义函数示例：将字段空值转化为空字符串
$ U& R  e3 _% N) d6 b: k  S: oPrivate Function convertNull（val As Variant） As Variant
9 T6 w0 A: r- v8 G+ w. @6 DIf IsNull（val） = True Then
3 s2 X5 j* r. b; H6 [4 \convertNull = “”
7 E, z- C- F7 Q0 C* C  SElse
convertNull = val
End If
, }) M1 X" g, Y* W2 [  c# ZEnd Function