<script language="vbscript">
'客户端程序，求出剩余时间，利用timeout（每1000ms产生一次事件）
dim counter,t,fen,miao
counter=61 '这里假设考试时间为1分,即60秒
'页面的加栽事件
sub window_onload
    t=settimeout("timeout()",1000) '每隔1000毫秒timeout过程被执行一次
end sub
sub timeout
counter=counter - 1
if counter>=0 then '还有剩余时间
'根据counter的值求出剩余的分、秒，并把它显示在页面上
fen=counter / 60 ：miao=counter mod 60 : T1.value=fen : T2.value=miao
t=settimeout("timeout()",1000)
else
form1.submit '假如考试时间已到，则自动提交表单中的内容
end if
end sub
</script>
2、 身份验证
根据考生的姓名、身份证号码、密码到数据库中查找相应记录，如果库中有该考生的记录，则允许进入，并且把考生信息记录在session中，否则给出信息，不允许进入。
<% dim xm,sfzhm,dw,mm,sjdh,exec1,xm_tj,sfzhm_tj,mm_tj,condition,exec2
'（略）……根据上一个页面中的信息查询库中是否有该考生的记录记录
if (not rs.eof) then ' 如果条件为真,则表示库中有该考生的记录
if rs("jsjjc_dl")=0 then '如果库中有该考生记录,则继续判断该考生是否参加过这门课程的考试
    '如果该考生没有参加过这门课程的考试,则用session记录下考生信息
    session("xingming")=xm ：session("shenfzh")=sfzhm：session("mima")=mm %>
'………… 显示试卷页面
<%else
response.write "您已经参加过测试，不能再次进入" '如果rs("jsjjc_dl")<>0 则表明考生已经
end if '参加过考试
else%>
<script language=vbscript>
alert("您输入的信息不对，请重新输入！") '如果表中没有查到该考生的记录,则显示提示窗口
set w2=open("default.asp") '并且重新定位到登录页面,使考生重新输入信息。
</script>
<%end if%>
（二） 试卷的生成：
试卷页面是采用ASP技术动态生成的。数据库中有一个字段，标记试卷代号，可以根据考生输入的试卷代号从数据库中选取相应记录，并把它按照一定的布局显示在页面上。从前面我们可以知道，选择题有一个表，先从选择题表中取出相应记录，同时动态生成表单域。然后从填空题表中选取符合条件的记录，本例以生成选择题为例说明试卷页面的生成。
<% '……从数据库中取出符合条件的记录，并存放在rs_xzt中
<p> <% i=1 'I为题号
do while (not rs_xzt.eof) %> <p>
<%=i%>、<%=rs_xzt("timu")%> <%rb_name="rb"&i %>
</p> <p><input type="radio" value="a" name="<%=rb_name%>"><font color="#3333CC">A</font>: <%=rs_xzt("xuanxa")%>   
<input type="radio" name="<%=rb_name%>" value="b"><font color="#3333CC">B</font>: <%=rs_xzt("xuanxb")%>    <input type="radio" name="<%=rb_name%>" value="c"><font color="#3333CC">C</font>: <%=rs_xzt("xuanxc")%> 
   <input type="radio" name="<%=rb_name%>" value="d"><font color="#3333CC">D</font>:<%=rs_xzt("xuanxd")%></p>
<% i=i+1 : rs_xzt.movenext : loop
rs_xzt.close %>
（三） 答案的存放
先从试卷页面中收集选择题、填空题及问答题答案，并把它们分别保存在三个字符串中，然后利用SQL语句向数据库中存放，如果数据库已经有该考生的答案记录，则用UPDATE语句更新，否则用INSERT语句插入。程序略。
四、 结束语
综上所述，基于Web技术的网络考试系统易用、灵活，也具有良好的安全性，由于采用了大型的数据库系统，所以试题、答案也具有较好的安全性，阅卷系统采用DELPHI 实现，限于篇幅，这里没有对这部分作深入的剖析，用DELPHI实现的阅卷系统界面友好、功能完善，生成的统计图直观、正确，可以为教师的命题、教学提供有益的参考，当然，还可以在本系统的基础上进一步完善，如本方案的题目基本上是试卷库，而不是试题库，可以进一步做成试题库，在表中加两个字段，一个字段记录知识点，一个字段记录分值，在生成试卷页面时按照一定的规则、算法（知识点、分值）从表中取出相应的记录，这样考试系统就能再上一个台阶。
本文是笔者对网络考试系统研制工作的一个总结，读者朋友如对其有兴趣，笔者很愿意跟各位一起探讨，一起提高。

参考文献：
1、《IIS 4 系统管理员手册》 （美）David Iseminger 著 电子工业出版社
2、《DB2认证指南》（美）Grant Certification & Calene Janacek 著 电子工业出版社
3、《ASP开发全攻略宝典》 唐青松 编著 中国水利水电出版社
4、《Delphi 4 从入门到精通》 （美）Marco Cantu 著 电子工业出版社

英文摘要：
A networked examination system based on web technology
Abstract：This paper describes the design and implementation of a web-based examination system. It also highlights the architecture, design, some implementation details and the related tools and technology. In addition to that, this paper also gives some analysis on some programming issues.
Keywords: network 、examination、 Web、 DB2、 ASP

上一页  [1] [2]