学生信息管理系统(数据库)
一 . 学生信息管理系统资源
下载链接学生信息管理.accdb-Access文档类资源-CSDN下载
二.数据库设计
2.1ER图设计
2.2从ER图到关系模式
ER图中存在三个实体:学生、课程、成绩;两个关系:选修和所属。学生与课程n:m联系。课程与学生成绩1:m联系。“选修”和“所属”不单独建立实体集。把“学生”中的学号和“课程”中的课程号设为主键,其他的属性设为外键。学生与成绩可通过课程建立联系。
2.3关系模式的数据字典
学生表
数据项名 |
类型 |
长度 |
精度 |
取值范围 |
默认值 |
是否允许为空 |
KEY |
id |
char |
255 |
NULL |
NO |
PRI |
||
name |
char |
25 |
NULL |
YES |
|||
gender |
char |
25 |
NULL |
YES |
|||
class |
char |
25 |
NULL |
YES |
|||
address |
char |
25 |
NULL |
YES |
|||
age |
char |
25 |
NULL |
YES |
|||
Phone number |
char |
25 |
NULL |
YES |
|||
password |
char |
20 |
NULL |
YES |
成绩表
数据项名 |
类型 |
长度 |
精度 |
取值范围 |
默认值 |
是否允许为空 |
KEY |
student_id |
char |
255 |
NULL |
NO |
PRI |
||
class_id |
char |
255 |
NULL |
NO |
PRI |
||
score |
char |
25 |
NULL |
YES |
课程表
数据项名 |
类型 |
长度 |
精度 |
取值范围 |
默认值 |
是否允许为空 |
KEY |
id |
char |
255 |
NULL |
NO |
PRI |
||
name |
char |
255 |
NULL |
YES |
|||
point |
char |
25 |
NULL |
YES |
2.4系统开发工具简介
开发工具:access
2.5数据库与表的建立
学生表:student的创建
sql = """CREATE TABLE IF NOT EXISTS student(id char(255) NOT NULL,name char(25) default NULL,gender char(5) default NULL,class char (25) default NULL,address char(25) default NULL,age char(25) default NULL,phone number char(25) default NULL,password char(20) default NULL,PRIMARY KEY (id)) ENGINE = InnoDBDEFAULT CHARSET = utf8"""cursor.execute(sql)
Field |
Type |
Null |
Key |
Default |
id |
Char(255) |
NO |
PRI |
NULL |
name |
Char(25) |
YES |
NULL |
|
gender |
Char(25) |
YES |
NULL |
|
class |
Char(25) |
YES |
NULL |
|
address |
Char(25) |
YES |
NULL |
|
age |
Char(25) |
YES |
NULL |
|
Phone number |
Char(25) |
YES |
NULL |
|
password |
Char(20) |
YES |
NULL |
课程表的创建:class
sql = """CREATE TABLE IF NOT EXISTS class(id char(255) NOT NULL,name char(255) default NULL,point char(25) default NULL,PRIMARY KEY (id)) ENGINE = InnoDBDEFAULT CHARSET = utf8"""cursor.execute(sql)
Field |
Type |
Null |
Key |
Default |
id |
Char(255) |
NO |
PRI |
NULL |
name |
Char(255) |
YES |
NULL |
|
point |
Char(25) |
YES |
NULL |
成绩表的创建:score
sql = """CREATE TABLE IF NOT EXISTS score(stu_id char(255) NOT NULL,class_id char(255) NOT NULL,score char(25) default NULL,PRIMARY KEY (class_id,student_id)) ENGINE = InnoDBDEFAULT CHARSET = utf8"""cursor.execute(sql)
Field |
Type |
Null |
Key |
Default |
student_id |
Char(255) |
NO |
PRI |
NULL |
class_id |
Chat(255) |
NO |
PRI |
NULL |
score |
Char(25) |
YES |
NULL |
管理员表的创建:admin_k
sql = """CREATE TABLE IF NOT EXISTS admin_login_k(admin_id char(50) NOT NULL,admin_pass char(50) default NULL,PRIMARY KEY (admin_id)) ENGINE = InnoDBDEFAULT CHARSET = utf8"""cursor.execute(sql)
Field |
Type |
Null |
Key |
Default |
admin_id |
Char(50) |
NO |
NULL |
|
admin_pass |
Char(50) |
YES |
NULL |
2.6用户管理权限的实现
2.6.1 登陆界面
页面主要有Visual Basic代码编写,主界面设计关键代码:
Option Compare Database
Private gl As BooleanPrivate Sub Option4_Click()
If Me.Option4.Value = -1 ThenMe.Option8.Value = 0gl = True
End If
End SubPrivate Sub Option8_Click()
If Me.Option8.Value = -1 ThenMe.Option4.Value = 0gl = False
End If
End Sub
Private Sub 登录_Click()If IsNull(Me.Option4.Value) And IsNull(Me.Option8.Value) Then MsgBox "请选择角色后再登录", vbExclamation, vbOKOnly: Exit Sub
If IsNull(UserName) ThenMsgBox "用户名不能为空,请重新选择!", vbExclamation + vbOKOnly, "提醒您!" '弹出框Me.UserName.SetFocusExit Sub
ElseIf IsNull(Password) ThenMsgBox "注意,您忘了输入密码!", vbExclamation + vbOKOnly, "提醒您!" '弹出框Me.Password.SetFocusExit SubEnd If
If gl ThenIf DLookup("管理员密码", "管理员", "管理员名称='" & UserName & "'") = [Password] Then'验证账号密码Me.Visible = FalseMe.Password = NullMsgBox "登录成功!", vbExclamation, "提醒您"StrName = Me.UserName
ElseMsgBox "您输入的密码有误,请重新输入,注意大小写!", vbExclamation + vbOKOnly, "提醒您!"Exit SubEnd If
'管理员登录
DoCmd.OpenForm ("管理员系统") '登陆成功,打开管理员系统界面
Else
'普通用户登录
If DLookup("密码", "学生", "学号='" & UserName & "'") = [Password] Then
'验证账号密码
Me.Visible = False
Me.Password = Null
MsgBox "登录成功!", vbExclamation, "提醒您" '登陆成功
StrName = Me.UserName
Else
MsgBox "您输入的密码有误,请重新输入,注意大小写!", vbExclamation + vbOKOnly, "提醒您!"
Exit Sub
End If
DoCmd.OpenForm ("学生系统")
End If
'弹出框
Me.Password = Null
Me.Password.SetFocus
End If
End Sub
2.6.2学生系统
Option Compare Database
Private Sub Command1_Click()On Error GoTo Err_Command1_ClickDim stDocName As StringDim stLinkCriteria As StringstDocName = "学生信息查询"DoCmd.OpenForm stDocName, , , stLinkCriteriaExit_Command1_Click:Exit SubErr_Command1_Click:MsgBox Err.DescriptionResume Exit_Command1_ClickEnd Sub
Private Sub Command2_Click()On Error GoTo Err_Command1_ClickDim stDocName As StringDim stLinkCriteria As StringstDocName = "课程查询"DoCmd.OpenForm stDocName, , , stLinkCriteriaExit_Command1_Click:Exit SubErr_Command1_Click:MsgBox Err.DescriptionResume Exit_Command1_ClickEnd Sub
Private Sub Command3_Click()On Error GoTo Err_Command1_ClickDim stDocName As StringDim stLinkCriteria As StringstDocName = "成绩查询"DoCmd.OpenForm stDocName, , , stLinkCriteriaExit_Command1_Click:Exit SubErr_Command1_Click:MsgBox Err.DescriptionResume Exit_Command1_ClickEnd Sub
2.6.3管理员系统
Option Compare Database
Private Sub Command1_Click()On Error GoTo Err_Command1_ClickDim stDocName As StringDim stLinkCriteria As StringstDocName = "学生信息管理"DoCmd.OpenForm stDocName, , , stLinkCriteriaExit_Command1_Click:Exit SubErr_Command1_Click:MsgBox Err.DescriptionResume Exit_Command1_ClickEnd Sub
Private Sub Command2_Click()On Error GoTo Err_Command1_ClickDim stDocName As StringDim stLinkCriteria As StringstDocName = "成绩管理"DoCmd.OpenForm stDocName, , , stLinkCriteriaExit_Command1_Click:Exit SubErr_Command1_Click:MsgBox Err.DescriptionResume Exit_Command1_ClickEnd Sub
Private Sub Command3_Click()On Error GoTo Err_Command1_ClickDim stDocName As StringDim stLinkCriteria As StringstDocName = "登录"DoCmd.OpenForm stDocName, , , stLinkCriteriaExit_Command1_Click:Exit SubErr_Command1_Click:MsgBox Err.DescriptionResume Exit_Command1_ClickEnd SubPrivate Sub Command4_Click()On Error GoTo Err_Command1_ClickDim stDocName As StringDim stLinkCriteria As StringstDocName = "采购员信息管理"DoCmd.OpenForm stDocName, , , stLinkCriteriaExit_Command1_Click:Exit SubErr_Command1_Click:MsgBox Err.DescriptionResume Exit_Command1_ClickEnd Sub
2.7删除记录
通过宏命令的叠加设计:
2.8修改记录
宏命令:
2.9增加记录
宏命令:
2.10信息查询
宏命令:
三、总结(经验与不足)
数据库管理系统实现的功能:
基本上用所学知识实现了大数据的增删改查,数据比较完整,极易查询,界面清晰,较为简单,操作也相对方便,用户友好度较高界面简洁明了,总体上来说完成度较高,具备了学生信息管理系统的基本功能。
数据库存在的问题:
距离真正投入使用还是存在着较大差距
管理员的管理流程和系统过于简单,容易误改学生信息
学生之间也可以互相查看对方信息,私密性较差
学生信息管理系统(数据库)相关推荐
- 教师工作量管理系统设计_关于学生信息管理系统数据库的课程设计
一.概述 学生信息管理系统是学校管理的重要工具,是学校不可或缺的一部分.随着在校人数的不断增加,教务系统的数量也不断的上涨.学校工作繁杂,资料众多,人工管理信息的难度也越来越大,显然是不能满足实际的需 ...
- [Python+Django]Web学生信息管理系统数据库设计及系统实现
本文我们完成数据的设计,并通过Django框架完成数据库构建同时利用Django框架模式实现学生信息管理系统的功能. 简单的包装下毕设应该没问题了. Python,Mysql,Pycharm的安装本文 ...
- 阶段项目:学生信息管理系统数据库设计
目录 问题描述: 一.后台数据库的设计 1)设计数据库 2)插入数据 3)查询数据 4)修改数据 5)管理数据 1.导出数据到各种异构数据源.导出脚本 2.附加和分离数据库 二.前端界面的开发(后期我 ...
- 计算机信息管理是学什么课程设计,毕业论文计算机专业学生信息管理系统(数据库课程设计)...
毕业论文计算机专业学生信息管理系统(数据库课程设计) (70页) 本资源提供全文预览,点击全文预览即可全文预览,如果喜欢文档就下载吧,查找使用更方便哦! 9.90 积分 兰州石化职业技术学院毕业设计( ...
- .net学习笔记——学生信息管理系统(一、在SQL server中新建学生信息库)
(学习目标:使用.net 窗体制作一个学生信息管理系统,满足学生信息.班级信息.年级信息的增删改查.) 第一天:建库 任务:在SQL Server中建一个小型的学生信息管理系统数据库,可以存放学生信息 ...
- 基于SSM的学生信息管理系统
基于SSM的学生信息管理系统 摘要 随着互联网技术和国内教育行业持续高速地发展,管理员为了能够更加方便地管理学生信息,学生信息管理系统被开发出来的目的是为了能够更加方便管理学生信息,一个良好的学生信息 ...
- mysql练习-学生信息管理系统
文章目录 学生信息管理系统 一.分析 1.1业务分析 1.2分析系统 1.2.1登录模块 1.2.2学生模块 1.2.3教师模块 1.2.4系统管理人员模块 二.构建模型 2.1 概念模型:ERP模型 ...
- SSM学生信息管理系统-计算机毕设 附源码70168
SSM学生信息管理系统 摘要 从20年代开始,计算机疯狂的出现在人们的生活以及工作当中,成为人们生活.工作的好帮手,计算机深入到每家每户当中,网络办公,网络教学更是替换了传统手工记录管理的方式,使用计 ...
- 学生信息管理系统的设计与实现 计算机毕设源码70168
摘要 从20年代开始,计算机疯狂的出现在人们的生活以及工作当中,成为人们生活.工作的好帮手,计算机深入到每家每户当中,网络办公,网络教学更是替换了传统手工记录管理的方式,使用计算机办公可以不必局限于固 ...
- 【VB】学生信息管理系统5——数据库代码
这次学生信息管理系统在代码的理解过程中遇到了一些问题.总结如下: 1. sql server的安装过程各个步骤的意思.在安装SQL Server的时候按照网上的步骤,我觉得这个需要学完整个数据库再返回 ...
最新文章
- [转]ASP.NET中使用UpdatePanel实现局部异步刷新方法和攻略
- 10-表格添加、删除
- CentOS7部署jar包
- 介绍一种找bug的方法
- Java高级应用开发之Servlet
- oracle查询访问记录,[原创]Oracle Spatial新驱动的查询记录实例
- Flex 给PopUpButton 设置皮肤
- Android SDK Manager 更新代理配置
- 跨境电商独立站门槛高,为什么还有无数人挤破头想入坑!
- MySQL使用什么关键字添加唯一约束_mysql怎么添加唯一约束?
- 一个新时代的降临:智慧的医疗系统
- 【EOS】2.4 EOS数据存储
- UtIL DBUtil
- Servlet JSP 面试题
- 爬虫基础回顾-requests
- 乌镇互联网大会部分嘉宾分享要点实录
- 您应该购买哪款Apple Watch?
- slice与splice用法
- javascript教程完整版,JavaScript视频教程
- FTS数据库优化(Android)原理与应用详解(1)