我想实现“超过规定的时间，自动终止考试，调出错误提示窗口”这样的目的，我应该在下面的程序中加入什么语句？
<script language="vbscript">
Flag=0
<%
TimeGet=Session("tryTime")
response.Write("TimeGetF="&TimeGet)
%>
TimeNum=TimeGetF*60
Sub ChangeTime()
TimeNum=TimeNum-1
TimeNumF=TimeNum\60
TimeNumM=TimeNum mod 60
if TimeNumF<10 and TimeNumM=10 and Flag<2 then
MsgBox("只剩下"&TimeNumF&"分！请抓紧时间！")
Flag=Flag+1
elseif TimeNumF<5 and TimeNumM=10 and Flag<5 then
MsgBox("只剩下"&TimeNumF&"分！请提交试卷！")
Flag=Flag+1
end if
window.status="你的时间还剩"&TimeNumF&"分"&TimeNumM&"秒"
settimeout "ChangeTime",1000
end sub
</script>

if TimeNumF<=0 and TimeNumM=10 and Flag<5 then
MsgBox("考试结束，自动终止!")
'TODO:此处为终止代码
end if

我想出现提示对话框以后，直接调用一个提交错误提示窗口，我应该怎么写？

考试时间到时不是让强制交卷吗？

是强制交卷，但是用上面的语句只是弹出一个对话框，但是我考试界面没有关闭啊！！

弹出后再用window.location.href="wan.htm"跳到结束页面就行了

或者用window.close() 但是这页不是弹出页就不会自动关闭 回提示是否关闭