|
4.2 管理员模块 首先，管理员登录后可分配教师和领导的帐号，可对教师和领导的信息进行添加、修改和删除，还可对班级进行同样的管理。如图所示，当要添加某个领导时，就填写登录名称、登录密码、确认密码和领导姓名，然后点击添加后就在上面的表格里出现了刚添加的领导，若想编辑某个领导的信息，就可以点击编辑按钮进行编辑，或是想删除某个领导，就点击删除按钮即可。管理教师和班级信息的界面和领导相似，这里就以管理领导为例。 内容来自论文无忧网 www.paper51.com
管理领导界面如图4所示： 内容来自论文无忧网 www.paper51.com http://www.paper51.com 图4 管理领导信息界面 paper51.com
4.3 教师管理模块 http://www.paper51.com 此模块的主要功能是添加试卷（生成试卷）其中可规定试题类型的数量，每道题的分数；试题管理（在某试卷中对应的单选题、多选题和判断题可进行相应的增加、修改和删除）；查询成绩（查询某一班级某份试卷所有学生的成绩）；成绩统计（统计每个班级的某份试卷的考试人数和所占比率，及格率）。 http://www.paper51.com 下面将主要介绍教师模块的主要页面功能介绍及核心代码、主要界面设计等。教师在添加试卷的时候需要注意的是三种题型的个数和每种题型分数的乘积加起来后等于总分时，才能成功的添加一份试卷，否则就有错误提示“试卷总分和题目分数有误”，如果不填或没填完整就按添加的话，就会提示“参数错误”，页面如图5： copyright paper51.com
内容来自论文无忧网 www.paper51.com 图5 教师添加试卷页面 paper51.com 试卷添加和修改的代码如下： http://www.paper51.com <% 内容来自论文无忧网 www.paper51.com if shijuan_edit="1" and id<>"" then//判断是否为保存修改内容状态 paper51.com sqlstr="select * from [shijuan] where shijuan_id=" & id copyright paper51.com rs.opensqlstr,conn,1,3//查询某试卷并设置为可修改状态 内容来自www.paper51.com
ifrs.eof then 内容来自www.paper51.com
rs.close http://www.paper51.com call ShowErr("该试卷不存在！","1")//调用错误提示函数ShowErr copyright paper51.com else copyright paper51.com ………….//执行修改操作 paper51.com rs.update//更新数据库 内容来自论文无忧网 www.paper51.com endif paper51.com rs.close http://www.paper51.com callShowErr("试卷修改成功！","guanli_shijuan.asp") http://www.paper51.com else//添加试卷 copyright paper51.com sqlstr="select * from [shijuan] where shijuan_name='"&shijuan_name &"'" 内容来自www.paper51.com rs.opensqlstr,conn,1,3//检测所添加的试卷名是否已存在 内容来自www.paper51.com ifnot rs.eof and not rs.bof then paper51.com rs.close paper51.com
call ShowErr("该试卷名已经存在！","1") paper51.com
else 内容来自www.paper51.com
danxuan=shijuan_danxuan*shijuan_danxuancount copyright paper51.com duoxuan=shijuan_duoxuan*shijuan_duoxuancount copyright paper51.com panduan=shijuan_panduan*shijuan_panduancount 内容来自www.paper51.com
//分析添加试卷的条件是否正确：总分=各题型数目*每题得分之和 内容来自论文无忧网 www.paper51.com if danxuan+duoxuan+panduan-shijuan_total<>0then paper51.com call ShowErr("试卷总分和题目分值有误！","guanli_shijuan_add.asp") 内容来自论文无忧网 www.paper51.com else 内容来自论文无忧网 www.paper51.com rs.addnew//添加新记录 http://www.paper51.com rs("shijuan_name")=shijuan_name 内容来自论文无忧网 www.paper51.com
rs("shijuan_total")=shijuan_total 内容来自论文无忧网 www.paper51.com rs("shijuan_time")=shijuan_time 内容来自www.paper51.com rs("shijuan_danxuan")=shijuan_danxuan 内容来自www.paper51.com rs("shijuan_duoxuan")=shijuan_duoxuan copyright paper51.com
rs("shijuan_panduan")=shijuan_panduan copyright paper51.com rs("shijuan_danxuancount")=shijuan_danxuancount 内容来自www.paper51.com rs("shijuan_duoxuancount")=shijuan_duoxuancount 内容来自www.paper51.com rs("shijuan_panduancount")=shijuan_panduancount 内容来自www.paper51.com rs("shijuan_shenhe")=0 paper51.com
rs("shijuan_addtime")=now() copyright paper51.com rs.update//更新 paper51.com end if http://www.paper51.com endif 内容来自www.paper51.com rs.close http://www.paper51.com callShowErr("试卷添加成功！","guanli_shijuan.asp") paper51.com end if copyright paper51.com %> copyright paper51.com 教师在添加完试卷并规定了卷面后，就可在相应的试卷中添加题目，以添加单选题为例，输入题目和四个选项答案，并且把正确选项选上，点击添加按钮，就可成功添加单选题，在添加到与设定个数相符时，就不能再添加，如果再多添加一道，它就会相应的提示：“题目已经足够”。还有多选题和判断题，都是和单选题类似，就不详细说明。单选题添加的主要页面如图6： copyright paper51.com copyright paper51.com 图6 单选题添加 内容来自论文无忧网 www.paper51.com 单选题的添加和修改代码如下： 内容来自论文无忧网 www.paper51.com
<% 内容来自www.paper51.com
if request.Form.count>0 then//判断是否为提交表单状态（即添加或保存修改单选题） http://www.paper51.com danxuan_timu=HTMLEncode(trim(request.Form("danxuan_timu")))//HTMLEncode方法对指定的字符串应用 HTML 编码,danxuan_timu为题目 内容来自www.paper51.com danxuan_a=HTMLEncode(trim(request.Form("danxuan_a")))//答案A 内容来自论文无忧网 www.paper51.com
danxuan_b=HTMLEncode(trim(request.Form("danxuan_b")))//答案B 内容来自论文无忧网 www.paper51.com
danxuan_c=HTMLEncode(trim(request.Form("danxuan_c")))//答案C 内容来自论文无忧网 www.paper51.com
danxuan_d=HTMLEncode(trim(request.Form("danxuan_d")))//答案D http://www.paper51.com danxuan_daan=request.Form("danxuan_daan")//正确答案 http://www.paper51.com danxuan_edit=request.Form("danxuan_edit")//判断为编辑状态的参数 copyright paper51.com id=request.Form("danxuan_id")//试题ID copyright paper51.com call CheckNum(id) paper51.com if danxuan_edit="1" andid<>"" then//保存编辑 http://www.paper51.com
sqlstr="select * from [danxuan]where danxuan_id=" & id copyright paper51.com rs.opensqlstr,conn,1,3//查询某单选题并设为可修改状态 内容来自论文无忧网 www.paper51.com ifrs.eof then 内容来自论文无忧网 www.paper51.com rs.close 内容来自论文无忧网 www.paper51.com call ShowErr("该单选题不存在！","1") 内容来自www.paper51.com else 内容来自论文无忧网 www.paper51.com
………….//执行修改操作 内容来自www.paper51.com rs.update//更新单选题内容 内容来自www.paper51.com endif copyright paper51.com rs.close copyright paper51.com
callShowErr("单选题修改成功！","guanli_shijuan.asp") 内容来自论文无忧网 www.paper51.com else http://www.paper51.com if danxuan<=danxuancount then//该试卷目前的单选题数目已经等于所设定的题目数了 内容来自论文无忧网 www.paper51.com callShowErr("题目已经足够！","guanli_shijuan.asp") copyright paper51.com else paper51.com sqlstr="select * from [danxuan]" 内容来自www.paper51.com rs.opensqlstr,conn,1,3 http://www.paper51.com rs.addnew//添加单选题 内容来自论文无忧网 www.paper51.com rs("danxuan_timu")=danxuan_timu 内容来自www.paper51.com rs("danxuan_a")=danxuan_a 内容来自论文无忧网 www.paper51.com rs("danxuan_b")=danxuan_b copyright paper51.com rs("danxuan_c")=danxuan_c 内容来自www.paper51.com rs("danxuan_d")=danxuan_d 内容来自论文无忧网 www.paper51.com rs("danxuan_daan")=danxuan_daan http://www.paper51.com rs("danxuan_shijuan")=id paper51.com rs.update paper51.com rs.close http://www.paper51.com callShowErr("单选题添加成功！","guanli_danxuan.asp?id="&id) 内容来自论文无忧网 www.paper51.com end if 内容来自论文无忧网 www.paper51.com end if paper51.com
end if http://www.paper51.com %> 内容来自论文无忧网 www.paper51.com
|