📄 os.asp
字号:
<html>
<head>
<title>选择试卷</title>
</head>
<body background="../images/bkg35.jpg">
<h1 align=center>请选择做题形式</h1>
<div align="center">
<form action="test.asp" id="FORM1" method="post" name="FORM1">
<div align="center"><center><table border="1" width="80%" height="136">
<tr>
<th width="26%" height="16">
<P align=left><font color="#0000ff">使用说明：如果您有断线而留下的卷子，您可以“<FONT
color=darkorange>继续</FONT>”考试，如果选择“<FONT
color=orange>不继续</FONT> ”将删除上次的断线记录。</font></P></th>
</tr>
<%
papername=request("papername")
Set conn = Server.CreateObject("ADODB.Connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("../试题库.mdb")
set rs= server.createobject("adodb.recordset")
bj=0
sql="select * from 成绩登记表 where 试卷名称='"& session("user") & papername &"' and 当前状态='正在考试'"
set base2=conn.execute(sql)
if base2.eof then
bj=1
else
bj=0
end if
if bj=0 then
%>
<tr>
<td width="26%" height="20" align="middle"><A href="test.asp?papername=<%=papername%>"><%=papername%>(有断线纪录，继续)</a></td>
</tr>
<tr>
<td width="26%" height="20" align="middle"><A href="test1.asp?papername=<%=papername%>"><%=papername%>(有断线纪录，不继续)</a></td>
</tr>
<%
else
%>
<tr>
<td width="26%" height="20" align="middle"><A href="test1.asp?papername=<%=papername%>">直接进入<%=papername%></a></td>
</tr>
<%
end if
'base.movenext
'loop
%>
</table>
</center></div>
</form>
<div align="center">
<A href="../mainselect.asp" ><IMG src="../Images/back.bmp"></img></a>
</div></div>
</body>
</html>⌨️ 快捷键说明
复制代码
Ctrl + C
搜索代码
Ctrl + F
全屏模式
F11
切换主题
Ctrl + Shift + D
显示快捷键
?
增大字号
Ctrl + =
减小字号
Ctrl + -