数据库设计与应用开发.doc

计算机科学与工程学院武 汉 工 程 大 学计算机科学与工程学院数据库系统概论实验报告专业班级11网工1-2实验地点计算机大楼423机房学生学号指导教师学生姓名实验时间实验项目实验3 数据库设计与应用开发（6学时）实验类别操作性（） 验证性（） 设计性（ ） 综合性（ ） 其它（ ）实验目的及要求1.依照数据库设计的方法，完成学生管理系统的数据库设计。2.掌握程序设计语言和SQL-Server的连接方法。3.建立简单的数据库访问界面。掌握数据库应用系统开发的基本方法。成 绩 评 定 表类 别评 分 标 准分值得分合 计上机表现积极出勤、遵守纪律主动完成实验设计任务30分程序代码比较规范、基本正确功能达到实验要求30分实验报告及时递交、填写规范内容完整、体现收获40分说明： 评阅教师： 日 期： 2013 年 月 日实 验 内 容实验内容：依照学生管理系统的要求，完成如下任务 1.设计适合此应用需求的规范化的数据库。2.学习如何进行数据库连接。4.制作一个简单的数据库访问程序。（DELPHI、VB、PB等）要求能完成下列处理要求：1.学生信息的增、删、改及查询操作。2.选课和课程信息的系列操作。 实验步骤：一、VB连接SQL Server数据库方法一：1）打开VB，新建一个“标准EXE”。2)在“工程”里面选择“部件”，添加“Microsoft ADO Data Control 6.0(SP6)”和“Microsoft DataGrid Control 6.0(SP6)”，点击“确定”。3)在左侧工具中双击Adodc控件和DataGrid控件并将其放在合适的位置。4) 右击Adodc1，在弹出的下拉菜单中选择“ADODC属性”,出现属性页，选择“使用连接字符串”，点击“生成”，选择“Microsoft OLE DB Provider for SQL Server”,点击下一步。5)在“数据链接属性”中输入如图所示信息，点击确定。6)点击“测试连接”。7) 在Form1空白处双击鼠标左键，弹出代码编辑窗口。8)在编辑窗口输入如下代码。Private Sub DataGrid1_Click()Adodc1.Visible = FalseAdodc1.RecordSource = select * from StudentAdodc1.RefreshSet DataGrid1.DataSource = Adodc1.RecordsetDataGrid1.RefreshEnd Sub9)点击“运行”，则连接到JXGL数据库的Student表，出现如图所示的结果。10)连接Course表和SC表只需将代码中的表名修改即可，得到如下结果。(1)VB和JXGL数据库Course表连接结果：(2) VB和JXGL数据库SC表连接结果：2、 VB连接SQL Server数据库方法二以及数据库的访问程序：（一）VB连接SQL Server数据库：1） 打开控制面板，双击“数据源”图标。2） 在“ODBC数据源管理器”中选择“系统DSN”,点击“添加”按钮，出现“创建新数据源页面”，选择添加SQL Server。3） 在创建到SQL Server的新数据源中输入“数据源名称”，选择我们需要的服务器类型。4）在“创建到SQL Server的新数据源”中选择“使用网络登录ID的Windows NT验证”。5）在“更改默认的数据库为（D）”选择我们所需的数据源名称，点击“下一步”，再点击“完成”。6）点击“测试数据源”，出现“测试成功”，则连接成功。（2） 数据库的访问程序：1、对数据库的查询：1） 双击“Adodc控件”，添加如图所示的控件。2） 右击“Adodc控件”设置其属性如下所示。3） 在右侧属性-Form1中分别设置Text1的DataSource为“Adodc1”，DataField为“Sno”，Text2的DataSource为“Adodc1”，DataField为“Sname”，Text3的DataSource为“Adodc1”，DataField为“Ssex”。4） 点击VB中的“运行”按钮，则可以成功查询Student表中学生的信息。5）点击“Adodc控件”中向右的图标，则可以查询到所有学生的信息。2、 对数据库中数据的添加：1） 在VB中新建一个窗体，如图所示。2） 在左侧工具中双击“Adodc控件”和“DataGrid控件”并将其放在合适的位置。3） 对“Adodc控件”属性的设置和前面相同。4） 双击退出按钮，对此按钮进行编程。5） 对Form1加入如图所示的按钮。6） 双击新添加的各个按钮对其编程：Private Sub Command1_Click()Form.ShowEnd SubPrivate Sub Command2_Click()tex_Sno.Text = tex_Sname.Text = tex_Ssex.Text = Adodc1.RefreshAdodc1.Recordset.AddNewcmd_add.Enabled = False 添加数据按钮禁用cmd_save.Enabled = True 保存数据按钮启用End SubPrivate Sub Command3_Click()If tex_Sno.Text = Then MsgBox (请输入学号)ElseIf tex_Sname.Text = Then MsgBox (请输入姓名)ElseIf tex_Ssex.Text = Then MsgBox (请输入性别)Else Adodc1.Recordset(学号) = tex_Sno.Text Adodc1.Recordset(姓名) = tex_Sname.Text Adodc1.Recordset(性别) = tex_Ssex.Text cmd_add.Enabled = Truecmd_save.Enabled = FalseEnd IfEnd SubPrivate Sub Command4_Click()Unload Form1Unload Form2End Sub7） 编写好程序后即可实现对该数据库中学生信息的添加。实 验 总 结 在本次数据库实验中，我将数据库中的理论知识，运用到实践中来。同时我也遇到很多困难，在解决它们的同时我学到了很多，受益匪浅，特别是如何分析、建立、开发一个系统。在实验中我熟练掌握了常用控件的添加、窗体的调试、控件的布局以及其对应属性的设置！并且对我们不了解的VB代码有了一定的了解。由于开始对VB和SQL Server的连接没有什么了解，而且我们也没有学习过VB，所以这次的实验我基本上都是自己查找各种资料来独立完成此次试验。在实验中我学习到了两种数据库