VB+SQL常用技术.ppt

一、ADO数据库访问技术 1.常用ADO对象 connection对象 connection对象代表与数据库的连接.等价于到服务器的实际连接.在访问数据库时首先要创建一个connection对象.通过它建立到数据库的连接.创建方法: dim cnn As New ADODB.Connection Connectionstring属性. connectionstring是连接字符串，指定用于建立连接数据源的信息。 　　　可以通过ODBC数据源访问数据库，但此种方法须在运行数据库应用程序的计算机上配置ODBC，工作繁琐。 　　　可以通过直接设置数据源提供者（provider)和数据库文件的方法表示连接字符串。代码如下： Dim cnn As New ADODB.connection Cnn.connection=“provider=SQLOLEDB.1;Password=sa;UserID=sa;Initial Catalog=userMan;DataSource” Provider:定义数据源提供者 SQLOLEDB.1表示数据源是SQL server Password:指定访问数据库密码 UserID:指定访问数据库的用户名 Initial Catalog:要访问数据库 DataSource:指定访问数据库所在的服务器 Locallhost:表示数据库服务器就是本地计算机 ConnectionTimeout属性：指定终止尝试和产生错误之前执行命令需要等待的时间。默认为30s Mode属性：指定connection对象修改数据的权限。 State属性 返回connection状态 Open方法 用于打开到数据库的连接 语法结构: connection.open connectionstring,userID,Password,Option 若设置了connectionstring属性值,以上参数可省略. Close方法.关闭到数据源的连接 语法: connection.close 使用connection对象连接到数据库的方法 Private Sub Form_Load() Dim cnn as New ADODB.Connection Cnn.connectionstring=“provider=SQLOLEDB.1;Password=sa;userID=sa;Initial Catalog=UserMan;dataSource=localhost” Cnn.Open If cnn.state=adStateOpen then MsbBox”打开数据库” Endif Cnn.close If cnn.state=adStateClose then MsbBox”数据库关闭” Endif End Sub 2.Command对象 Command对象：定义对数据源执行的命令 主要属性 （1）Activeconnection 设置打开的连接与何connection对象关联 （2）CommandText属性 定义命令的可执行文本 （3）Execute方法。执行在commandText中指定的命令（查询语句、SQL语句或存储过程） Command对象使用实例-修改用户密码 Private sub command_click() Private Sub Form_Load() Dim cnn as New ADODB.Connection Cnn.connectionstring=“provider=SQLOLEDB.1;Password=sa;userID=sa;Initial Catalog=UserMan;dataSource=LEE” Dim cmd ad ADODB.Command Cnn.Open If cnn.state=adStateOpen then set cmd.Activeconnection=cnn mandtext=“UPDATE users SET userPwd=‘”trim(text1)’” where username=‘lee’” cmd.execute msgbox”密码修改成功” Else msgbox “连接数据库失败” Endif Cnn.close Unload me End Sub 3.Recordset对象 Recordset对象表示来自基本表或命令执行结果的记录全集 主要属性 Activeconnection属性 设置与打开的连接与Recordset对象关联 AbsolutePosit