_date"
sqlstr="SELECT * FROM tbsjxx WHERE " & " lr_date LIKE"
sqlstr=sqlstr & "''" & mf & request("findfsz") & mf & "''order by ksrq DESC"
case else
sqlstr="SELECT * FROM tbsjxx order by ksrq DESC"
end select %>
下面是考试的时间自动控制程序（便于演示只设了60秒钟，实际应用应以系统调出试卷的考试时间为准！）：
<SCRIPT language=JavaScript>
<!-- Write by HEKAI for TestTimeContorl
var timerID = null;var timerRunning = false
var stardate = new Date();var startime = gettotalsecond(stardate)
var totaltime = 60; var lasttime;var facetime
function Stepclock(){
// hk made by himself
if(timerRunning)
clearTimeout(timerID)
timerRunning = false }
function startclock(){
Stepclock();showtime() }
function gettotalsecond(getdate){
var hours = getdate.getHours()
var minutes = getdate.getMinutes();var seconds = getdate.getSeconds()
var gettotalsecond = seconds + minutes * 60 + hours * 3600
return(gettotalsecond) }
function showtime(){
var now = new Date();var timeValue = gettotalsecond(now)
document.clock.face.value = timeValue - startime
facetime = document.clock.face.value;lasttime = totaltime - facetime
document.clock.sytime.value = lasttime
timerID = setTimeout("showtime()",1000)
timerRunning = true
if (lasttime == 20){
for(i=1;i<=3;i++){
alert(''考试时间只剩下最后20秒！'')}}
if (lasttime == 0){
for(i=1;i<=5;i++){
alert(''时间完毕！请迅速交卷！！'')}}
if (lasttime == -10){
for(i=1;i<=10;i++){
alert(''考试时间超过10秒，关闭此窗口！'')}}
}//-->
</SCRIPT>
八、后记
此系统从研究设计到投入实际应用历时4个月之余，通过多次细致的测试及鉴定，证明系统完全具有可行性与可扩充性，就最近传来的消息，该系统获得了湖南省科技厅的普遍好评。另外，系统还有待于进一步升级，并将实现试卷的主观题部分和多媒体试卷。因此，仍有大量的工作需要开展。若有不详或不妥之处，请您以应用程序为准以及提出良好的意见与建议。 |
