网站大量收购闲置独家精品文档,联系QQ:2885784924

实验三嵌入式SQL数据更新.docVIP

  1. 1、本文档共7页,可阅读全部内容。
  2. 2、原创力文档(book118)网站文档一经付费(服务费),不意味着购买了该文档的版权,仅供个人/单位学习、研究之用,不得用于商业用途,未经授权,严禁复制、发行、汇编、翻译或者网络传播等,侵权必究。
  3. 3、本站所有内容均由合作方或网友上传,本站不对文档的完整性、权威性及其观点立场正确性做任何保证或承诺!文档内容仅供研究参考,付费前请自行鉴别。如您付费,意味着您自己接受本站规则且自行承担风险,本站不退款、不进行额外附加服务;查看《如何避免下载的几个坑》。如果您已付费下载过本站文档,您可以点击 这里二次下载
  4. 4、如文档侵犯商业秘密、侵犯著作权、侵犯人身权等,请点击“版权申诉”(推荐),也可以打举报电话:400-050-0827(电话支持时间:9:00-18:30)。
  5. 5、该文档为VIP文档,如果想要下载,成为VIP会员后,下载免费。
  6. 6、成为VIP后,下载本文档将扣除1次下载权益。下载后,不支持退款、换文档。如有疑问请联系我们
  7. 7、成为VIP后,您将拥有八大权益,权益包括:VIP文档下载权益、阅读免打扰、文档格式转换、高级专利检索、专属身份标志、高级客服、多端互通、版权登记。
  8. 8、VIP文档为合作方或网友上传,每下载1次, 网站将根据用户上传文档的质量评分、类型等,对文档贡献者给予高额补贴、流量扶持。如果你也想贡献VIP文档。上传文档
查看更多
实验三嵌入式SQL数据更新

实验三 嵌入式SQL数据更新 一、实验目的 (1)了解嵌入式SQL数据更新的使用方法。 (2)设计用户界面,能对数据表进行更新操作。 二、实验内容 对教学管理数据库中学生信息表的数据维护。 (1)单击图1窗体“添加”按钮,显示图2窗体,在其中输入欲添加的数据,单击“确定”按钮,添加的信息即可显示在表格中。 (2)在图1窗体的表格中选择欲修改的记录,单击“修改”按钮,所选择记录信息将显示在图2窗体的控件中,在其中修改数据,单击“确定”按钮,修改后的信息即可显示在表格中。 (3)在图1窗体的表格中选择欲删除的记录,单击“删除”按钮,显示一个确认删除信息对话框,单击“确认”按钮,将删除该项记录,单击“取消”按钮可不删除记录。 【实验步骤】 (1)建立项目,并建立如图1、图2所示用户界面设置相应属性。 设置ADODC1的ConnectString属性,建立与教学管理数据库的连接,设置 RecordSorce获取记录集。设置DataGrid1的DataSource属性为ADODC1,建立数据显示控件的数据源。 (2)定义有关事件代码。 图1 信息维护界面 图2 增加/修改界面 三、实验指导 (一)Visual Basic中的嵌入式SQL语句 在Visual Basic中使用SQL语句同传统的嵌入式SQL语言的使用方式有很大的不同。VB提供了相应的数据对象和数据控件来使用SQL语句。 为简单起见,以VB6.0为例说明如何通过ADO数据控件来使用SQL语句。为了在工具箱中使用ADO数据控件,必须先为当前工程引用ADO的对象库。引用方法是:启动VB新建一个工程,在菜单命令“工程”/“部件”里选择“Microsoft ADO Data Control 6.0(OLEDB)”部件,如图5所示。 图5 向工具箱添加ADO数据控件 使用ADO开发数据库应用程序时,首先是连接数据库,然后执行相应的SQL命令。 1.连接数据库 ADO控件的ConnectionString属性提供了连接数据源向导。 将ADO控件添加到窗体中,在属性框中双击ADO的 ConnectionString属性右边的,弹出ADO控件“属性页”对话框。如图6所示。 在“通用”标签页中有3种连接数据库的方法,本教材以“使用连接字符串”为例进行数据库连接。按图6、图7、图8、图9、图10所示向导进行设置。 注意:图7中的选项应根据具体的服务器名和数据库名进行设置。 图6 ADO控件“属性页”对话框 图7 选择SQL Server数据库OLEDB数据提供者接口 图8 选择SQL Server数据库服务器名和数据库名 图9 测试数据库连接是否成功 图10 自动生成连接字符串 2.执行SQL命令 (1)ADO控件的几个主要属性设置。 ① CommandType属性。选择数据源命令类型。如果要执行SQL命令,则将CommandType属性设置为adCmdText。 ② RecordSource属性。设置记录源。对数据表进行查询操作时,可将SELECT命令作为一个字符器写入该属性。 说明:对数据表进行查询操作时可直接使用RecordSource属性来实现,但若对数据库进行插入、删除、更新等不返回结果集的操作必须使用定义一个Command对象,并用Command对象Execute方法才能实现。 (2)使用SELECT语句查询。设添加到窗体中的ADO控件的名字为ADODC1,Adodc1.CommandType = adCmdText。 【例1】 查询Student表中所有学生信息。 Adodc1. RecordSource=SELECT * FROM Student 【例2】 模糊查询。查询Student表中张姓学生且年龄在16~20之间的信息。 Dim Rsstr As String Rsstr=SELECT * FROM Student WHERE Sage between 16 and 20 _ and Sname like 陈% Adodc1. RecordSource= Rsstr 【例3】 连接查询。查询选修了课程的学生姓名、课程号及成绩。 Rsstr= select Sname ,Cno,Grade from Student,SC where Student.Sno=SC.Sno Adodc1. RecordSource= Rsstr 【例4】 子查询。查询选修了课程的学生姓名。 Rsstr = select Sname from Student where Sno in (select Sno from SC )

您可能关注的文档

文档评论(0)

fangsheke66 + 关注
实名认证
文档贡献者

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

1亿VIP精品文档

相关文档