ASP课程设计报告.doc

ASP动态网页设计课程设计设计题目： 教务管理系统 姓 名： 学 号： 班 级： 指导老师： 起讫时间： 2011年12月26日 结束时间： 2011年12月31日 武 汉 工 业 学 院 数 学 与 计 算 机 学 院课程设计任务书此时课程设计任务是常见的动态网站的开发。例如：在线图书管理系统、办公自动化网站、信息查询网站、家教信息管理系统、文档管理系统、公文管理系统、在线旅游管理网站等，当然，也可以根据自己的兴趣爱好或专长，确定一个网站主题。但是必须要结合数据库实现，制作相关的系统。我选取的是关于教务管理的相关系统，主要是实现密码忘记后的查询，以三种身份，即学生，老师和管理员进入系统的操作。包括学生的信息查询，主要是成绩查询，老师的成绩管理，主要是成绩录入，以及管理员的信息管理，主要是发布，修改信息，查询用户信息，还有密码修改等一系列的小功能。在本系统中，主要是实现基本的高校教务管理系统功能，实现用户的简单使用，以及管理。主要的实用技术是与数据库的连接，以及数据库的增删改查等功能的实现。主要难点是数据库中多表的连接和使用，在建立系统网站是，容易混淆，故此系统的任务还有事建立多表间数据库的连接。一需求分析：学校为方便教务管理，需开发一个教务管理系统。为便于学生，老师，教务管理人员信息查询，注册以及信息修改，学校把学生的信息，包括姓名、性别、年龄，成绩等信息输入教务管理系统的数据库，然后在管理终端可以对数据进行查询和修改操作。要求系统能有效、快速、安全、可靠和无误的完成上述操作。并要求系统界面要简单明了，易于操作，程序利于维护。教学系统主要任务是能够改进和完善教务管理。在教学模块中，有两三种用户角色：管理员，教师，学生。该系统的功能需求包括管理员对功能的需求，教师对功能的需求和学生对功能需求三个部分。1. 管理员对功能的需求管理员权限最大，可以对教师、学生、课程、成绩情况进行统一的管理，管理员对功能的需求如下：1） 系统管理：包括添加教务人员及管理员自己的密码修改，添加教务人员。2） 学生信息管理：包括学生查询及添加学生。3） 教师信息管理：包括教师查询及添加教师。4） 课程信息管理：包括课程查询，添加课程，课程表安排，成绩录入，院系管理。5） 通知系统管理：包括通知查询及发布通知。6） 设置选课标志：完成学生选课标志的设置，“是”或“否”。7） 查看平均成绩：完成指定院系平均成绩统计查看。2. 教师对功能的需求教师主要是对自己信息的查询，课程成绩的查询，同事之间的信息发送及通知的查询。1） 教师信息设置：包括个人信息的查看，密码修改，重新登入及退出。2） 学生信息管理：完成学生基本信息的查询。3） 课程信息管理：包括课程信息的查询，课程表的查询，平均成绩的查看。4） 课程信息的查询，完成课程基本信息的查询。5） 课程表的查询，完成课程基本信息的查询。6） 平均成绩的查看，完成指定院系平均成绩统计查看。7） 成绩查询，完成指定课程的学生的成绩查询。8） 通知管理：包括发送信息，查看收件箱及通知查询3. 学生对功能的需求学生主要是对自己信息的查询，课程信息的查询，同学之间也可以相互交流。1） 教师信息设置：包括个人信息的查看，密码修改，重新登入及退出。2） 学生信息管理：完成学生基本信息的查询。3） 课程信息管理：包括课程信息的查询，课程表的查询，平均成绩的查看。4） 课程信息的查询，完成课程基本信息的查询。5） 课程表的查询，完成课程基本信息的查询。6） 平均成绩的查看，完成指定院系平均成绩统计查看。7） 成绩查询，完成指定课程的学生的成绩查询。二意义分析：1它是学校教学正常运行的基础2它有助于带动其他各项工作的开展3它能够促进教师不断发展提高4它是教学质量提高的有效途径5它直接影响着学生的质量和育人目标的实现总而言之，教务管理系统使得教学过程越加简单，方便化，没有教务管理这一基础，就会影响正常的教学秩序，使教学工作遭到破坏。良好的教学管理，有助于引导教师全面认识教学工作，正确处理教与学的关系，从而保证学校育人目标的实现因此，提高教务管理的科学性、规范化和效率对于一个学校的发展有着非常重要的作用。教务管理系统有着其重要的意义。三信息分析：（1）学校教务管理的数据库，包含以下信息：学校有若干个系，每个系有若干名教师和学生，每个教师可以担任若干门课程，并参加多个项目，每个学生可以同时选修多门课程，每门课程每学期可能有多名教师教授，课程分为必修、选修、任选三种。（2）学校的教务管理的信息包括：学生姓名、学号、班级、性别、班号，籍贯、出生日期、所属系编号、所属系名称、系主任，教师编号，教师姓名，教师职称，教师所授课程、课程编号，课程名，课程学分，项目编号，项目名称，项目负责人，学生选修课程及成绩。学生如果课程及格，可以取得该课程的学分。学生的各类型课程学分和总学分累计到一定程度，学生可以毕业。根据成绩高低，可以计算学分积。及格学生的学分积公式：课程学分积（该课程成绩50）/10×该课程学分。四功能分析：1.用户能够使用友好的图形用户界面实现对系、班级、学生、教师、课程、选课等内容进行增、删、改，以及对信息的查询。对于查询要实现比较强大的功能，包括精确查询、模糊查询以及统计查询。2.学生具有查找密码，修改密码，查看成绩，网上选课，网上读取信息等功能，最主要的是进行网上成绩查询和选课功能。3.老师具有查找密码，修改密码，查看成绩，网上选课，网上读取信息，对学生成绩进行录入，修改，删除等操作的功能，主要功能是实现对学生信息的查询和成绩的录入功能。4.管理员具有对用户（学生和老师）进行操作的功能，如对学生信息的增删改查，以及对老师信息的增删改查，还有对自身信息的修改和使用查询功能。5.在系统中的主要功能是有学生，老师以及管理员进行操作的，管理员的权限最大，功能最强，老师其次，学生只能进行对自身信息的增删改查以及选课，查询能功能。五ER图：(1) 学生ER图：学生学生基本信息学生班级信息学生课程信息学生成绩信息(2) 教师ER图教师所授课程编号教师编号所在系号教师姓名(3) 教管理员ER图管理员成绩管理信息维护发布信息信息管理(4) 课程ER图课程课程编号课程名称课程类型课程学分六逻辑设计：1、将ER模型转换为等价的关系模式。教师（教师编号，教师姓名，教师职称，教师所授课程，教师所属系号）；学生（姓名、学号、班级、性别、班号，籍贯、出生日期、所属系编号）；课程（课程号，课程名，学分，学时，类型）；系（系号，系名称，班级数，系主任）；成绩（学号，课程号，成绩，学分）；2、按需要对关系模式进行规范化。经过分析，教师表中的联系电话这一属性不符合第一范式，它是一个多值属性（需求分析得到教师的联系电话不止一个），所以现将联系电话属性拆分为三个属性-办公电话，移动电话和住宅电话。即：教师（工作证号码，姓名，性别，年龄，办公室号，职称，职务，办公电话，移动电话，住宅电话）；3、对规范化后的模式进行评价。经过上一步的调整之后，模式已经基本符合题目要求，可以直接将规范化以后的模型应用于物理设计。 七功能模块： 管理员系所信息专业信息基本数据维护公共信息数据表开课制定学籍信息维护学生信息成绩维护学生信息数据表开课信息数据表数据表课程信息教师信息成绩信息成绩单打印教师信息维护课程信息维护课程信息数据表教师信息数据表(1) 数据库user模块(2) 查找密码模块主要是当用户忘记密码时可以通过用户的姓名，学号，身份证号以及角色查找出用户的密码，进而通过密码和学会登陆用户界面。如图(3) 用户登陆模块在系统中，主要有三种身份登陆，分别是学生，老师，管理员。(4) 学生登陆界面在学生登陆界面中，主要有网上选课，活动报名，教学质量评价，信息维护，信息查询，问卷调查和公用信息七个模块，分别通过超链接实现子功能。(5) 网上选课模块在网上选课模块中，主要是进行重修选课和网上公选课功能。但暂时无此类信息时，就没有信息显示。(6) 活动报名，教学质量评价，问卷调查在这几个模块中，由于暂时无信息，故与(5)很相似。(7) 信息维护模块信息维护模快共有三个字模块，即个人信息，密码修改，转专业申请等，主要是进行信息的修改和查找等功能。(8) 个人信息模块主要是打印出来用户的个人信息，如学号，姓名，身份证号，电话号，宿舍号，专业，学院等。(9) 密码修改模块主要是对旧密码进行修改为新的密码，新密码易记，安全。(10)公用信息模块在这一模块，主要是显示系统中发布或修改的信息，获得教务处的最新消息，达到学生与学校管理的同步。（11） 教师系统界面主要是教师的各个模块，其中，信息维护，信息查询，公用信息与学生界面类似，这里就只对成绩管理功能详细介绍。(12)成绩管理模块成绩管理，如下图，有成绩录入，修改成绩，成绩删除三个子模块，主要是进行数据库的增删改查等功能。(13)成绩录入模块在成绩录入模块中，主要是对那些老师尚未录入成绩的学生添加成绩的过程，先选出尚未登分的学生，然后给他们都添加成绩。(14)管理员登陆界面实现管理员功能，即对学生和老师进行双重管理。如下图，主要有查询用户信息，注册用户，消息管理，管理等四个子功能。(15)查询学生信息模块对用户中得学生进行查询，输出所有的学生所有信息(16)老师信息查询模块对用户中得老师进行查询，输出所有的老师的所有信息(17)用户注册模块实现对新用户的注册，对学校里新的学生进行注册，让其具备登陆权限，只有管理员具备注册新用户的权限，学生和老师都不具备次权限。(18)消息管理模块在消息管理模块中，实现向用户传递消息的功能，管理员可以分别待向学生和老师发布的消息，修改的消息，或者删除已经无效的消息。如下图：(19)管理员密码修改模块主要是实现密码的修改功能。此时，显示密码修改成功。六功能模块核心代码：(1) 密码查找核心代码<script language=vbscript>Sub checkmsg=""If form1.num.value="" Thenmsg="学号/职工号不能为空"ElseIf form1.name.value="" Thenmsg="姓名不能为空"ElseIf form1.ID.value="" Thenmsg="身份证号不能为空"ElseIf form1.role.value="" Thenmsg="必须选择你的角色"End IfIf msg="" Thenform1.submitElseMsgBox(msg)End If End Sub </script><html><head><title>找回密码</title></head><body background="2.jpg"><h2 align="center">正确填完下表，密码马上出来哦</h2><center><table border="2"><form name="form1" method="post" action="select1.asp"><tr><th>学号/职工号</th><th><input type="text" name="num"></th></tr><tr><th>姓名</th><th><input type="text" name="name"></th></tr><tr><th>身份证号</th><th><input type="text" name="ID"></th></tr><tr><th>角色</th><th><select size="1" name="role"><option value="学生">学生</option><option value="老师">老师</option><option value="管理员">管理员</option></select></th></tr><tr><th colspan="2"><input type="button" name="select" value="查询" onclick="check"><input type="reset" name="reset" value="重置"></th></tr><tr><th colspan="2"><a href="index.asp">返回登录界面</a></th></form></table></center></body></html>(2) 登陆界面核心代码<!-#include file="conn.asp"-><%num=request.Form("num")password=request.Form("password")role=request.Form("role")If role="学生" Thenstrsql="select * from user where num='"&num&"' and password='"&password&"' and role='"&role&"'"Set rs=myfile.execute(strsql)If rs.bof Or rs.eof Thenresponse.redirect"index.asp?str=用户名或密码错误&flag=1"Elsestrsql2="select name from user where num='"&num&"'"Set rs2=myfile.execute(strsql2)session("num")=rs(0)response.write "<center>"response.write num & rs2(0)&"同学，欢迎你进入教务管理系统<br>"response.write "<a href='index.asp'>安全退出</a>"response.write "</center>"%><html><body background="2.jpg"><table align="center" border="0" bgcolor="#E1E1E1" bordercolor="blue" width="100%"><form name="form1" method="post" action=""><tr><th><a href="choose.asp">网上选课</a></th><th><a href="activity.asp">活动报名</a></th><th><a href="education.asp">教学质量评价</a></th><th><a href="information.asp">信息维护</a></th><th><a href="check.asp">信息查询</a></th><th><a href="survey.asp">问卷调查</a></th><th><a href="total.asp">公用信息</a></th></tr></form></table></html><%End IfElseIf role="老师" Thenstrsql="select * from user where num='"&num&"' and password='"&password&"' and role='"&role&"'"Set rs=myfile.execute(strsql)If rs.bof Or rs.eof Thenresponse.redirect"index.asp?str=用户名或密码错误&flag=1"Elsestrsql2="select name from user where num='"&num&"'"Set rs2=myfile.execute(strsql2)session("num")=rs(0)response.write "<center>"response.write number & rs2(0)&"老师，欢迎你进入教务管理系统<br>"response.write "<a href='index.asp'>安全退出</a>"response.write "</center>"End If%><html><body><table align="center" border="0" bgcolor="#E1E1E1" bordercolor="blue" width="100%"><form name="form1" method="post" action=""><tr><th><a href="adminscore.asp">成绩管理</a></th><th><a href="info.asp">信息维护</a></th><th><a href="checkinfo.asp">信息查询</a></th><th><a href="totalinfo.asp">公用信息</a></th></tr></form></table></html><%ElseIf role="管理员" Thenstrsql="select * from user where num='"&num&"' and password='"&password&"' and role='"&role&"'"Set rs=myfile.execute(strsql)If rs.bof Or rs.eof Thenresponse.redirect"index.asp?str=用户名或密码错误&flag=1"Elsestrsql2="select name from user where num='"&num&"'"Set rs2=myfile.execute(strsql2)session("num")=rs(0)response.write "<center>"response.write num & rs2(0)&"管理员，欢迎你进入教务管理系统<br>你可以对用户进行注册，查询等管理，谢谢使用<br>"response.write "<a href='index.asp'>安全退出</a>"response.write "</center>"%><html><body><table align="center" border="0" bgcolor="#E1E1E1" bordercolor="blue" width="100%"><form name="form1" method="post" action=""><tr><th><a href="searchuser.asp">查询用户信息</a></th><th><a href="register_form.asp">注册用户</a></th><th><a href="send.asp">消息管理</a></th><th><a href="admin.asp">管理</a></th></tr></form></table></html><%End If End If%>(3) 学生个人信息核心代码<tr><th>学号</th><th><%=rs(0)%></th><th>身份证号</th><th><%=rs(2)%></th><th>专业</th><th><<%=rs(6)%>></th><th rowspan="4"></th></tr><tr><th>姓名</th><th><%=rs(2)%></th><th>学生证号</th><th><%=rs(1)%></th><th>手机号</th><th><%=rs(5)%></th></tr><tr><th>性别</th><th><%=rs(7)%></th><th>入学日期</th><th><%=rs(8)%></th><th>出生日期</th><th><%=rs(9)%></th></tr><tr><th>学院</th><th><%=rs(10)%></th><th>民族</th><th><%=rs(11)%></th><th>宿舍号</th><th><%=rs(12)%></th></tr></form></table></html>(4) 学生修改密码核心代码<!-#include file="conn.asp"-><script language=vbscript>Sub checkmsg=""If form1.password1.value <> form1.password2.value Thenmsg="验证密码不正确"End IfIf msh="" Then form1.submitElseMsgBox(msg)End IfEnd Sub If "<%=request.querystring("flag")%>"="1" Then MsgBox("<%=request.querystring("str")%>")End if</script><center><table align="center" border="1" bgcolor="#E1E1E1" bordercolor="blue" width="60%"><form name="form1" method="post" action="modif2.asp"><tr><th>用户名</th><th><%=rs(0)%></th></tr><tr><th>旧密码</th><th><input type="password" name="password"></th></tr><tr><th>新密码</th><th><input type="password" name="password1"></th></tr><tr><th>验证密码</th><th><input type="password" name="password2"></th></tr><tr><th colspan="2"><input type="button" value="修改" onclick="check"></th></center></table><%num=session("num")strsql="select *from user where num='"&num&"'"Set rs=myfile.execute(strsql)If Not rs.bof Or rs.eof Thenpassword=request.Form("password")password1=request.Form("password1")If password = rs(4) Thenstrsql2="update user set password='"&password1&"' where num='"&num&"'"myfile.execute(strsql2)response.redirect"modif.asp?str=密码修改成功!&flag=1"Else response.redirect"modif.asp?str=旧密码填写不正确!&flag=1"End IfEnd If %>(5) 学生公用信息查询核心代码<tr><th>已发消息</th><th>发布时间</th></tr><%End Ifstrsql2="select *from message"Set rs2=myfile.execute(strsql2)Do While Not rs2.eof %><tr><th><textarea name="message" rows="4" cols="40"><%=rs2(0)%></textarea></th><th><%=rs2(1)%></th></tr><%rs2.movenextLoop%>(6) 老师成绩录入核心代码<%name=session("name")strsql2="select * from course where 老师='"&name&"'"Set rs2=myfile.execute(strsql2)Do While Not rs2.eof 'strsql3="select *from user where numIf rs2(4) =0 Then%><center><table align="center" border="0" bgcolor="#E1E1E1" bordercolor="blue" width="100%"><form name="form1" method="post" action="hand.asp"><tr><th>学号</th><th><%=rs2(0)%></th></tr><tr><th>课程代码</th><th><%=rs2(1)%></th></tr><tr><th>课程名称</th><th><%=rs2(2)%></th></tr><tr><th>成绩</th><th><input type="text" name="成绩"></th></tr><tr><th colspan="2"><input type="submit" value="提交"></th></tr></form></table></center><p><%session("num")=rs(0)End If rs2.movenextLoop %>(7) 管理员信息查询学生信息查询核心代码<center><table align="center" border="0" bgcolor="#E1E1E1" bordercolor="blue" width="100%"><tr><th>学号</th><th>身份证号</th><th>专业</th><th>姓名</th><th>学生证号</th><th>手机号</th><th>性别</th><th>入学日期</th><th>出生日期</th><th>学院</th><th>民族</th><th>宿舍号</th></tr><%End Ifstrsql2="select *from user where role='学生'"Set rs2=myfile.execute(strsql2)Do While Not rs2.eof %><tr><th><%=rs2(0)%></th><th><%=rs2(2)%></th><th><%=rs2(6)%></th><th><%=rs2(2)%></th><th><%=rs2(1)%></th><th><%=rs2(5)%></th><th><%=rs2(7)%></th><th><%=rs2(8)%></th><th><%=rs2(9)%></th><th><%=rs2(10)%></th><th><%=rs2(11)%></th><th><%=rs2(12)%></th></tr><%rs2.movenextLoop %></table></center>(8) 管理员教师信息查询核心代码<center><table align="center" border="0" bgcolor="#E1E1E1" bordercolor="blue" width="100%"><tr><th>职工号</th><th>身份证号</th><th>授课专业</th><th>姓名</th><th>工作证号</th><th>手机号</th><th>性别</th><th>工作日期</th><th>出生日期</th><th>授课学院</th><th>民族</th><th>住房地址</th></tr><%End Ifstrsql2="select *from user where role='老师'"Set rs2=myfile.execute(strsql2)Do While Not rs2.eof %><tr><th><%=rs2(0)%></th><th><%=rs2(2)%></th><th><%=rs2(6)%></th><th><%=rs2(2)%></th><th><%=rs2(1)%></th><th><%=rs2(5)%></th><th><%=rs2(7)%></th><th><%=rs2(8)%></th><th><%=rs2(9)%></th><th><%=rs2(10)%></th><th><%=rs2(11)%></th><th><%=rs2(12)%></th></tr><%rs2.movenextLoop %></table></center>(9) 管理员用户注册核心代码<!-#include file="conn.asp"->num=request.Form("num")name=request.Form("name")ID=request.Form("ID")role=request.Form("role")password=request.Form("password")sex=request.Form("sex")tel=request.Form("tel")major=request.Form("major")rudate=request.Form("rudate")birthdate=request.Form("birthdate")minzu=request.Form("minzu")room=request.Form("room")school=request.Form("school")strsql2="insert into user(num,name,ID,role,password,tel,major,sex,rudate,birthdate,school,minzu,room) values('"&num&"','"&name&"','"&ID&"','"&role&"','"&password&"','"&tel&"','"&major&"','"&sex&"','"&rudate&"','"&birthdate&"','"&school&"','"&minzu&"','"&room&"')"myfile.execute(strsql2)response.redirect"register_form.asp?str=注册成功&flag=1"%>(10) 管理员消息管理核心代码<!-#include file="conn.asp"-><script language=vbscript>If "<%=request.querystring("flag")%>"="1" Then MsgBox("<%=request.querystring("str")%>")End if</script><%num=session("num")strsql="select *from user where num='"&num&"'"Set rs=myfile.execute(strsql)If Not rs.bof Or rs.eof Thenresponse.write "<center>"response.write num & rs(1)&"管理员，欢迎你进入教务管理系统<br>你可以对用户进行注册，查询等管理，谢谢使用<br>"response.write "<a href='index.asp'>安全退出</a>"response.write "</center>"%><body><table align="center" border="0" bgcolor="#E1E1E1" bordercolor="blue" width="100%"><tr><th><a href="searchuser.asp">查询用户信息</a></th><th><a href="register_form.asp">注册用户</a></th><th><a href="send.asp">消息管理