文档介绍:1
第11章使用VB开发SQL Server应用程序
三步曲开端
用Field对象操作字段
结合Recordset对象使用定位方法
搜索记录集和表中的数据
使用Bookmark属性记录在Recordset中的位置
2
第11章使用VB开发SQL Server应用程序
开发一个集于ADO技术的VB数据库应用程序的
三步曲开端
引用ADO类库
利用ADO的Connection对象连接可用的数据源
利用ADO的Recordset对象返回需要操作的记录集
3
第11章使用VB开发SQL Server应用程序
Microsoft ActiveX Data Objects Library
Microsoft ActiveX Data Objects Library
Microsoft ActiveX Data Objects Library
Microsoft ActiveX Data Objects Library
引用ADO类库
菜单:[工程]→[引用…]
4
第11章使用VB开发SQL Server应用程序
Connection对象
定义1个Connection对象;
As New
设置Connection对象的CursorLocation属性为“位于客户端的游标”(adUseClient);
= adUseClient
定义连接字符串
" provider=MSDASQL;dsn=bookdb;uid=sa;pwd=;“(ODBC)
"driver=SQL SERVER;server=toshiba;uid=sa;pwd=;database=bookdb“(OLE DB)
通过Connection对象的Open方法建立数据连接;
"provider=MSDASQL;dsn=bookdb;uid=sa;pwd=;"(ODBC)
"driver=SQL SERVER;server=toshiba;uid=sa;pwd=;database=bookdb" (OLE DB)
5
第11章使用VB开发SQL Server应用程序
Recordset对象
(临时表)
定义1个Recordset对象;
Dim rs As New
定义检索语句
可以是: SQL查询语句:mysql = "select top 1 * from book"
或 直接是表名: mysql = “book"
通过Recordset对象的Open方法返回记录集(建立临时表);
mysql, cn
或
mysql, cn, adOpenStatic, adLockOptimistic, adCmdTable
(分别设定: CursorType、 LockType和Options参数)
6
第11章使用VB开发SQL Server应用程序
Close方法
使用Connection和Recordset的Close方法
通过使用Connection和Recordset的Close方法,可以释放记录集,关闭和数据源的连接。
Set Connection=nothing
和
Set Recordset=nothing
Set rs = .Close
7
第11章使用VB开发SQL Server应用程序
可以靠检查Field对象的Value属性来获得字段的值
(因为Field对象的缺省属性是Value属性,你只要引用Field对象即可,不需要明显的引用Value属性)
Field对象
各种语法形式:
("LastName")
rs!LastName
rs![LastName]
在Fields集合中,也可以用索引来标识Field字段:
(0)
可以使用索引循环遍历整个集合,在每一轮的循环中将索引的值加一。集合中的对象编号是从0开始的,因此第一个Field的编号为0,第二个为1,依此类推。字段的顺序是由基本表决定的。通常按照打开记录集时取得的顺序对字段进行编号。
8
第11章使用VB开发SQL Server应用程序
(1) Recordset对象的定位方法:
MoveFirst方法用于转到记录集的第一行。
MoveNext方法