基于SQLSERVER浅谈ADO对象编程.doc

  1. 1、本文档共4页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
查看更多
基于SQLSERVER浅谈ADO对象编程.doc

基于SQL SERVER ADO对象编程 摘要:数据库应用程序与数据库的数据访问接口有多种类型,最新的是ADO技术。本文以VB与SQL SERVER为平台,研究ADO对象编程技术。 关键词: ADO对象编程;VB;SQL SERVER 中图分类号:TP3 文献标识码:A 文章编号: 1 引言 微软公司的ADO (ActiveX Data Objects) 是一个用于存取数据源的COM接口的底层数据接口,是一项新的数据库访问技术。使用ADO技术作为数据接口具有ADO数据控件和ADO对象编程两种实现方式,现主要对ADO对象编程这种较复杂技术进行研究。 2 ADO对象简述 对于ADO模型来说,掌握 Connection,Command, Recordset三个对象至关重要。 Connection对象:建立与数据库的连接. Command对象:发出命令操作数据源.一般情况下,Command对象可以在数据库中添加,删除或更新数据,或者在表中进行数据查询. Recordset对象: 数据查询的执行结果返回的记录集. 3 使用ADO对象存取数据步骤 在实际编程过程中使用ADO的一个典型的存取数据的步骤为: 连接数据源、打开记录集对象、使用记录集、断开连接。 3.1连接数据源 利用Connection对象可以创建一个数据源的连接.应用的方法是Connection对象的Open方法。语法: Connection对象.Open ConnectionString, UserID, PassWord, OpenOptions 3.2打开记录集对象 实际上记录集返回的是一个从数据库取回的查询结果集.   记录集的Open方法,语法: Recordset对象.Open Source, ActiveConnection, CursorType, LockType, Options 3.3使用记录集 3.3.1 添加新的记录: 语法为:Recordset对象.AddNew FieldList, Values 在用完AddNew方法为记录集添加新的记录后,应使用UpDate方法将所添加的的数据存储在数据库中.不过你最好在用UpDate方法之前使用CancelUpdate方法来取消该项操作。 3.3.2修改记录集 其实修改记录集中的数据与重新赋值没有什么太大的区别,只要用SQL语句将要修改的字段的一个数据找出来重新赋值就可以了。 3.3.3 删除记录  在ADO中使用Delete方法删除记录集中的数据。 它的语法如下: Recordset.Delete AffectRecords 3.4 断开连接  在应用程序结束之前,应该释放分配给ADO对象的资源,操作系统回收这些资源并可以再分配给其他应用程序。 使用的方法为:Close方法。语法如下: ADO对象.Close 4 实例演示 下面给出一个VB应用程序与SQL SERVER数据库连接开发的实例,示范ADO对象编程技术的使用。 在本示例中,在SQL环境下有一个“人事管理”数据库,其中包含一张“员工信息”表,如图1所示。 图1   在VB环境下,设计一个窗体,用来对“员工信息”表的内容进行显示和更新,窗体样式如图2所示。    图2 在该窗体中,包含“添加员工信息”,“修改员工信息”,“删除员工信息”和“浏览员工信息”四个按钮控件,分别实现对“员工信息”表的各种操作。 下面说一下具体的实现。首先必须在VB菜单栏的“工程”/ “引用”/ “ Microsoft ActiveX Data Objects 2.6 Library”(或其他ADO版本也行),引入ADO对象。然后在窗体中添加如下代码即可:(其中各控件的名称介绍省略) (1)通用声明: Dim cnn As ADODB.Connection cnn为连接对象 Dim rst As ADODB.Recordset rst为记录集对象 Dim cmd As ADODB.Command cmd为命令对象 (2) form_load代码 Set cnn = New ADODB.Connection ‘新建连接 cnn.CursorLocation = adUseClient 打开数据源连接 cnn.ConnectionString=driver={SQL Server};server=T1;uid=sa;pwd=;database=人事管理(server为当前数据库服务器的名称,本地服务器可以写成点号.或(local)、uid、pwd的值根据个人安装的SQL信息来决定) cnn.Open Set cmd = New ADODB.Command 设置命令对象实例 Set cmd.ActiveConnection = cnn

文档评论(0)

juhui05 + 关注
实名认证
内容提供者

该用户很懒,什么也没介绍

1亿VIP精品文档

相关文档