📄 testpaper.asp
字号:
<!--#include file="connect.asp"-->
<%if session("logstatus")<>1 then%>
<font size="5" ><b>你还没有登录，没有权利浏览本页，请先<a href="login.asp">登录</a>！</b></font>
<%else
'读取login.htm附带的SubjectNo、StudentID及Name参数值
StudentID=Request("StudentID")
Name=Request("Name")
Subject=Request("Subject")
%>
<%sql="Select * From "&Subject
'response.write sql
rs.open sql,conn,2,2
%>
<HTML>
<head><title>考试中...</title></head>
<body background="white" leftmargin="100">
<LINK href="style.css" rel=stylesheet>
<h3 align=center><%=Subject%>考试题目</h3><hr>
<form action="calscore.asp" method="post">
<!--下面通过三个隐含表单对象，把学号、姓名及科目名称传递给Calscore.asp-->
<input type="hidden" name=Subject value="<%=Subject%>">
<input type="hidden" name=StudentID value="<%=StudentID%>">
<input type="hidden" name=Name value="<%=Name%>">
<%
'显示题目
while not rs.eof
%>
<b><%=rs("题目序号")%>、<%=rs("题目")%>(<%=rs("本题分数")%>分)</b><br>
<%
select case rs("题目类型"):
case 1:
ProblemType="Radio"
for n=1 to 4
%>
<input type="<%=ProblemType%>" name="No<%=rs("题目序号")%>" value="<%=n%>"> <%=rs("选择项"&n)%><br>
<% next
case 2:
ProblemType="Checkbox"
for n=1 to 4
%>
<input type="<%=ProblemType%>" name="No<%=rs("题目序号")%>-<%=n%>" value="<%=n%>"> <%=rs("选择项"&n)%><br>
<%next
case 3:%><input type="text" name="<%=rs("选择项1")%>"><br>
<%
end select
rs.movenext
wend%>
<%rs.close%>
<!--单击交卷，根据form的action属性调用calscore.asp计算分数-->
<script language=javascript>
function confirm_submit(){
if (confirm("该项操作要提交你全部的答题内容，你确定要提交吗?")){
return true;
}
return false;
}
</script>
<script language="javascript">
function exit(){
if (confirm("该项操作要交白卷，你确定要提交吗?")){
return true;
}
return false;
}
</script>
<div align=right><input type=submit onClick="return confirm_submit()" value="交卷" >
</form>
<form action="save0.asp" method="post">
<input type="hidden" name="StudentID" value="<%=StudentID%>">
<input type="hidden" name="Name" value="<%=Name%>">
<input type="hidden" name="Subject" value="<%=Subject%>">
<input type="submit" onclick="return exit()" value="退出">
</form></div>
</div>
</body></html>
<%end if%>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -