教务标准管理系统.doc

课程设计报告课程：数据库系统原理 学号： 08261008 姓名： 何婷婷 班级： 08计11班 教师： 孟 倩 徐州师范大学计算机科学与技术学院 课程设计任务书姓 名何婷婷学 号08261008班 级08计11课程名称数据库系统原理课程性质专业基本课同构成员08261024 郭琼分工学生信息模块（合伙）和教师信息模块设计时间 5月 20日 6月 20日设计名称教务管理系统设计规定可以对各种教学信息进行寻常管理，如学生管理、课程管理和任课教师管理等；充分发挥数据库管理系统高效、完全、可靠、便捷性能，减少教务人员工作量。数据库设计保证数据库系统对的性、完备性和一致性。尽量提高数据库系统执行效率，可以考虑使用视图、存储过程及触发器实现某些功能，尽量提高数据库系统执行效率。使用VB设计合理、和谐顾客界面，合理安排功能模块。应用ODBC数据对象连接和操作SQL Server数据库对象，访问数据库中各个表中数据。设计思路与设计过程设计思路：在这个设计中我负责学生信息模块设计教师信息管理模块设计与VB界面实现。学生信息模块涉及学生基本信息管理、成绩查询、学生选课信息查询、教师信息管理模块涉及教师基本信息管理、授课信息管理、成绩录入、学生基本信息查询。教师何学生只能通过登录查询有关信息；学生可以查询自己何同窗信息。教师能查看所有学生基本信息和成绩，但只能对自己所教课程学生成绩进行添加，删除和编辑等操作。只有教务员才可以有操作权限对教师基本信息进行添加，删除或是修改设计过程：VB界面实现与代码编写通过图书馆资源和网上资源参照学习及询问她人，争取实现简朴美观而又实用界面，做好与数据库连接和有关操作。筹划与进度5月20号5月26号数据库系统分析、设计及实行5月27号6月10号 系统设计、系统实现6月11号6月20号 系统实现、设计报告撰写任课教师意 见说 明教务管理系统一、 绪论选取教务管理这个题目是由于这个系统咱们较为熟悉，建表比较容易。要实现哪些功能也比较清晰。数据库设计保证数据库系统对的性、完备性和一致性。使用视图、存储过程及触发器实现某些功能，尽量提高数据库系统执行效率。使用VB设计合理、和谐顾客界面，合理安排功能模块。应用ODBC数据对象连接SQL Server数据库对象，访问数据库中各个表中数据。设计本系统为了可以对各种教学信息进行寻常管理，如学生管理、课程管理和任课教师管理等；充分发挥数据库管理系统高效、完全、可靠、便捷性能，减少教务人员工作量。在本系统中有学生信息模块、教师信息模块、教务员信息模块。学生信息模块涉及学生基本信息管理、成绩查询、学生选课信息查询；教师信息管理模块涉及教师基本信息管理、授课信息管理、成绩录入、学生基本信息查询；教务员信息模块涉及学生和教师录入。教师和学生只能通过登录查询有关信息；学生可以查询自己何同窗信息。教师能查看所有学生基本信息和成绩，但只能对自己所教课程学生成绩进行添加，删除和编辑等操作。只有教务员才可以有操作权限对学生和教师基本信息进行添加，删除或是修改二、需求分析1、问题描述:依照教务管理分别对学生信息，教师信息以及成绩信息管理等实际规定，结合教务员寻常工作开展与教务管理实际流程，开发教务管理系统需要满足如下等需求：1）对学生基本信息进行管理，其中涉及学号，姓名，性别，班级，出生日期，籍贯，联系方式，所选课程等等。2）对教师基本信息进行管理，其中涉及教师编号，姓名，性别，出生日期，职称，职务，联系方式等等。3）对学生成绩进行管理，以便教师对学生成绩录入和查询。4）对教师任课进行管理，能输出每位教师课程表。5）对成绩等信息提供灵活浏览和综合查询等功能，可以以便地查看和浏览学生基本信息，教师基本信息，成绩数据等。6）教务员可以对学生、教师基本信息以及课程信息、成绩等具备添加，删除和编辑等操作。2、系统功能描述1） 学生信息模块：学生信息管理模块重要涉及：班级管理、学籍管理、成绩管理、课程管理。 其中教师对成绩管理系统可以进行修改等操作，教务秘书对所有均有权限进行添加，删除或是修改等操作，学生只能通过登录查询关于信息和成绩。2）教师信息管理模块：教师信息管理模块重要涉及：教师基本信息管理、授课信息管理、成绩录入。其中只有教务员才可以有操作权限对教师基本信息进行添加，删除或是修改，教师只能通过登录查询有关信息。3）顾客管理模块：顾客管理模块重要涉及：学生顾客，教师顾客和教务员三类。其中学生顾客只能通过登录查询自己基本信息和成绩以及有关选课，不能浏览她人基本信息和成绩，同步也不可以改动自己各项信息。教师顾客能查看所有学生基本信息和成绩，能改动自己所授课程学生成绩。教务秘书是系统特权顾客，对学生、教师基本信息以及课程信息、成绩等可以进行添加，删除和编辑等操作。3、安全性与完整性规定：1）给每个表实行主键及外键约束。2）设定缺省约束。如教师、学生性别。3）设立非空约束。如教师、学生姓名。4）实行CHECK约束。（学生成绩在一定范畴内） 存储过程：存储过程1：通过班号查询学生学号、姓名、班级等基本信息。存储过程2：通过以成绩表为中介。连接学生基本信息表，课程信息表，班级基本信息表创立课程表。 三、 系统设计3.1系统总体设计 1、开发及运营环境： 系统开发平台：Visual Basic 6.0数据库管理系统软件：SQL Server 运营平台：Windows XP 2、系统功能构造（图）：教务管理系统学生信息管理顾客管理班级管理学籍管理课程管理基本信息管理授课信息管理成绩管理学生教师教务员教师信息管理 图1 功能构造图系统功能模块图如图1所示,本系统按照功能划分为如下四个模块：学生信息管理（涉及学生信息查询）、教师信息管理（涉及学生信息录入和学生信息查询）、顾客管理（涉及教务员、学生、教师登录等）。3.2数据库设计 3.2.1数据库概念构造设计系统E-R 班主任班名班号 管理班级学号编号 1 1构成ID m姓名姓名 n教师教学学生成绩 n宿舍号职务 1 r生成选修班号 r n成绩学号 r讲授 r课程 m课程号教师编号课程名称课程号 图2 E-R图3.2.2数据库逻辑构造设计 1、学生模式设计： 依照关系模型转换原则，上面ER图可转换为如下所示关系模型：Bj(Bno,Bname,Bdate,Btea,Bmon,Bparty)其中各项含义分别为：班级（班号，班名，建班时间，班主任，班长，团支 书）其中班号是班级表是主码Xs(Xno,Bno,Xname,Xbir,Xaddr,Xnation,Xface,Xid,Xcall,Xsno,Xmail,Xdate)其中各项含义分别为：（学号，班号，学生姓名，性别，出生日期，籍贯，民族，政治面貌，身份证号，联系方式，宿舍号，邮箱，入学日期 ） 其中学号是学生表主码，班号是学生表外码 A、 数据构造: 班级 含义阐明：描述了构成班级信息构造 构成：班号，班名，建班时间，班主任，班长，团支书 学生 含义阐明：描述了构成学生信息构造 构成：学号，班号，学生姓名，性别，出生日期，籍贯，民族，政 治面貌，身份 证号，联系方式，宿舍号，邮箱，入学日期 B、数据表 依照上面E-R图设计及关系模型设计，得出数据表设计，在本系统 中重要数据表如下：字段名称数据类型可否为空阐明班号BnoChar(8)主键4位院系代码+2位班级代码+2位班自由编码班名BnameVarchar(50)Not null班级名称建班时间BdateDatetime(8)Null学生入学时间班主任BteaChar(10)Null班主任班长BmonChar(10)Null班长团支书BPartyText(6)Null团支书 表1：班级基本信息表（Bj）字段名称数据类型可否为空阐明学号XnoChar(8)主键4位院系代码+2位班代码+2位学号代码班号BnoChar(8)Not Null4位院系代码+2位班级代码+2位班自由编码学生姓名XnameChar(10)Not Null姓名性别XsexChar(2)Not Null性别（男，女）出生日期XbirDatetime(8)Null出生日期籍贯XaddrVarchar(50)Null学生籍贯民族XnationVarchar(30)Null民族名称政治面貌XfaceVarchar(50)Null现阶段政治面貌身份证号XidChar(20)Null18位身份证号联系方式XcallVarchar(30)Null手机号或宿舍号宿舍号XsnoVarchar(30)Null宿舍楼号(2）房间号(4)邮箱XmailVarchar(30)Null邮箱号入学日期XdateDatetime（8）Null入学日期表2：学生基本信息表(Xs)2、 教师模式 依照关系模型转换原则，上面ER图可转换为如下所示关系模型Kc(Kno,Kname,Jno,Kpno,Kpname,Khour,Kciredit)其中各项含义分别为：课程（课程号，课程名，教师编号，先修课程号，先 修课程名，学时，学分）其中课程号是课程表主码Cj(Cid,Bno,Xno,Kno,Cscore)其中各项含义分别为：成绩（成绩id ，班号，学号，课程号，成绩）其中成绩id是成绩表主码，班号、学号、课程号是成绩表外码A、 数据构造 课程表 含义阐明：定义一种描述学生所选课程信息 构成：课程号，课程名，教师编号，先修课程号，先 修课程名，学时，学分 成绩表 含义阐明：定义一种描述学生所选课程成绩 构成：成绩id ，学号，课程号，成绩B、数据表依照上面E-R图设计及关系模型设计，得出数据表设计，在本系统中重要数据表如下：字段名称数据类型可否为空阐明课程号KnoChar（8）主键4位院系代码+2位课程代码+2位自由编码课程名称KnameVarchar（50）Not null课程名称(中文或英文)教师编号JnoChar（8）Not null4位院系代码+2位教师代码+2位自由编码先修课程号KpnoChar（8）Null4位院系代码+2位课程代码+2位自由编码先修课程名称KpnameVarchar（50）Null课程名称(中文或英文)学时KhourInt（4）Null所学学时学分KcreditFloat（6）Not null学分表3 课程信息表(Kc)字段名称数据类型可否为空阐明成绩CidNumeric（9）主键标记种子1、自增1班号BnoChar（8）外键4位院系代码+2位班级代码+2位班自由编码学号XnoChar（8）外键4位院系代码+2位班代码+2位学号代码课程号KnoChar（8）外键4位院系代码+2位课程代码+2位自由编码成绩CscoreFloat(8)Not null成绩，默以为0 表4 成绩信息表（CJ）四、 系统实现4.1创立数据库 创立数据库、数据表、视图，存储过程定义与实现，插入数据SQL语句详见文献夹中“数据库SQL语句”文档。 4.2 创立窗口 为了提高在表中搜索元组速度，在实际实现时候应当基于某些属性建立索引。 create unique index BjBno on Bj(Bno) create unique index XsXno on Xs(Xno)create unique index JsJno on Js(Jno)create unique index KcKno on Kc(Kno) 1、总登录界面Const xspasswd = xsConst jspasswd = jsConst jwpasswd = jwDim n As IntegerPrivate Sub Command1_Click()Select case Combo1.TextCase 学生 If (Text1.Text = xspasswd) Then 学生顾客.Show 总登录.Hide ElseMsgBox (密码错误，请重新登录！)Text1.Text = n = n + 1If (n = 3) Then MsgBox (已经3次未通过密码校验，非法顾客！)：EndEnd IfCase 教师If (Text1.Text = jspasswd) Then教师顾客.Show总登录.HideElseMsgBox (密码错误，请重新登录！)Text1.Text = ;n = n + 1If (n = 3) Then MsgBox (已经3次未通过密码校验，非法顾客！)：EndEnd IfCase 教务员If (Text1.Text = jwpasswd) Then欢迎到教务.Show总登录.HideElseMsgBox (密码错误，请重新登录！)Text1.Text = n = n + 1If (n = 3) Then MsgBox (已经3次未通过密码校验，非法顾客！)：EndEnd IfEnd SelectEnd SubPrivate Sub Command2_Click()EndEnd SubPrivate Sub Form_Load()Combo1.AddItem 学生Combo1.AddItem 教师Combo1.AddItem 教务员End Sub 图3 总登录界面 （学生登录界面、学生信息查询由同伴郭琼完毕） 2、学生成绩查询Private Sub Command1_Click()If Text1.Text ThenAdodc1.RecordSource = select * from Xs where Xno= & Trim(Text1.Text) & Adodc1.RefreshDataGrid1.Visible = TrueElseIf Text2.Text ThenAdodc1.RecordSource = select * from Xs where Xname= & Trim(Text2.Text) & Adodc1.RefreshDataGrid1.Visible = TrueEnd IfEnd IfEnd SubPrivate Sub Command2_Click()学生基本信息.Hide学生顾客.ShowEnd Sub 图 4 学生成绩查询 3、学生课程信息查询Private Sub Command1_Click()If Text1.Text ThenAdodc1.RecordSource = select * from Cj where Xno= & Trim(Text1.Text) & Adodc1.RefreshDataGrid1.Visible = TrueEnd IfEnd SubPrivate Sub Command2_Click()学生成绩.Hide学生顾客.ShowEnd SubPrivate Sub Command3_Click()学生成绩.HideEnd Sub 图 5 学生课程信息 图 6 教师登录界面4、教师顾客Private Sub Command1_Click()教师1学生.Show教师顾客.HideEnd SubPrivate Sub Command2_Click()教师录入学生成绩.Show教师顾客.HideEnd SubPrivate Sub Command3_Click()EndEnd SubPrivate Sub Command4_Click()总登录.Show教师顾客.HideEnd Sub 图 7 教师顾客界面5、教师查询Private Sub Command2_Click()教师顾客.Show教师1学生.HideEnd SubPrivate Sub Command1_Click()If Text1.Text ThenAdodc1.RecordSource = select * from Xs where Xno= & Trim(Text1.Text) & Adodc1.RefreshDataGrid1.Visible = TrueElseIf Text2.Text ThenAdodc1.RecordSource = select * from Xs where Xname= & Trim(Text2.Text) & Adodc1.RefreshDataGrid1.Visible = TrueEnd IfEnd IfIf Combo2.Text ThenAdodc1.RecordSource = select * from Xs where Bno= & Trim(Combo2.Text) & Adodc1.RefreshDataGrid1.Visible = TrueEnd IfEnd SubPrivate Sub DataGrid1_Click()End SubPrivate Sub Form_Load()Combo1.AddItem 学号Combo1.AddItem 姓名Combo1.AddItem 班级Combo2.AddItem 12341101Combo2.AddItem 12341102Combo2.AddItem 12341103End Sub 图 8 通过学号查询学生信息 图 9 通过姓名查询学生信息 图 10 通过班级查询学生信息6、 教师录入学生成绩Private Sub Command3_Click()教师顾客.Show教师录入学生成绩.HideEnd SubPrivate Sub Command4_Click()EndEnd SubPrivate Sub Command1_Click()If Text1.Text ThenAdodc1.Recordset.AddNewAdodc1.Recordset.Fields(Cid) = Trim(Text1.Text)Adodc1.Recordset.Fields(Xno) = Trim(Text2.Text)Adodc1.Recordset.Fields(Bno) = Trim(Text3.Text)Adodc1.Recordset.Fields(Kno) = Trim(Text4.Text)Adodc1.Recordset.Fields(Cscore) = Trim(Text5.Text)Adodc1.Recordset.UpdateEnd IfEnd SubPrivate Sub Command2_Click() If MsgBox(真要删除 + Trim(Adodc1.Recordset.Fields(Xno) + 吗?，vbYesNo，信息提示) = vbYes Then Adodc1.Recordset.Delete End IfEnd Sub 图 11 学生成绩录入 图 12 删除学生信息五、 设计体会 通过这次课程设计我学到了诸多东西，从数据库建立，完善，到学习VB界面代码编写、编译、修改，再到前台与数据库连接，最后到word文档排版，都让我受益匪浅，在加深对数据库结识同步，提高了自己分析问题、解决问题能力以及动手操作能力，也深刻体会到团队合伙精神重要意义。 虽然在设计过程中遇到了诸多困难，但是通过自己努力和请教别人，完毕了负责模块功能及实现，实现了简朴界面操作，并学会了运用ODBC与数据库连接，实现前台修改和后台维护。但是咱们课程设计还存在诸多需要进一步完善地方，后来应继续努力学习有关知识。