VISUAL BASIC 连接数据库综合+示例.pdf
《VISUAL BASIC 连接数据库综合+示例.pdf》由会员分享,可在线阅读,更多相关《VISUAL BASIC 连接数据库综合+示例.pdf(29页珍藏版)》请在咨信网上搜索。
1、Visual Basic连接数据库综合+示例一、数据库编程应用技术.-2-二、数据库控件的使用.-2-1.Data控件的使用.-2-2.ADO控件的使用.-3-三、ADO对象的使用.-11-L什么是ADO.-11-2.ADO对象的添加.-12-3.ADO对象的具体应用.-12-四、访问SQL Server数据库和数据源.-18-1.怎样连接ODBC数据源.-18-2.连接ODBC数据源.-22-六、常用的数据库操作举例.-27-L添加数据记录.-27-2.修改与删除数据记录.-28-3.查询数据记录.-28-七、本章小结.28-八、程序所用到的数据库的制作.-28-1-2011年3月10日晚王
2、光亮一、数据库编程应用技术大多数情况下,我们在编写应用程序时都离不开数据库。一个功能强大的应 用软件需要数据库技术的支持。如在前面章节中讲解的多媒体技术的实例中,在 实现保存多媒体文件路径的操作中,就应用到了数据库技术。本章中,我们将详 细地向读者讲解有关数据库处理技术方面的相关知识。主要讲解的知识点有以下儿个方面。(1)使用数据库控件操作数据库;(2)使用ADO技术操作数据库;(3)连接SQL Server数据库和ODBC数据源的方法;(3)对数据库的添加、删除、修改及查询等相关的操作。二、数据库控件的使用数据库控件是操作数据库的有效工具,通过使用数据库控件,我们可以实现 连接数据库、向数据
3、库中添加、删除以及查询记录信息等操作。下面就向读者介 绍一下VB 6.0中几个重要数据库控件的使用方法。LData控件的使用如果您只是简单地操作下数据库,那么最简单的方法就是使用Data控件了,Data控件的优势在于可以直接建立起数据源并且与文本框或列表等控件直接建 立连接,这样就不必要再编写大量的程序代码,而只是简单地设置下控件的某些 属性就可以操作数据库了。那么,Data控件都有哪些重要的属性和方法呢?请 接着往下看!(1)Connect 属性Connect属性用于设置所要连接数据库的类型。(2)DataBaseName 属性DataBaseName属性用于设置Data控件的数据源,即决定
4、Data控件连接的 数据库名称。(3)RecordSource 属性在使用DataBaseName属性设置完数据源之后,还需要设置所要连接的数据-2-2011年3月10日晚 王光亮 表,在连接完数据表之后,才实现了与数据库之间真正意义上的连接。连接数据 表通过使用Data控件的RecordSource属性来实现。(4)Readonly 属性Readonly属性具有两个属性,即True和False,当将该属性设置为True时,可以屏蔽修改数据库内容的功能。(5)Refresh 方法在 DatabaseName 属性、Readonly 属性、Connect 属性和 RecordSource 属性
5、等值发生改变时,可使用Refiesh方法实现刷新数据库的功能,即重新打开数据 库。(6)UpdateControl 方法使用该方法可以将Data控件记录集中的当前记录填充到某个数据绑定控件 中UpdateControl使用该方法可以将修改的记录内容保存到数据库中。(7)Recordset在Recordset对象中,可以通过使用该对象的MoveFirst MoveNex MovePrevious和MoveLast方法实现移动数据表中的记录信息的功能。2.ADO控件的使用前面讲解的Data控件只能对Access97版本的数据库进行操作,从这一点就 可以看出,Data控件是非常不适用的。因此,在通常
6、情况下,很少会使用Data 控件编写程序。在VB 6.0中,有一种功能强大而且使用又方便的控件,那就是 ADO控件。通过使用ADO控件,我们可以连接一个本地数据库或远程数据库、打开一个指定的数据库表或定义一个基于结构化查询语言的查询、将数据字段中 的数值传递给数据绑定控件等数据操作。下面就来学习一下这个功能强大的数据 控件。ADO控件是非标准的控件,在使用时需要通过在“控件”对话框中进行添 加,具体的添加方法为:在工具箱中单击鼠标右键,在弹出的快捷菜单中选择“部 件”命令,并在弹出的“部件”对话框中选取“Microsoft ADO Data Control 6.0”选项,如图1所示。单击【确定
7、】按钮,将ADO控件添加到工具箱当中。-3-2011年3月10日晚王光亮A两GeneralX图1将ADO控件添加到工具箱中在添加ADO控件之后,下面介绍ADO控件的一些重要的属性和方法(1)BOFAction 与 EOFAction 属性在移动数据库中的记录指针时,如果记录指针移动至UBOF或EOF位置,此 时再向前或再向后移动记录指针将会发生错误。使用BOFAction和EOFAction属 性可以指定当发生上述错误时,数据控件将采取什么样的操作。(2)ConnectionString 属性Connectionstring属性是ADO控件中最重要的属性之一。该属性的作用是 建立数据控件与数据
8、源之间的链接信息。可以使用ConnectionString属性来设置 链接不同的数据库和数据源。如Access数据库和SQL Server数据源。在连接数据库时,需要首先将ConnectionString属性设置为一个有效的链接 字符串。该字符串可以由“数据连接属性”对话框中产生。其具体实现的操作步 骤如下。在确定将ADO控件添加到工具箱的情况下,首先在窗体上添加一个ADO 控件,选中该控件,在控件的属性窗口中找到控件的ConnectionString属性,单 击最右侧的1按钮,将弹出ADO控件的“属性”窗口。使用DSN,则选择“使用ODBC数据-4-2011年3月10日晚王光亮源名称”单选按
9、钮,并从列表中选择一个DSN数据源;创建一个连接字符串,则选择“使用连接字符串”单选按钮,如图2所示。图2 ADO控件的“属性页”窗口在“属性页”宽口中单击【生成】按钮,将弹出“数据连接属性”窗口,在该窗口中选择要连接的数据源信息。以连接Access数据库为例,选择uMicrosoft Jet 4.0 OLE DB Providerv 选项,如图 3 所示-5-2011年3月10日晚王光亮图3”数据链接属性”对话框窗口单击【下一步】按钮,将进入“数据连接属性”窗口中的“连接”选项卡 当中,在该选项卡中的“选择或输入数据库名称”栏内直接输入或使用右侧的【】按钮选择数据库的名称,选择完成后单击【确
10、定】按钮,如图4所示如果不放心,可以点这里 测试连接一下图4选择连接的数据库名称单击【确定】按钮之后,在“属性页”窗口的“使用连接字符串”下面的 文本框中将会生成一个连接字符串,通过使用这个连接字符串可以与相应的数据 库取得连接,如图5所示也可以复制该生成的字符串作为程序代码使用。-6-2011年3月10日晚王光亮图5生成的链接数据库字符串(3)RecordSource 属性在使用Connectionstring属性连接完数据库之后,接下来的任务就是连接数 据表。在ADO控件中,连接数据表使用的是RecordSource属性。RecordSource 属性用于设置要连接的数据表或者SQL查询语
11、句。(4)CommandType 属性CommandType属性用于指定的取值类型。通常在ADO控件的属性窗口中 可以直接设置该属性值。RecordSource属性具有以下几个可选择的属性值。adCmdUnknown:该属性值为默认值,表示CommandText属性中的命令 类型未知。adCmdTable:表示将CommandText作为由内部生成的SQL查询返回的表 格名称进行计算。adCmdText:表示将CommandText作为命令或存储过程调用的文本定义 进行计算。adCmdStoreProc:表示将CommandText作为存储过程名进行计算。(5)UserName 属性为了保证数
12、据的安全性,很多数据库都设置了密码保护。这样,在访问该数 据库时,就需要指定该数据库德用户名和密码,否则无法连接或访问该数据库。(6)Password 属性在连接带密码的数据库时,不但需要指定连接的用户名,还需要指定连接的-7-2011年3月10日晚王光亮密码。指定连接的密码是通过Password属性实现的,与UserName属性类似。Password属性也可以子啊Connectionstring中指定。(7)ConnectionTimeout 属性ConnectionTimeout属性用于设置等待建立一个连接的时间,该属性以秒为 单位i,如果连接超时,则会产生一个错误信息。(8)AddNew
13、 方法使用AddNew方法可以在ADO控件的记录集中添加一条新的记录。在使用 该方法之后,应该给相应的哥哥字段赋值,然后调用UpdateBatch方法保存信息。(9)Delete 方法使用Delete方法可以删除ADO控件记录集中的一条记录信息。移动记录的方法在使用ADO控件时,可以通过使用 MoveFirst MoveLast MoveNext MovePrevious方法来移动ADO控件记录集中的数据,分别表示为移动到首记录,移动到最后一条记录,移动到下一条记录和移动到上一条记录。CancelUpdate 方法CancelUpdate方法的作用是取消ADO控件的记录集中的添加或编辑操作,使
14、数据记录恢复到修前的状态。UpdateBatch 方法UpdateBatch方法的作用是保存ADO控件记录集中添加或编辑操作。该方 法的作用恰好与CancelUpdate相反。本示例实现的是在程序运行之后,在窗体的文本框中输入相关的数据信息,单击【添加】按钮可以将文本框中的数据信息保存到数据表中。在单击【首记录】、【上一条】、【下一条】和【末记录】按钮时可以移动数据表中的记录信息。如图 6o在移动到某一条记录信息之后。单击【删除】按钮可以删除当前的记录信息。示例实现步骤如下。-8-2011年3月10日晚王光亮图6使用ADO控件连接数据库新建一个工程,在工程中添加一个窗体Froml,将窗体的Ca
15、ption属性设置 为“ADO控件连接数据库”。在“部件”对话框中分别添加ADO控件和DataGrid表格控件,如图7所示图7添加ADO控件和DataGrid控件到工具箱中在窗体上添加一个ADO控件和一个DataGrid控件,将DataGrid控件的 DataSource 属性设置为“Adodcl”。在窗体上添加6个标签控件和6个文本框控件,分别设置标签控件的Caption 属性,使标签能够表示文本框。-9-2011年3月10日晚王光亮在窗体上添加6个按钮控件,分别将控件的Caption属性设置为“添加”,“删 除”,“首记录”,“上一条”,“下一条”,“末记录”。进入代码窗口,在代码窗口中添
16、加如下程序代码,实现显示Access数据库 中的数据表的功能。添加新纪录程序代码如下:Private Sub Command 1 _Click()Adodc 1.Recordset.AddNewAdodcl.Recordset.Fields(O).Value=Textl.TextAdodc 1.Records et.Fields(1).Value=Text2.TextAdodc 1.Recordset.Fields(2).Value=Text3.TextAdodc 1.Records et.Fields(3).Value=Text4.TextAdodc 1.Records et.Fields(
17、4).Value=Text5.TextAdodc 1.Recordset.Fields(5).Value=Text6.TextAdodc 1.Recordset.UpdateBatchEnd Sub删除程序代码如下:Private Sub Command2_Click()On Error Resume NextAdodc 1.Recordset.DeleteEnd SubPrivate Sub Command3_Click()Adodc 1.Recordset.MoveFirstShowTextEnd SubPrivate Sub Command4_Click()If Adodc 1.Reco
18、rdset.BOF ThenMsgBox 已经到了第一条记录,vbOKCancel,提示信息Else:Adodc 1.Recordset.MovePreviousEnd IfShowTextEnd SubPrivate Sub Command5_Click()If Adodc 1.Recordset.EOF ThenMsgBox 已经到了最末一条记录,vbOKCancel,提示信息Else:Adodc 1.Recordset.MoveNextEnd IfShowTextEnd Sub-10-2011年3月10日晚王光亮Private Sub ShowText()On Error Resume
19、NextText 1.Text=Adodcl.Recordset.Fields(0).WlueText2.Text=Adodc 1.Recordset.Fields(1).ValueText3.Text=Adodc 1.Recordset.Fields(2).WlueText4.Text=Adodcl.Recordset.Fields(3).ValueText5.Text=Adodcl.Recordset.Fields(4).ValueText6.Text=Adodc 1.Recordset.Fields(5).WlueEnd SubPrivate Sub Command6_Click()Ad
20、odc 1.Recordset.MoveLastShowTextEnd SubPrivate Sub Form_Load()Adodc 1.Connectionstring=Provider=Microsoft.Jet.OLEDB.4.0;Data Source=&App.Path&MyDatas.mdb;Persist Security Info=False Adodc 1.CommandType=adCmdTextAdodc 1.RecordSource=select*from 员工信息 order by 编号Adodc 1.RefreshShowTextEnd Sub三、ADO对象的使用
21、前面讲解的内容都是使用数据控件对数据表中的数据进行操作。那么,如果 不使用数据控件是否也能操作数据表中的数据信息呢?答案是肯定的。也可以使 用ADO对象来操作数据表中的数据信息,本节中我们将重点讲解一下ADO对 象在VB 6.0中的具体应用。1.什么是ADO在学习ADO对象之前,先来了解一下什么是ADOo ADO的全称为Active Data Objects,它包含了数据库访问对象DAO、远程数据对象RDO及儿乎所有 其他数据存取方式的全部功能,可以使用ADO访问各种类型的数据库及数据源。ADO具有很高的灵活性,它可以使用相同的编程模式连接到不同的数据提供者,因此,是当前使用最广泛的操作数据库
22、技术之一,受到广大程序员和编程爱好者 的青睐。-11-2011年3月10日晚王光亮ADO可以用来同OLE DB Provider(数据访问层)协同工作。OLE DB是一 个低层的数据访问接口,通过该接口可以访问各种数据源,与数据库取得连接。ADO技术将所有强大的数据处理功能都封装起来,仅仅引用它就可以执行各种 数据操作。2.ADO对象的添加在使用ADO对象之前,需要进行一个重要的操作,那就是将ADO对象引 用到你的工程当中,具体的操作方法如下所示。(1)选择“工程”菜单下的“弓I用”命令,此时将弹出“弓用”对话框窗口。(2)在“弓|用”对话框中选择“Microsoft ActiveX Data
23、 Obiects 2.8 Library 如图8所示。如果列表中没有该选项,可以选择“Microsoft ActiveX Data Objects 2.6 Library选项或更低版本的类型库。弓I用-工程1.vbp可用的引用(A)Microsoft A ctiveX Data Objects(Multi-dime 人Microsoft A ctiveX Data Objects 2.0 LibraryMicrosoft A ctiveX Data Objects 2.1 LibraryMicrosoft A ctiveX Data Objects 2.6 LibraryMicrosoft A
24、 ctiveX Data Objects 2.7 Libraryi g DE oft Obi&ctA 8 LibrarTMicrosoft A ctiveX Data Objects Recordset 2Microsoft A ddIn DesignerMicrosoft A DO E xt.2 8 for DDL and SecuritMicrosoft A utoDiscovery Type LibraryMi crosoft Browser HelpersMicrosoft Connection Designer Instance 1.0Microsoft Connection Des
25、igner v6.0M yy cu c D Ad 4 K/Q K1 P cmn o+t 卜T 卜v令优先富Microsoft A ctiveX Dat,Objects 2 8 Library定位:C:Program F ilesCommon F ilessystemadornsadol5.dll i吾言:标准图8引用ADO对象(3)单击【确定】按钮之后,ADO对象就被引用到工程当中了。3.ADO对象的具体应用我们平时所说的ADO对象主要包括两部分,即连接数据源Connection对象-12-2011年3月10日晚王光亮和记录集对象Recordset,只要熟练掌握了这两种对象的使用,就可以说已经
- 配套讲稿:
如PPT文件的首页显示word图标,表示该PPT已包含配套word讲稿。双击word图标可打开word文档。
- 特殊限制:
部分文档作品中含有的国旗、国徽等图片,仅作为作品整体效果示例展示,禁止商用。设计者仅对作品中独创性部分享有著作权。
- 关 键 词:
- VISUAL BASIC 连接数据库综合+示例 连接 数据库 综合 示例
1、咨信平台为文档C2C交易模式,即用户上传的文档直接被用户下载,收益归上传人(含作者)所有;本站仅是提供信息存储空间和展示预览,仅对用户上传内容的表现方式做保护处理,对上载内容不做任何修改或编辑。所展示的作品文档包括内容和图片全部来源于网络用户和作者上传投稿,我们不确定上传用户享有完全著作权,根据《信息网络传播权保护条例》,如果侵犯了您的版权、权益或隐私,请联系我们,核实后会尽快下架及时删除,并可随时和客服了解处理情况,尊重保护知识产权我们共同努力。
2、文档的总页数、文档格式和文档大小以系统显示为准(内容中显示的页数不一定正确),网站客服只以系统显示的页数、文件格式、文档大小作为仲裁依据,平台无法对文档的真实性、完整性、权威性、准确性、专业性及其观点立场做任何保证或承诺,下载前须认真查看,确认无误后再购买,务必慎重购买;若有违法违纪将进行移交司法处理,若涉侵权平台将进行基本处罚并下架。
3、本站所有内容均由用户上传,付费前请自行鉴别,如您付费,意味着您已接受本站规则且自行承担风险,本站不进行额外附加服务,虚拟产品一经售出概不退款(未进行购买下载可退充值款),文档一经付费(服务费)、不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
4、如你看到网页展示的文档有www.zixin.com.cn水印,是因预览和防盗链等技术需要对页面进行转换压缩成图而已,我们并不对上传的文档进行任何编辑或修改,文档下载后都不会有水印标识(原文档上传前个别存留的除外),下载后原文更清晰;试题试卷类文档,如果标题没有明确说明有答案则都视为没有答案,请知晓;PPT和DOC文档可被视为“模板”,允许上传人保留章节、目录结构的情况下删减部份的内容;PDF文档不管是原文档转换或图片扫描而得,本站不作要求视为允许,下载前自行私信或留言给上传者【曲****】。
5、本文档所展示的图片、画像、字体、音乐的版权可能需版权方额外授权,请谨慎使用;网站提供的党政主题相关内容(国旗、国徽、党徽--等)目的在于配合国家政策宣传,仅限个人学习分享使用,禁止用于任何广告和商用目的。
6、文档遇到问题,请及时私信或留言给本站上传会员【曲****】,需本站解决可联系【 微信客服】、【 QQ客服】,若有其他问题请点击或扫码反馈【 服务填表】;文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“【 版权申诉】”(推荐),意见反馈和侵权处理邮箱:1219186828@qq.com;也可以拔打客服电话:4008-655-100;投诉/维权电话:4009-655-100。