用ADO控件实现VB与SQLServer2000的连接

1、用ADO 控件实现VB 与SQ L Server 2000的连接Connection between VB and SQ L Server 2000w ith ADO Con trolware李中凯魏修亭唐文静(山东理工大学淄博255012【摘要】介绍了在VB 中用ADO 控件、D ataGrid 控件对SQL Server 数据库调用的方法以及ADO 控件中两个关键属性连接字符串和记录源的设定方法。通过用VB 设计C S 模式单表管理系统的实例,说明了如何用ADO 控件实现对数据库记录的添加、修改、删除和查询。【关键词】ADO 控件,VB ,SQL Server ,C S 模式ABSTRAC

2、T T h is paper p resen ts the w ay to connect SQL Server database w ith ADO con tro l and D ataGrid con tro l in VB ,and set 2ting of Connecti on String and R eco rd Sou rce ,w h ich are tw o key p roperties in ADO Con tro l .A t last ,by con structing a single tab lem anagem en t system of C S mode

3、lw ith VB ,the paper also expounds how to add ,update ,delete and query reco rds in a database w ithADO Con tro l.KEYWOR D S ADO con tro l w are ,VB ,SQL Server ,C S modelSQL Server 2000是微软推出的关系数据库管理系统,具有强大管理功能和安全性,已在C lien t Server 模式中得到了很好的应用。目前,关系数据库应用系统开发软件产品很多,如VB 、Pow er B u ilder 、D elp h i 等

4、。VB 是M icro soft 致力发展的软件之一,它具有面向对象、模块化、可视化编程和事件驱动等特点,并且支持一套出色的数据库访问技术,成为目前最流行的数据库应用软件编程工具之一。故用VB 开发基于SQL Server 2000的数据库管理系统是一种合理的选择。1ADO 模型与ADO 控件1.1ADO 技术概述与ADO 对象模型VB 6.0本身提供三种数据接口:DAO 、RDO 和ADO (A ctiveX data ob jects ,简称ADO 。ADO 基于微软最新的被称为OL E DB 的数据访问模式,它是专门为了给大范围的商业数据源如传统的关系数据库、电子邮件系统、图形格式、In

5、 ternet 资源等提供访问而设计的。ADO 比DAO 所需的内存更少,更适合于大流量和大事务量的网络计算机系统。ADO 模型顶层有三个对象:Connecti on 、Com 2m and 、R eco rdset 。Connecti on 对象可以指定数据源,建立与数据源的连接;Comm and 对象对数据源执行指定的命令,它可以接收SQL 语句、表的名称和存储过程的名称,执行SQL 查询、更新数据、插入记录等;R eco rd est 对象表示的是来自表或命令执行结果的记录全集,操作来自提供者的几乎所有数据。P rop erties (属性、E rro rs (错误、Param eter

6、s (参数和F ields (字段是ADO模型的四个集合。ADO 对象模型见图1。1.2ADO 控件说明ADO D ata 控件使用ADO 快速地创建一个到数据库的连接,它最重要的两个属性是Connecti on String 和R eco rdsou rce 。Connecti onString 设置控件的连接字符串,用于建立与数据库的连接。例如:Connec 2ti onString =“P rovider =sqlo ledb ;Server =local ;D atabase =p ub s ;U id =sa ;Pw d =sa ”。P rovider =sqlo ledb 说明驱动

7、程序提供者是sqlo ledb ;Server 指明SQL Server 数据库服务器的名称或IP 地址;D atabase 指明连接的数据库名称;U id 与Pw d 分别指明登录数据库的用户名与密码。R eco rdsou rce 属性为记录源,通过设置该属性控制从数据库中返回的记录集合。例如:设置R eco rdSou rce =“select 3fromQQ friend ”。将该属性设置为一条SQL 语句,从数据库返回满足查询条件的记录。对于D ataGrid 、D ataCom bo 、D ataL ist 等控件,可320031127收到,20040113改回33山东省淄博市科技

8、局C I M S 资助项目。333李中凯,男,1980年生,硕士研究生,研究方向:数据库与大批量定制等。61(总226用ADO 控件实现VB 与SQL Server 2000的连接2004年通过将其D ataSou rce属性设置为ADO控件,实现数据绑定。另外,在运行时可动态地设置Connecti on String和R eco rdsou rce属性来更改数据库。2ADO控件编程实例本例用VB编写一个QQ好友管理器,用ADO控件连接SQL Server2000数据库、D ataGrid控件显示数据,以C S方式实现对QQ friend表中记录的添加、修改、删除和查询。若ADO控件和D at

9、aGrid控件不在当前工程的控件工具箱中,可通过“工程”菜单“部件”选项,分别选中M icro soft ADO D ata Con tro l6.0和M icro soft D ataGrid Con tro l6.0,将两个控件加入工具箱中。整个程序共三个窗口,frm m ain为主窗口,实现数据记录的浏览、修改和删除功能。frm add为数据录入窗口,录入后的结果在主窗口中显示出来。frm select为数据查询窗口,通过设置查询条件,选择满足要求的记录,结果在本窗口中显示。在SQL Server2000数据库服务器的p ub s数据库中建立“QQ friend”表2,结构如表1。2.1

10、主窗口设计主窗口frm m ain外观如图2所示,具体设计步骤如下:设置ADO控件的Connecti onString与R eco rdsou rce属性。Connecti on2String=“P rovider=sqlo ledb;Server=local;D atabase=pub s;U id=sa;Pw d=sa;”Server的设置需视具体情况而定,若在本机上,要设置为本机数据库服务器的名称。R eco rdSou rce=“select3from QQ friend”设置D ataGrid1.D ataSou rce=A dodc1,指定D ataGrid控件的数据来源。“修改”

11、按钮的主要代码为:A dodc1.R eco rdset.U pdate更新记录A dodc1.R efresh刷新D ataGrid表格中的数据“删除”按钮的主要代码为:A dodc1.R eco rdset.D elete删除选中的记录A dodc1.R eco rdset.U pdateA dodc1.R efresh2.2数据录入窗口设计数据录入窗口frm add外观如图3所示 。“添加”按钮的主要代码为:frm m ain.A dodc1.R eco rdset.A ddN ew向记录集中插入一条新记录frm m ain.A dodc1.R eco rdset("昵称&qu

12、ot;=T ri m(tx t n ick2 nam e.T ex t为各记录字段赋值frm m ain.A dodc1.R efresh数据显示刷新QQ号码、姓名和关系字段的赋值语句与昵称字段类型。2.3数据查询窗口设计设置ADO控件的Connecti onString、R eco rd2 sou rce属性,与2.1第1步的结果相同。“查询”按钮的代码为:D i m strsq1A s Stringstrsq1为SQL查询字符串D i m tx t head1,tx t head2A sString定义两个查询字段D i m tx t relati on A s String定义两个查询条

13、件的连接关系D i m cond1,cond2A s String定义两个查询的关键字tx t head1=Com bo1.T ex ttx t head2=Com bo2.T ex ttx t relati on=Com bo3.T ex tIf tx t telati on=""T hen若连接关系为空,则查询为单条件查询strsq1="select3from QQ friend w here"&tx t head1& "like%"&tx t cond1.T ex t&"%"E

14、 lse若连接条件不为空,则生成双条件查询的SQL语句strsq1="select3from QQ friend w here"&tx t head1& "like%"&tx t cond1.T ex t&"%"&tx t relati on&""&tx t head2&"like%"&tx t cond2.T ex t&"%"End IfA dodc1.R eco rdSou rce=strsq

15、1为ADO控件的R eco rd Sou rce属性赋值Set dgrid.D ataSou rce=A dodc1设置D ataGrid控件的数据源(下转第20页71第17卷第5期电脑开发与应用(总227术方向发展。人工智能专家Gu ilfoyle 在1995年就断言:10年后大多数新兴信息技术的发展将受A gen t 技术发展的影响,具有A gen t 理论与技术手段将是解决21世纪系统建模和网络化协同的重要手段4。基于组件的复用必须解决的需求有:用户能对所需要的组件进行搜索;需要一种过虑机制对复用用户和其他用户的进行分离;需要有对已复用该组件的用户版本进行升级机制;应该给组件生产商和用户

16、提供一种能够用相同技术语言交流的工具;组件生产者和组件复用者都可以灵活的加入系统和从系统中撤销;In ternet 上基于组件复用的工具一定是复用者和生产者的环境的集成的一部分。要满足以上需求,基于组件复用的软件开发过程实际上成为被多A gen t 系统理解和操作的过程,这里称为“面向A gen t 的软件复用”。其基本思想是:在可复用的通用多A gen t 机构中,对A gen t 结构中的每一个元素都进行定义,这些元素包括A gen t 需要的知识、计划、行为和A gnet 之间的交互等,每一个具体A 2gen t 都是在基本A gen t 结构的基础上进行创建。In ternet 环境下

17、基于A gen t 的软件复用的一般结构如图2所示 。依据上述结构,构建基于组件的软件复用的多A 2gen t 系统结构时,必须要考虑的因素有:选用哪几种类型的A gen t ,多A gnet 的分工与协作,A gnet 知识库的建立等。构建的方法步骤包括:识别A gen t ,对任务进行提炼,定义本体(O n to logy ,定义行为计划,表示行为和定义交互作用,构造原型。使用Java 的RM I 能够很好的实现通讯模块的功能,这种结构中需要对每一个实例化的A gen t 定义必需的知识,这些知识包括:计划、行为、与其他A gnet 的交互等。4结论不同的复用技术,得到的复用组件或软件的粒

18、度大小就不一样,其设计方法和模式也不一样,比较常用和成熟的是组件复用,对于大型系统需要更大粒度的软件复用CO T S ,但其缺点是不能访问源代码,在In ternet 环境下,本文提出了基于A gen t 的软件复用方法,由A gen t 在网络环境下自主的进行组件的寻找和匹配,实现软件的复用。软件复用是解决软件危机的有效途径,促进了软件向产业化和健康化的方向发展。参考文献1杨芙清.软件复用及其相关技术J .计算机世界,19990315:第5版2Am und T veit A Su rvey of A gen t O rien ted Softw are Engi 2neering J .h

19、ttp : www .elcom ag .com am und,2003.5.3齐艳平.面向A gen t 与面向对象J .计算机科学,2002,29:28304Sycara K ,D ecker K ,Pannu A te al .D istribu ted In telligen tA gen ts J .h ttp : www .cs .cem u .edu softagen ts,19965Somm erville I .Softw are Engineering (4th ed M .A ddisonW esley ,R eading ,M ass.,19926Pao lo Gi o

20、 rgin i ,M anuel Ko lp ,John M ylopou lo s .M u lti A 2gen t and Softw are A rch itectu re :A Comparative Case Study J .h ttp : www .cs.To ron to .edu ,2003.4.7K ingsley C Nw o su .W o rk shop on Componen t Based Soft 2w are Engineering P rocesses .h ttp : www .nw o su .net pa 2pers ,2002.5.8N icho las R Jenn ings .A Roadm ap of A gen t R esearch andD evelopm en t .h ttp : citeseer .n i .nec .com jenn in