《vb数据库编程以几个ado模型中最简单而又常用的对象为例.pdf》由会员分享,可在线阅读,更多相关《vb数据库编程以几个ado模型中最简单而又常用的对象为例.pdf(5页珍藏版)》请在taowenge.com淘文阁网|工程机械CAD图纸|机械工程制图|CAD装配图下载|SolidWorks_CaTia_CAD_UG_PROE_设计图分享下载上搜索。
1、VBVBVBVB 数据库编程数据库编程用较为简单的例子教大家学会最基本的数据库操作,数据库选用 access其实数据库编程相对比较简单,尤其是用 vb 操作,首先要简单的熟悉一下 ADO 模型,如果再网上搜索,会找到许多相关答案,其实我们常用的只有其中三个对象,分别是 Connection、RecordSet、Command,下面我就用几个简单的例子教大家如何使用:一、RecordSet 和 Connection 对象:在桌面上建立一个 access 数据库,名称为 MyDatabase.mdb,为了简单起见,直接使用向导创建表,建立表“邮件列表”,将名字、地址、国家/地区(改为国家)、住宅电
2、话、四个字段都选进来,如下图:Connection 对象主要是用来建立数据库的连接,也就是说,RecordSet 和 Command 对象都要使用 Connection 对象所创建的连接,表建立完成之后,启动一个 vb 工程,在工程菜单下选择“引用”,如下图:找到 MicrosoftActiveX Data Objects 2.5 library,也可以使用更高的版本,但没必要,确定之后,在窗体上画四个文本框和四个标签,名称默认,标题如下图所示:下面就开始建立数据库连接,在按钮的单击事件下添加以下代码(红色字体的实际是一行代码,建议拷贝到vb 编辑器中在浏览):Private Sub Comm
3、and1_Click()创建对象Dim connAsADODB.ConnectionDim rsAs ADODB.Recordset开辟内存空间Set conn=NewADODB.ConnectionSet rs=New ADODB.Recordset打开数据库conn.OpenProvider=Microsoft.Jet.OLEDB.4.0;DataSource=C:DocumentsandSettingsAdministrator桌面MyDatabase.mdb;Persist Security Info=Falsers.Open 邮件列表,conn,adOpenKeyset,adLock
4、Pessimistic将文本框中的内容添加到数据库中With rs.AddNew!名字=Text1.Text!地址=Text2.Text!国家=Text3.Text!住宅电话=Text4.Text.UpdateEnd With释放内存Set conn=NothingSet rs=NothingEnd Sub二、Command 对象在上一个例子的基础上添加一个按钮名称为 command2,标题为“删除记录”,在单击事件下添加如下代码:Private Sub Command2_Click()Dim cmd As ADODB.CommandDim rsAs ADODB.RecordsetSet cm
5、d=NewADODB.CommandSet rs=New ADODB.RecordsetWith cmd此处也可以建立一个 Connection 对象,将下面一行代码写成:cmd.ActiveConnection=conn.ActiveConnection=Provider=Microsoft.Jet.OLEDB.4.0;DataSource=C:DocumentsandSettingsAdministrator桌面MyDatabase.mdb;Persist Security Info=False.CommandType=adCmdTable.CommandText=邮件列表 数据表的名称c
6、ommand 的 Execute 方法返回 recordset 对象.Executers.Open cmd,adOpenKeyset,adLockPessimisticEnd WithIf rs.RecordCount Then rs.Delete 只有在有数据的情况下才可以删除数据释放内存Set conn=NothingSet rs=NothingEnd Sub为了是程序简洁,本例中只是将第一条记录删除了,而实际使用中,通常删除指定记录,这时就需要指针移动到指定记录后删除。以上就是关于以上就是关于 adoadoadoado 模型的三个对象的简单实例,为了便于理解模型的三个对象的简单实例,为了
7、便于理解,没有涉及复杂的过程没有涉及复杂的过程,比如查找记录比如查找记录、创建数据表等创建数据表等。RecordSetRecordSetRecordSetRecordSet、CommandCommandCommandCommand、ConnectionConnectionConnectionConnection 对象对象的功能交叉冗余,通常只使的功能交叉冗余,通常只使用用RecordSetRecordSetRecordSetRecordSet 和和 ConnectionConnectionConnectionConnection 对象对象即可完成对数据库的基础操作即可完成对数据库的基础操作。在
8、在这里要说一下这里要说一下 CommandCommandCommandCommand 对象对象 的特殊之处的特殊之处,当使用,当使用 SQLSQLSQLSQLserver2000server2000server2000server2000 等数据库等数据库时时,有时候需要管理存储过程并传递参数,有时候需要管理存储过程并传递参数,这时候只能用这时候只能用 CommandCommandCommandCommand 对象对象,其他两个是做不到的其他两个是做不到的,所以建议所以建议大家多上机操作,关于这三个对象还有许多方法(比如嵌入大家多上机操作,关于这三个对象还有许多方法(比如嵌入 sqsqsqsql l l l语句、查找记录、创建事务语句、查找记录、创建事务、使用、使用 adoadoadoado、datagriddatagriddatagriddatagrid 控件控件等等),在,在这里就不多介绍了,如有疑问,可以在我的这里就不多介绍了,如有疑问,可以在我的 qqqqqqqq 里留言,号码里留言,号码:809328333809328333809328333809328333