中南大学数据库设计报告

《中南大学数据库设计报告》由会员上传分享，免费在线阅读，更多相关内容在工程资料-天天文库。

1、数据库技术与应用实验报告实验题目：毕业设计选题系统姓名：学号：班级：联系方式：2015年12月目录一、设计目的二、设计要求三、设计过程1.数据库的设计1）实体联系模型图（E-R图）2）E-R图转化的关系表2.系统功能模块,功能描述和主要VB程序代码1）系统功能模块2）功能描述3）主要VB程序代码㈠登录验证代码。㈡信息查询等代码。㈢存储信息等代码。3.程序运行展示四、心得体会与总结一、设计目的目前，随着计算机和网络技术的不断发展，各高校相继建成了自己的校园网，并充分利用校园网提供的新环境，为学校的教学、教研和教务管理所服务。因此，毕业设计选题系统已经成为了教学教务管理系统的重要部分。当前毕

2、业设计选题系统允许学生在一定的范围内选择合适自己的毕业设计题目，具有很大的灵活性，使学生不需要在固定的时间，固定的地点选题，避免了很大的麻烦。二、设计要求教师和学生进行双向选择，即学生可选择相应的毕业设计题目，教师也可选择学生1）教师：l教师可以增加毕业设计题目，人数，及要求。l教师可录取报名的学生，查看学生的详细信息如学生的基本信息，成绩等内容。l先录取填报自己的题目作为第一选题志愿的学生，再录取第二志愿的学生。l针对不同的用户，可进行相关的统计、查询可查看报自己的学生人数，基本信息等。2）学生：l可浏览教师的毕业设计题目及教师的简介等内容。l可修改自己的个人信息（基本信息）。l可以报

3、毕业设计题目，每人限报两个，第一选题志愿和第二选题志愿。3）管理员l可对每个教师、学生进行统计分析与维护。三、设计过程1.数据库的设计类型1）实体联系模型图（E-R图）:密码用户名课题名称课题编号老师编号老师姓名课题选题学院专业学号电话简介性别成绩姓名学生用户M1课题介绍编号课题名称人数学生录取姓名电话性别简介老师1N2）E-R图转化的关系表(只列出了几个主要表)表一(st_info)字段名称数据类型是否主键St_idChar(10)是St_nameVarchar(20)否St_sexChar(4)否St_collegeVarchar(20)否St_numVarchar(15)否St_c

4、ommentVarchar(200)否St_scorefloat否表二(t_info)字段名称数据类型是否主键t_idChar(10)是t_nameVarchar(16)否t_sexChar(4)否t_numVarchar(20)否t_commmentVarchar(200)否表三(xuanti)字段名称数据类型是否主键St_idChar(10）是St_nameVarchar(20)是St_sexChar(4)否Work_numVarchar(20)否Work_nameVarchar(20)否T_idchar(10)否renshuVarchar(100)否表四(Users)字段名称数据类

5、型是否主键UserNameVarchar(20)否PasswordVarchar(20)否leixingVarchar(10否2.系统功能模块,功能描述和主要VB程序代码教师学生管理员毕业设计选题系统1）系统功能模块①查看修改自己信息②查看老师信息③浏览题目④选择课题①老师课题统计②学生选题统计③维护①学生信息查看及录取②发布课题2)功能描述管理员：①老师课题统计：查看老师发布的课题及课题书；②学生选题统计：查看并统计学生选题的数目与编号；③维护：维护系统。教师：①学生信息查看及录取：来查看和录取已经选了自己的学生；②发布课题：发布课题让学生选择。学生①查看修改自己信息：查看自己的信息，

6、若有错误可进行修改；②查看老师信息：查看老师的信息；③浏览题目：浏览老师所发布的题目；④选择课题：选择自己喜欢的课题。3)主要VB程序代码㈠登录验证代码。PrivateSubcmdOk_Click()IftxtUserName.Text=""ThenMsgBox"用户名不能为空，请输入用户名！",vbCritical,"提示"ElseadoUser.RecordSource="select*fromuserswhereusername='"&Trim(txtUserName)&"'"adoUser.RefreshIfadoUser.Recordset.EOFThentxtUserName

7、.Text=""txtPwd.Text=""txtUserName.SetFocusMsgBox"用户名输入错误，请选择！",vbCritical,"提示ElseIftxtPwd.Text=""ThenMsgBox"密码不能为空，请输入密码！",vbCritical,"提示"txtPwd.Text=""txtPwd.SetFocusElseIfadoUser.Recordset.Fields("Password")=txtPwd.T