数据库课程设计--学生成绩管理系统.doc

此文档收集于网络，如有侵权，请联系网站删除课程设计说明书题目： 学生信息管理系统 院 系： 信息工程与科学学院 专业班级： 09专四 学 号： 学生姓名： 指导教师： 2011年 6 月 25 日摘要 学校学生管理信息系统是针对学校人事处的大量业务处理工作而开发的管理软件，是典型的管理信息系统（Management Information System）。它是一个教育单位不可缺少的部分,它的内容对于学校的决策者和管理者来说都至关重要,它能够为用户提供充足的信息和快捷的查询手段。能有效的帮助学校和老师掌握学生的情况，为学生提供成绩跟课程方面的查询。目录摘要-1目录-2一概述-3二主要功能-3三需求分析-3四概念模型设计-5五逻辑和物理结构设计-6六 数据库的实施与维护-8七总结-13一 概述1.1目的与要求随着科技的发展，基本上所有的具有一定数量数据的机构都开始使用计算机数据库来做管理。几乎所有学校也都已经在使用计算机管理数据的机制，大大减少了学校学生成绩管理的工作量。该课程设计要求设计一个学生成绩的数据库管理系统，数据库中要求包含学生的基本信息，学科基本信息，以及学生所学课程的考试成绩。要方便学生进行成绩查询，通过该课程设计，应该达到把数据库理论知识更加的巩固加深，加强动手能力与实践能力，学以致用，与现实生活中的应用充分的结合起来。二 主要功能1学籍信息管理2班级信息管理3课程信息管理4成绩信息管理5系统管理三 需求分析系统功能要求设计此系统实现如下系统功能：（1）使得学生的成绩管理工作更加清晰、条理化、自动化。（2）通过用户名和密码登录系统，查询课程基本资料，学生所选课程成绩，修改用户密码等功能。 容易地完成学生信息的查询操作。(3) 设计人机友好界面，功能安排合理，操作使用方便，并且进一步考虑系统在安全性，完整性，并发控制，备份和恢复等方面的功能要求。 系统模块设计登陆失败学生管理课程管理退出系统用户验证成绩查询登陆成功成绩管理系统大体可以分成二大模块如， 一是学生的基本信息模块，里面应该包含学生的各方面的基本信息；再者便是课程管理模块， 在该模块中应该包含有对学生成绩信息的查询和处理，如平均成绩、最好成绩、最差成绩以及不及格学生的统计等功能模块；再其次还有教师、课程等相关信息的模块；可以得到系统流程图： 数据字典 数据项是数据库的关系中不可再分的数据单位，下表分别列出了数据的名称、数据类型、长度、取值能否为空。利用SQL Server 2000建立“学生选课”数据库，其基本表清单及表结构描述如下：数据库中用到的表：数据库表名关系模式名称备注Student学生学生学籍信息表Course课程课程基本信息表Score成绩选课成绩信息表Student基本情况数据表，结构如下：字段名字段类型Not Null说明Student _snoCharPrimary key学号Student _sncharNot Null学生姓名Student _sexchar男或女性别Student _deptchar系别Student_agechar年龄Student_addresschar地址course数据表，结构如下：字段名字段类型约束控制说明course_cnochar主键（primary key）课程号course_cnamecharnot null课程名称course_hourintnot null课时course_scorenumeric(2,1)not null学分score情况数据表，结构如下：字段名字段类型约束控制说明score_idintnot null成绩记录号course_cnochar外部键课程号student_snochar外部键学号scoreint成绩四 概念模型设计由需求分析的结果可知，本系统设计的实体包括：（1）学生基本信息：学号，姓名，性别，地址，年龄，专业。（2）课程基本信息： 课程名，课程号，分数，学时，学分。 这些实体间的联系包括：（1）每位学生可以学习多门课程，每门课程可供多位学生学习。由上述分析可得到系统的ER图：选修课程成绩学生课程号课程名学时 学分分数学号姓名性别系别 地址年龄五逻辑和物理结构设计由系统ER图转化而得到的关系模式如下：（1）学生（学号，姓名，性别，年龄，地址，系别），其主关键字为学号;（2）课程（课程名，课程号，学时，学分），其中主关键字为课程号；（3）成绩（课程号，学号，分数）其中主关键字为学号和课程号。可以与学生关系模式合并为：学生（学号，姓名，性别，年龄，地址，系别，成绩，课程号）。 确定关系模型的存取方法在将概念模型转换成物理模型之后，我们可以对物理模型进行设计，双击物理模型的关系，可以对该关系的名称、注释等信息进行查询。可对该关系的属性列进行设计，可分别设置其名称、码、数据类型以及主码、是否为空等。在实际设计中最常用的存取方法是索引发，使用索引可以大大减少数据的查询时间，在建立索引时应遵循：在经常需要搜索的列上建立索引； 在主关键字上建立索引；在经常用于连接的列上建立索引，即在外键上建立索引；在经常需要根据范围进行搜索的列上创建索引，因为索引已经排序，其指定的范围是连续的等规则。才能充分利用索引的作用避免因索引引起的负面作用。 确定数据库的存储结构确定数据库的存储结构主要指确定数据的存放位置和存储结构，包括确定关系、索引、日志、备份等的存储安排及存储结构，以及确定系统存储参数的配置。因为该成绩管理系统的数据量小，所以我们只用把数据存储在使用的电脑硬盘上，不用作更多的安排。(1)创建学生基本信息表:create table Student ( 学号 varchar(11) not null, 系别 varchar(5) not null, 姓名 varchar(6) not null, 性别 varchar(2) not null, 年龄 char(2) not null, 地址 varchar(20) not null, constraint PK_STUDENT primary key (学号)goexecute sp_addextendedproperty MS_Description, 学生基本信息描述, user, , table, StudentsInfogo(2)创建课程表:create table Course ( cno varchar(5) not null, cname varchar(10) null, xueshi smallint null, xuefen int null, constraint PK_COURSE primary key (课程号)goexecute sp_addextendedproperty MS_Description, (3)创建学生与课程的成绩表create table SC ( sno varchar(11) not null,cno varchar(5) not null,chengji varchar(4) not null constraint PK_SC primary key (学号, 课程号)go在SC表上创建索引SC_FK与SC2_FKcreate index SC_FK on SC (学号 ASC)Gocreate index SC2_FK on SC (课程号 ASC)go 建立课程号索引create index TC_FK on TC (课程号 ASC)go下图显示了学生，课程和成绩三个关系的物理设计其中课程号与学号号分别为关系的主码。 六 数据库的实施与维护数据库的实施：此阶段主要任务包括创建数据库，加载初始数据，数据库试运行，数据库的安全性和完整性控制数据库的备份与恢复，数据库性能的监督分析和改仅，数据库的重组和重构等。首先在数据库中建立一个学生成绩管理系统数据库，然后新建一个数据源。主要代码如下：begin ComboBox1.Items.Append(adoquery1.FieldValues系名); /ComboBox1连到系表的 系名 字段 adoquery1.Next;end; end;procedure TForm11.ComboBox1Select(Sender: TObject);beginadoquery2.Close;adoquery2.SQL.Clear;adoquery2.SQL.Add(select * from class where 系名=+ComboBox1.Text+);/查询系名是否符合adoquery2.ExecSQL;adoquery2.Open;while not adoquery2.Eof do begin ComboBox2.Items.Append(adoquery2.FieldValues班级);/符合就调用班级表的字段 班级 adoquery2.Next;end;end; procedure TForm11.ComboBox2Select(Sender: TObject);beginadoquery4.Close;adoquery4.SQL.Clear;adoquery4.SQL.Add(select * from kecheng where 班级=+ComboBox2.Text+);/查询课程表中字段 班级 是否符合，符合就调到adoquery4.ExecSQL; /DBgiid1adoquery4.Open;end; procedure TForm11.ComboBox3Select(Sender: TObject);beginadoquery4.Close;adoquery4.SQL.Clear;adoquery4.SQL.Add(select * from kecheng where 班级=+ComboBox2.Text+ and 学期=+ComboBox3.Text+); /判断学期是否符合adoquery4.ExecSQL;adoquery4.Open;end; procedure TForm11.SpeedButton1Click(Sender: TObject);beginwhile not adoquery4.Eof dobeginif (adoquery4.FieldValues课程号=adoquery3.FieldValues课程号) and (adoquery4.FieldValues班级=Combobox2.Text) and (adoquery4.FieldValues学期=Combobox3.Text) thenbreak;adoquery4.Next;end;if adoquery4.Eof thenbeginadoquery4.Insert; /把选课内容添加到选课表中。 adoquery4.FieldValues课程号:=adoquery3.FieldValues课程号;adoquery4.FieldValues班级:=Combobox2.Text;adoquery4.FieldValues课程名:=adoquery3.FieldValues课程名;adoquery4.FieldValues学期:=Combobox3.Text;adoquery4.Post;endelsebeginshowmessage(本课程此班级已经选过); /如果已经选过，弹出对话框“本课程此班级已经选过”end;end;procedure TForm11.SpeedButton2Click(Sender: TObject);beginif not adoquery4.Eof thenadoquery4.Delete;end;end. 课程管理:procedure TForm9.FormCreate(Sender: TObject);beginADOQuery3.Close; /关闭数据库ADOQuery3.SQL.Clear; /清空ADOQuery3.SQL.Add(select * from kechengbiao);ADOQuery3.ExecSQL;ADOQuery3.Open;dbedit1.DataField:=课程号;dbedit2.DataField:=课程名;dbedit3.DataField:=课时;dbedit4.DataField:=学分;/DBComboBox1.DataField:=学期;DBComboBox2.DataField:=类型; end; procedure TForm9.SpeedButton1Click(Sender: TObject);beginif SpeedButton1.Caption=添加 thenbeginadoquery3.Insert; /添加到课程表SpeedButton1.Caption:=确定;SpeedButton4.Enabled:=true;SpeedButton2.Enabled:=false;SpeedButton3.Enabled:=false;endelseif SpeedButton1.Caption=确定 thenbeginif dbedit1.Text= thenbeginshowmessage(请输入课程号！); /如果课程号没输入,弹出对话框endelsebeginadoquery3.Post;SpeedButton1.Caption:=添加;SpeedButton4.Enabled:=false;SpeedButton2.Enabled:=true;SpeedButton3.Enabled:=true;end;end;end; procedure TForm9.SpeedButton2Click(Sender: TObject);beginif adoquery3.Eof thenbeginSpeedButton2.Enabled:=false;SpeedButton3.Enabled:=false;end;if SpeedButton2.Caption=删除 thenbeginSpeedButton2.Caption:=确定;SpeedButton4.Enabled:=true;SpeedButton1.Enabled:=false;SpeedButton3.Enabled:=false;endelsebeginadoquery3.Delete; /从数据表中删掉所选记录SpeedButton2.Caption:=删除;SpeedButton4.Enabled:=false;SpeedButton1.Enabled:=true;SpeedButton3.Enabled:=true;end;end; procedure TForm9.SpeedButton4Click(Sender: TObject);begin adoquery3.Cancel;SpeedButton1.Caption:=添加;SpeedButton2.Caption:=删除;SpeedButton3.Caption:=修改;SpeedButton4.Enabled:=false;SpeedButton1.Enabled:=true;SpeedButton2.Enabled:=true;SpeedButton3.Enabled:=true;end; procedure TForm9.SpeedButton3Click(Sender: TObject);beginif SpeedButton3.Caption=修改 thenbeginadoquery3.Edit; /修改课程表中的记录SpeedButton3.Caption:=确定;SpeedButton4.Enabled:=true;SpeedButton2.Enabled:=false;SpeedButton1.Enabled:=false;endelsebeginadoquery3.Post;SpeedButton3.Caption:=修改;SpeedButton4.Enabled:=false;SpeedButton2.Enabled:=true;SpeedButton1.Enabled:=true;end; end; procedure TForm9.Label1DblClick(Sender: TObject);beginform11:=tform11.Create(application);form11.ShowModal; end;end. 课程查询部分：procedure Tform4.ComboBox1Select(Sender: TObject); beginedit1.Text:=;button1.Enabled:=false;end; procedure Tform4.Button1Click(Sender: TObject);beginif CheckBox1.Checked=true thenbeginADOQuery1.Close; /先将数据库关闭ADOQuery1.SQL.Clear; /清空ADOQuery1内的SQL值清空ADOQuery1.SQL.Add(select * from kecheng where +ComboBox1.text+ = +edit1.Text+ and 学期 = +ComboBox2.Text+); /合并查询，符合的话在DBGrid中显示出来ADOQuery1.ExecSQL;ADOQuery1.Open;endelsebeginADOQuery1.Close;ADOQuery1.SQL.Clear;ADOQuery1.SQL.Add(select * from kecheng where +ComboBox1.text+ = +edit1.Text+);/单个条件查询ADOQuery1.ExecSQL;ADOQuery1.Open;end;end; procedure Tform4.N2Click(Sender: TObject);begin /开启其他管理界面form2.show;form4.Close;end; procedure Tform4.N3Click(Sender: TObject);begin form3.show;form4.Close;end; procedure Tform4.N4Click(Sender: TObject);beginform5.show;form4.Close;end; procedure Tform4.N6Click(Sender: TObject);beginform1.show;form4.Close;end; procedure Tform4.N7Click(Sender: TObje