使用VB开发SQL_Server应用程序.ppt

第11章 使用VB开发SQL Server应用程序 第11章 使用VB开发SQL Server应用程序 第11章 使用VB开发SQL Server应用程序 引用ADO类库 第11章 使用VB开发SQL Server应用程序 Connection对象 第11章 使用VB开发SQL Server应用程序 Recordset对象 第11章 使用VB开发SQL Server应用程序 Close方法 第11章 使用VB开发SQL Server应用程序 Field对象 第11章 使用VB开发SQL Server应用程序 Recordset对象的定位方法 第11章 使用VB开发SQL Server应用程序 Recordset对象的定位方法 第11章 使用VB开发SQL Server应用程序 Recordset对象的定位方法 第11章 使用VB开发SQL Server应用程序 Recordset对象的定位方法 第11章 使用VB开发SQL Server应用程序 Recordset对象的定位方法 第11章 使用VB开发SQL Server应用程序 Recordset对象的定位方法 第11章 使用VB开发SQL Server应用程序 Recordset对象的定位方法 第11章 使用VB开发SQL Server应用程序 搜索记录集中的数据 第11章 使用VB开发SQL Server应用程序 使用Bookmark书签 * 三步曲开端 用Field对象操作字段 结合Recordset对象使用定位方法 搜索记录集和表中的数据 使用Bookmark属性记录在Recordset中的位置 开发一个集于ADO技术的VB数据库应用程序的 三步曲开端 引用ADO类库 利用ADO的Connection对象连接可用的数据源 利用ADO的Recordset对象返回需要操作的记录集 1.中可引用ADO类库 Microsoft ActiveX Data Objects 2.0 Library Microsoft ActiveX Data Objects 2.1 Library Microsoft ActiveX Data Objects 2.5 Library Microsoft ActiveX Data Objects 2.6 Library 菜单：[工程]→[引用…] 2.使用Connection对象连接可用的数据源 定义1个Connection对象; Dim cn As New ADODB.Connection 设置Connection对象的CursorLocation属性为“位于客户端的游标”(adUseClient)； cn.CursorLocation = adUseClient 定义连接字符串 provider=MSDASQL;dsn=bookdb;uid=sa;pwd=;“(ODBC) driver=SQL SERVER;server=toshiba;uid=sa;pwd=;database=bookdb“(OLE DB) 通过Connection对象的Open方法建立数据连接； cn.Open provider=MSDASQL;dsn=bookdb;uid=sa;pwd=;(ODBC) cn.Open driver=SQL SERVER;server=toshiba;uid=sa;pwd=;database=bookdb (OLE DB) 3.使用Recoedset对象返回需要操作的记录集(临时表) 定义1个Recordset对象; Dim rs As New ADODB.Recordset 定义检索语句 可以是： SQL查询语句：mysql = select top 1 * from book 或 直接是表名： mysql = “book 通过Recordset对象的Open方法返回记录集（建立临时表）； rs.Open mysql, cn 或 rs.Open mysql, cn, adOpenStatic, adLockOptimistic, adCmdTable (分别设定： CursorType、 LockType和Options参数) 使用Connection和Recordset的Close方法 通过使用Connection和Recordset的Close方法，可以释放记录集，关闭和数据源的连接。 Set Connection=nothing Connection.Close 和 Set Recordset=nothing Recordset.Close Set rs = nothing Cn.Close 可以靠检查Field对象的Value属性来获得字段的值 （因为Field对象的缺省属性