《数据库的演讲.ppt》由会员分享，可在线阅读，更多相关《数据库的演讲.ppt（28页珍藏版）》请在课桌文档上搜索。
1、,ADO的形象化理解,我们通过一个生活中的例子来理解ADO对象的作用。日常生活中我们引用的自来水是从远程的水库经过铺设的管道，最后流入千家万户的，如果我们把SQL Server 2000服务器比喻为水库，把数据比喻为水的话，那么ADO对象就是铺设的自来水管道。与生活中例子不同的是，数据库系统操作的数据还可能通过这条数据管道最后回流SQL Server 2000数据库。有了ADO，我们在开发数据库系统时就非常简单，大量的工作在开发前台应用界面上，然后将界面中显示数据的控件和ADO对象进行衔接即可。,ADO的分类,ADO技术在实现上又分为ADODC和ADODB两种。两者的功能几乎完全一样，只是在实
2、现的具体方式上有所不同。ADODC是一个图形化的ActiveX控件，而ADODB不以图形化控件的方式出现。,ADO的分类,ADODC控件提供了有限的一些接口参数、属性和方法，初学者通过简单的配置后就可以掌握该控件的使用方法，从而快速掌握ADO技术。ADODC提供了存取数据库数据的功能，但毕竟灵活性有限。要通过ADO技术开发出强大的、灵活的数据库项目，就需要学习ADODB编程技术。在Visual Basic这样的可视化编程工具中，既提供了ADODB，也提供了ADODC，两者既可以单独使用，也可以同时使用。,前面我们利用ADODC控件编写了一个简单的数据库程序，下面来了解一个稍微复杂的ADODC控
3、件编程实例，通过本例的学习，大家可以进一步掌握ADO的基本概念，之后再来学习ADODB就会比较容易。,ADODC编程,ADODC如何连接数据库,显示数据控件如何设置,逻辑代码的处理,添加,单击添加按钮后的执行代码Private Sub CmdInsert_Click()调用AddNew方法向记录集中添加记录 Adodc1.Recordset.AddNew 设置其他按钮的状态 CmdInsert.Enabled=False CmdDelete.Enabled=False CmdUpdate.Enabled=False CmdFirst.Enabled=False CmdPrevious.Enab
4、led=False CmdNext.Enabled=False CmdLast.Enabled=False CmdSave.Enabled=True CmdCancel.Enabled=TrueEnd Sub,Adodc1.Recordset为Adodc1控件的记录集，表示从目的表中提取出来的内存中的数据。,AddNew是在内存中添加一条记录的方法。添加的记录这时并没有真正写入物理上的数据库中，而是存在于内存中，然后调用UPDATE方法才能将数据真正添加,删除,单击删除按钮后的执行代码Private Sub CmdDelete_Click()Dim Ans As Integer 在删除记录之前
5、对用户有一个警告 Ans=MsgBox(确定删除该记录吗？,vbYesNo,警告)If Ans=vbYes Then Adodc1.Recordset.Delete End IfEnd Sub,修改,单击修改按钮后的执行代码Private Sub CmdUpdate_Click()直接对文本框中的数据进行修改就可以，然后单击保存按钮就可以 CmdInsert.Enabled=False CmdDelete.Enabled=False CmdUpdate.Enabled=True CmdCancel.Enabled=True CmdSave.Enabled=True CmdFirst.Enabl
6、ed=False CmdPrevious.Enabled=False CmdNext.Enabled=False CmdLast.Enabled=FalseEnd Sub,因为显示数据控件直接取之于Adodc1控件，也是直接在内存中对数据进行操作，所以对记录集进行修改直接在控件中过修改既可。修改后的数据需要调用update方法才能真正写入数据库中。,保存,单击保存按钮后的执行代码Private Sub CmdSave_Click()通过Update方法将Recordset中的数据提交到数据库 Adodc1.Recordset.Update 恢复其他控件的属性 CmdInsert.Enabled
7、=True CmdDelete.Enabled=True CmdUpdate.Enabled=True CmdFirst.Enabled=True CmdPrevious.Enabled=True CmdNext.Enabled=True CmdLast.Enabled=True 同时使保存和取消按钮失效 CmdSave.Enabled=False CmdCancel.Enabled=FalseEnd Sub,记录集的update方法用来完成将内存中更改后的记录集提交到物理数据库中，即真正将数据写入数据库。,取消,单击取消按钮后的执行代码Private Sub CmdCancel_Click(
8、)通过CancelUpdate方法取消对数据的保存 Adodc1.Recordset.CancelUpdate 恢复其他控件的属性 CmdInsert.Enabled=True CmdDelete.Enabled=True CmdUpdate.Enabled=True CmdFirst.Enabled=True CmdPrevious.Enabled=True CmdNext.Enabled=True CmdLast.Enabled=True 同时使保存和取消按钮失效 CmdSave.Enabled=False CmdCancel.Enabled=False End Sub,记录集的Cance
9、lUpdate方法用于取消对内存中记录的修改,首记录,单击首记录按钮后的执行代码Private Sub CmdFirst_Click()调用MoveFirst方法指向记录集的首记录 Adodc1.Recordset.MoveFirstEnd Sub,记录集的MoveFirst方法表示将游标移动到记录集的第一条记录。,什么是cursor（游标）？Recordset是内存中的一块特殊的部分，它在内存中是一个密不可分的整体。我们无法把它拆开来访问，而应用程序一般需要一种逐行读取数据的机制，希望对Recordset中的某个记录进行操作。这就要用到游标机制。游标可以理解为很多个指向Recordset对象
10、的指针，通过游标用户可以对指定位置记录进行处理。,前一条,单击前一条按钮后的执行代码Private Sub CmdPrevious_Click()移动记录到前一条的方法是MovePrevious 在调用MovePrevious方法之前，首先需要判断，当前是不是已经到了最前面 判断方法是调用BOF属性，如果BOF为真，则表示一定到了最前，不能移动 否则会出错 If Not Adodc1.Recordset.BOF Then Adodc1.Recordset.MovePrevious Else 如果为真，则移动到第一条记录 Adodc1.Recordset.MoveFirst End IfEnd
11、Sub,后一条,单击后一条按钮后的执行代码Private Sub CmdNext_Click()移动记录到下一条的方法是MoveNext 在调用MoveNext方法之前，首先需要判断，当前是不是已经到了最后 判断方法是调用EOF属性，如果EOF为真，则表示一定到了最后，不能移动 否则会出错 If Not Adodc1.Recordset.EOF Then Adodc1.Recordset.MoveNext Else 如果为真，则移动到最后一条记录 Adodc1.Recordset.MoveLast End IfEnd Sub,尾记录,单击尾记录按钮后的执行代码Private Sub CmdLa
12、st_Click()调用MoveLast Adodc1.Recordset.MoveLastEnd Sub,隐藏ADODC控件,ADODB的体系结构,从以上的例子可以看出利用ADODC控件就可以开发出功能完备的vb数据库系统了，但是ADO中的ADODB才真正体现了面向对象编程方法，这也是大家今后学习其他编程工具的精髓。,ADODB的体系结构,ADODB主要包括3个对象：Connection对象、Recordset对象和Command对象。Connection对象的作用就是建立客户机和服务器之间的数据通道；Recordset对象的作用是在客户机内存中开辟的一块区域，该区域存储的就是从数据库中按照
13、要求提取出来的数据；Command对象是用来执行SQL语句或存储过程的对象。(用得很少),引用ADODB对象,使用ADODB对象的方法和ADODC控件不一样，ADODB是没有图形化的控件，所以使用ADODB对象的方法是首先进行引用，然后进行实例化。,引用ADODB对象,不同的计算机环境和安装的软件不一样，导致出现的ADODB可用的版本可能有多种，在开发时常见的是ADODB2.6,这是几乎所有的windows操作系统都支持的。,实例化ADODB对象,引用了ADODB后仅仅是告诉vb程序中将要使用ADODB对象了，这样在编译程序时将自动寻找ADODB对象的定义，而不会出现用户类型未定义的提示信息。
14、ADODB引入后，下面需要实例化ADODB，生成自己程序中要使用的对象。,实例化对象的方法如下：Dim 对象实例名称 as new 对象库名称.对象类型名称例如：Dim conn As New ADODB.ConnectionDim rs as new adodb.recordset,ADODB的Connection对象,Connection对象的使用方法举例：,定义一个名为conn的connection对象，好比是买了自来水管道Dim conn As New ADODB.Connection定义字符串类型的连接串Dim connstr As String单击实例化Connection对象按钮
15、后的执行代码Private Sub CmdExecute_Click()connstr=Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;User ID=sa;Initial Catalog=db_student;Data Source=lq conn.ConnectionString=connstr 打开服务器上的水闸 conn.Open connstr 中间的处理过程.关闭服务器的水闸 conn.Close 撤销管道，释放系统资源 Set conn=Nothing MsgBox 成功完成Conn
16、ection对象的操作流程,成功提示End Sub单击退出按钮后的执行代码Private Sub CmdExit_Click()Unload MeEnd Sub,ADODB的Recordset对象,Recordset对象的使用方法举例：,定义一个名为conn的connection对象，好比是买了自来水管道Dim conn As New ADODB.Connection定义一个名为rs的Recordset对象，好比是客户机上准备存水的容器Dim rs As New ADODB.Recordset定义字符串类型的连接串Dim connstr As String单击实例化Recordset对象按钮后
17、的执行代码Private Sub CmdExecute_Click()connstr=Provider=SQLOLEDB.1;Integrated Security=SSPI;Persist Security Info=False;User ID=sa;Initial Catalog=db_student;Data Source=lq conn.ConnectionString=connstr 打开服务器上的水闸 conn.Open connstr 将提取出来的数据放在客户机的内存中 rs.CursorLocation=adUseClient 打开水龙头 rs.Open T_STUDENT,conn,adOpenKeyset,adLockPessimistic 中间的处理过程.关闭水龙头 rs.Close关闭服务器的水闸 conn.Close 撤销容器，释放系统资源 Set rs=Nothing 撤销管道，释放系统资源 Set conn=Nothing MsgBox 成功完成Recordset对象的操作流程,成功提示End Sub单击退出按钮后的执行代码,小结,
