学生宿舍管理系统实验报告Word格式.docx

1、从软件工程生命周期角度，建立每一步的参考模型，并在详细设计的总要环节中，分别以管理员身份，管理员和学生的角度去分析与设计。3.需求分析 利用计算机进行管理操作能够大大改善数据处理速度，并且更加方便的对数据进行管理，可以树立良好的办学形象，提高工作效率,同时可以减少人力资源的浪费以及工资支出,使学校学生宿舍管理不再是个枯燥而是大大减少工作量的工作。3.1 任务概述（1）熟悉宿舍管理的工作流程，进行需求分析 第 2 周（2）总体设计，详细设计 第 3-5 周（3）编码实现 第 6-7 周（4）测试 第 8 周 3.2 设计及约束条件 通过计算机实现对学生进出公寓的管理，明确管理员的权限。3.3 系

2、统工作原理 通过与数据库进行连接，实现对学生数据的存储，修改等管理。3.4 系统流程图 当用户要进行登陆操作时，由终端将信息传送到系统当中，系统将登陆信息和数据库中的信息进行比对，判断用户是否合法。用户可以进行信息修改和信息查询等操作。系统流程图 3.5 数据流图 第 0 层 第 1 层 第 2 层 进入选择 进入选择 成功 选择 连接失败 连接成功 出错选择 选择信息 事物类型 1.4.1 选择事务类型 1.4.3 验证事务 选择 1.4.4 进入选择界面 1.4.7 出错 处理 1.4.8 处理连接失败 1.4.2 数据库连接 1.4.6 宿舍快递物品查询 14.5 宿舍水电查询 第 3

3、层 3.6 数据字典*名字：用户号码 别名：描述：系统识别用户的号码 定义：用户的识别序列 位置：登录界面*名字：水电信息 别名：当月的水电费用 定义：水电费用信息 位置：水电信息查询、水电缴纳*名字：宿舍检查信息 别名：宿舍检查评级 定义：检查成绩 位置：宿舍检查信息录入、宿舍检查信息公布*名字：个人信息 别名：管理员与用户的基本信息 定义：个人基本信息 位置：个人信息录入、个人信息修改*名字：学生宿舍信息 别名：学生宿舍号码 定义：学生与宿舍号的对应 位置：学生宿舍号更改*名字：用户密码 别名：登陆检验 定义：登陆密码 位置：用户登陆*数据库表：学生信息 卫生评级 宿舍报修 登记信息 快递

4、代取 3.7 性能要求 对与不存在的用户或密码错误进行报错处理，水电费用精确到 0.1 3.8 运行环境要求 Windows7，WindowsXP，SQL several 2008 4.系统设计 4.1 总体设计系统功能模块图：4.2 系统的详细设计（1）登录模块 用户通过该模块进入系统进行操作，不同的用户类型获得不同的权限。用户也可以通过该模块进行用户注册。输入：用户名，密码 处理：核对用户信息 输出：登录成功，登录失败 登录 注册 登录失败 输入密码 def 登录 输入用户名 信息正确 登录成功 注册失败 输入密码 def 注册 输入用户名 未被注册 注册成功 登录模块图 登录模块交互界面

5、 （2）学生操作模块 学生用户通过该模块实现对数据的查询，修改等操作 输入：操作选择 处理：识别操作，进行响应 输出：页面跳转 个人密码修改 报修管理 宿舍信息查询 物品遗失管理 返回主页 重输原密码 输入原密码 def 密码修改 输入用户名 密码正确 输入新密码 遗失登记 输入遗失物 def 物品遗失 输入用户名 物品已有 申请领取 学生模块 PAD 图 学生模块交互界面（3）管理员操作模块 管理员用户通过该模块实现用户信息的管理，拥有所有的权限。页面跳转 重输原密码 输入原密码 def 密码修改 输入用户名 密码正确 输入新密码 删除信息 检查信息 def 信息审核 输入用户名 是否通过

6、公布信息 个人密码修改 学生信息管理 信息公告 水电管理 返回主页 卫生检查 信息审核 管理员模块 PAD 图 管理员模块交互界面 5.编码 5.1 程序设计语言与数据库系统的选择 本系统采用 html 和 JavaScript 及 sql 语言等制作而成，数据库采用 SQL2008。5.2 系统模块的编码实现（1）登录模块%下面首先查看用户名和密码是否正确 Dim strSql,rs strSql=Select strUserId,strEmail From tbAddress5 Where strUserId=&Request.Form（txtUserId）&And strPwd=&Req

7、uest.Form（txtPwd）&Set rs=conn.Execute（strSql）If Not rs.Eof And Not rs.Bof Then 如果有记录，表示有该用户，则将用户名和 Email 保存到 Session 中 Session（strUserId）=rs（strUserId）Session（strEmail）=rs（strEmail）Response.Write 登录成功!确认身份 Else 如果没有记录，表示用户名或密码可能不正确，请给出提示信息 Response.Write 对不起，用户名或密码有误，请返回首页重新登录 End If%（2）个人信息修改模块 修改个

8、人信息 function check_Null（）if（document.frmInfo.txtName.value=）alert（真实姓名不能为空!）;return false;if（document.frmInfo.txtEmail.value=）alert（E-mail 不能为空!return true;修改个人信息 用户名 真实姓名 input type=text name=txtName size=15 value=*性别 input type=radio name=rdoSex value=男 男 input type=radio name=rdoSex value=女 女 电话

9、input type=text name=txtTel size=25 value=E-mail input type=text name=txtEmail size=40 value=*QQ 号码 input type=text name=txtQQ size=15 value=个人简介%If Request.Form（txtName）And Request.Form（txtEmail）Then 下面建立 SQL 语句，因为某些字段允许为空，所以需要判断一下 strSql=Update tbUsers Set strName=&Request.Form（txtName）&strSql=str

10、Sql&,strEmail=&Request.Form（txtEmail）&,strSex=&Request.Form（rdoSex）&,dtmSubmit=#&Date（）&#注意：如果用户没有提交 QQ 号码，那么不管原来有没有 QQ 号码，都将该字段值用 NULL 清空了。If Request.Form（txtQQ）Then strSql=strSql&,strQQ=&Request.Form（txtQQ）&Else strSql=strSql&,strQQ=NULL End If 注意：关于电话的解释同上面的 QQ If Request.Form（txtTel）Then strSql=

11、strSql&,strTel=&Request.Form（txtTel）&,strTel=NULL End If 注意：关于备注的解释同上面的 QQ If Request.Form（txtIntro）Then strSql=strSql&,strIntro=&Request.Form（txtIntro）&,strIntro=NULL End If strSql=strSql&Where strUserId=&Session（strUserId）&conn.Execute（strSql）关闭对象 conn.close Set conn=Nothing Response.Redirect inde

12、x.asp End If%（3）密码修改模块 修改个人密码 function check_Null（）if（document.frmPwd.txtOldPwd.value=）alert（旧密码不能为空!if（document.frmPwd.txtNewPwd.value=）alert（新密码不能为空!if（document.frmPwd.txtNewPwd.value!=document.frmPwd.txtNewPwd2.value）alert（新密码和确认密码必须一致!修改密码 旧 密 码 *新 密 码 *确认密码 *%如果提交了表单，就执行下面更新操作 If Request.Form（t

13、xtOldPwd）And Request.Form（txtNewPwd）Then 下面先判断旧密码是否正确 Dim strSql,rs strSql=Select strPwd From tbAddress5 Where strUserId=&Set rs=conn.Execute（strSql）If rs（strPwd）Request.Form（txtOldPwd）Then Response.Write 对不起，旧密码不正确，请重新输入！Else 下面更新密码 strSql=Update tbAddress5 Set strPwd=&Request.Form（txtNewPwd）&conn.

14、Execute（strSql）关闭对象 conn.close Set conn=Nothing 重定向到首页 Response.Redirect index.asp End If End If%（4）用户注册模块 注册：第一步 function check_Null（）if（document.frmReg.txtUserId.value=）alert（用户名不能为空!if（document.frmReg.txtUserId.value.length20）alert（用户名不能少于 4 个字符，也不能多于 20 个字符）;if（document.frmReg.txtPwd.value=）alert（密码不能为空!if（document.frmReg.txtPw