vbsession12TP北大青鸟(vb)

《vbsession12TP北大青鸟(vb)》由会员上传分享，免费在线阅读，更多相关内容在行业资料-天天文库。

1、在VB中访问数据库：数据库查询和数据库显示第十二章回顾在Windows中建立ODBC数据源ADO及使用ADO连接对象属性方法事件目标理解和使用RecordSet对象的属性和方法使用ADORecordSet对象进行数据查询使用RecordSet对象对数据库进行操作使用MSFlexGrid控件显示查询结果数据复习：ADO和连接对象Connection对象的用途是什么？如何使用ADOConnection与ACCESS和SQLServer进行数据库连接？RecordSet对象RecordSet对象允许进行以下操作指定可以对那些行进行操作定位行指定可

2、能要进行定位的行序添加、删除和更改行声明和定义RecordSet对象DimrsAsADODB.Recordset使用Record对象的Open方法参数描述：Source——表名或SQL语句ActiveConnection——连接对象CursorType——游标类型LockType——记录的锁定类型Options——指示提供者如何计算Source参数Recordset.Open[Source],[ActiveConnection],[CursorType],[LockType],[Options]Fields和Field对象Field表示“域

3、”，也就是记录集的列信息Fields是一个集合对象，表示当前记录集的域或者字段集合Field对象表示当前记录集中的单个域一个或多个Field组成Fields。Fields集合的属性和方法属性名称属性说明Count表示集合中元素的个数，也就是当前记录集有多少列，例如：R=rctClient.Fields.CountR将是记录集rctClient的列数Item有一个索引参数的属性，返回一个Field，例如：N=rctClient.Fields.Item(1).NameN将得到记录集rctClient第二列的名称，注意第一列下标为零方法名称方法说

4、明Delete删除一列，例如：rctClient.Fields.Delete(1)将删除记录集rctClient的所有第二列的数据。Refresh更新列信息Field的属性属性名称属性说明Name得到记录特定列的名称，例如：N=rctClient.Fields.Item(0).NamerctClient.Fields.Item(1)是一个Field对象，N将得到记录集rctClient第一列的名称。Value当前行、当前列数据的值，例如，当记录集定位在某一行时：V=rctClient.Fields.Item(“ABC”).ValueV将得到

5、该行ABC列的值。RecordSet对象的属性属性名称属性说明BOF、EOF分别标识记录集当前的位置是否在第一个记录之前或者在最后一个记录最后，在跟踪记录集的行信息时特别有用。Filter指定一个筛选条件，以屏蔽某些记录，筛选后将定位到筛选的行，筛选条件可以是查询语句WHERE关键词后的子句，例如：rctClient.Filter=“strName=‘123’”将快速定位到Name列行值为123的行。MaxRecords指定和限制通过查询返回Recordset的记录的最大数目。RecordCount返Recordset对象中记录的数目。注意

6、，该属性在某些时候不能返回记录集的精确的行数。RecordSet对象的方法方法名称方法说明MoveFirstMoveLastMoveNextMovePrevious在记录集上移动记录集指针，以定位到不同的数据行，MoveFirst表示移动到第一行，MoveLast移动到最后一行，MoveNext移动到当前行的下一行，MovePrevious移动到当前行的前一行。记录集的初始位置在第一行。AddNew为记录集增加一行数据，注意，打开的记录集必须是可更新Update在更改记录集某行信息之后，保存对Recordset对象的当前记录所做的所有更改。

7、CancelUpdate取消在调用Update方法前对当前记录或新记录所做的任何更改。Delete删除当前记录行Save以文件名为参数，把当前的记录集保存为文件，例如：rctClient.Save“C:ABC.TXT”把当前记录集中的所有数据保存为物理文件“C:ABC.TXT”。UpdateBatch将正在更新的一批记录更新到数据库。Open打开记录集，获取数据，前面已经介绍。记录集操作-定位记录集的行rst.MovePreviousIfrst.BOF=TrueThenMsgBox"已经是记录集的开头"rst.MoveFirstEndI

8、frst.MoveNextIfrst.EOF=TrueThenMsgBox"已经是记录集的结尾"rst.MoveLastEndIf定位记录集的行记录集操作-添加记录rstemp.