adminpapersearch.asp
来自「网络考试系统最终备份」· ASP 代码 · 共 253 行
ASP
253 行
<!--#include file="conn.inc"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<link rel="stylesheet" type="text/css" href="css.css">
<title>试卷查询</title>
<script language="javascript">
function selectpaper1(myform)
{ myform.action="adminpapersearch.asp";
myform.submit();
}
function shenhe(paperid)
{ page="shenheyijian.asp?TempPaperid="+paperid
window.open (page,'查看试卷审核意见','width=400,height=550')
}
</script>
</head>
<body>
<table width="100%" height="25" border="0">
<tr>
<td>当前位置：<a href="news.asp">系统管理</a> > 试卷查询</td>
</tr>
</table>
<form action="news.asp" method="post" name="form1">
<p><img src="images/tishi.gif" width="148" height="30">
<table>
<td width="950" bgcolor="#FFFFFF">
<span class="style6">请选择您要查询的试卷类型:</span> <select name="selectpaper" size="1" id="selectpaper" onChange="selectpaper1(this.form)">
<option value="0" selected>选择试卷类型</option>
<option value="1">已经通过审核的试卷</option>
<option value="2">审核未通过的试卷</option>
<option value="3">还未审核的试卷</option>
</select>
</td>
</table>
</p>
<p>
<%
v_UserID=request.Cookies("userid")
sql1="select * from waitforpass where havepass=1 and objname='考试计划' and objid in (select PaperID from paper_info where Set_User_ID="&v_UserID&")"
set rs1=server.createobject("adodb.recordset")
rs1.open sql1,conn,3,2
sql2="select * from waitforpass where havepass=6 and objname='考试计划' and objid in (select PaperID from paper_info where Set_User_ID="&v_UserID&")"
set rs2=server.createobject("adodb.recordset")
rs2.open sql2,conn,3,2
sql3="select * from waitforpass where havepass=0 and objname='考试计划' and objid in (select PaperID from paper_info where Set_User_ID="&v_UserID&")"
set rs3=server.createobject("adodb.recordset")
rs3.open sql3,conn,3,2
papertype=request("selectpaper")
%>
<span class="style1">您好！您以往定制的试卷如下：</span>
</p>
<%if papertype=1 or papertype=0 then%>
<table width="96%" border="1" cellpadding="0" cellspacing="1" bordercolor="#C0C0C0">
<tr bgcolor="#E1E1E1">
<td colspan="7"><div align="center" class="style3">已经通过审核的试卷</div></td>
</tr>
<tr bgcolor="#E1E1E1">
<td width="42"><div align="center" class="style3">序号</div></td>
<td width="81"><div align="center" class="style3">试卷号</div></td>
<td width="188"><div align="center" class="style3">试卷名</div></td>
<td width="109"><div align="center" class="style3">审核人</div></td>
<td width="191"><div align="center" class="style3">审核时间</div></td>
<td width="161"><div align="center" class="style3">审核意见</div></td>
<td width="130"><div align="center"><span class="style3">操作</span></div></td>
</tr>
<%
i=1
if not rs1.eof then
%>
<%
while not rs1.eof
%>
<%
v_userid=rs1("passuserid")
sql4="select * from user_info where UserID="&v_userid&""
set rs4=server.createobject("adodb.recordset")
rs4.open sql4,conn,3,2
v_paperid=rs1("objid")
sql5="select * from paper_info where PaperID="&v_paperid&""
set rs5=server.createobject("adodb.recordset")
rs5.open sql5,conn,3,2
%>
<tr>
<td width="42" bgcolor="#E1E1E1"><div align="center"><%=i%></div></td>
<td width="81"><div align="center"><%=rs1("objid")%> </div></td>
<td width="188"><div align="center"><%=rs5("PaperName")%> </div></td>
<td width="109"><div align="center"><%=rs4("UserRName")%> </div></td>
<td width="191"><div align="center"><%=rs1("passtime")%> </div></td>
<td width="161"><div align="center"><a href="javascript:shenhe(<%=v_paperid%>)">查看审核意见</a> </div></td>
<td width="130"><div align="center"><a href="adminpaperview2.asp?TempPaperid=<%=v_paperid%>&id=1">查看</a></div></td>
</tr>
<%
i=i+1
rs1.movenext
wend
rs4.close
rs5.close
%>
<%
end if
rs1.close
%>
</table>
<br>
<br>
<%elseif papertype=2 then%>
<table width="96%" border="1" cellpadding="0" cellspacing="1" bordercolor="#C0C0C0">
<tr bgcolor="#E1E1E1">
<td colspan="7"><div align="center" class="style3">审核未通过的试卷</div></td>
</tr>
<tr bgcolor="#E1E1E1">
<td width="42"><div align="center" class="style4"><strong>序号</strong></div></td>
<td width="81"><div align="center" class="style3">试卷号</div></td>
<td width="188" bgcolor="#E1E1E1"><div align="center" class="style3">试卷名</div></td>
<td width="109"><div align="center" class="style3">审核人</div></td>
<td width="191"><div align="center" class="style3">审核时间</div></td>
<td width="161"><div align="center" class="style3">审核意见</div></td>
<td width="130"><div align="center"><span class="style3">操作</span></div></td>
</tr>
<%
j=1
if not rs2.eof then
%>
<%
while not rs2.eof
%>
<%
v_userid=rs2("passuserid")
sql4="select * from user_info where UserID="&v_userid&""
set rs4=server.createobject("adodb.recordset")
rs4.open sql4,conn,3,2
v_paperid=rs2("objid")
sql5="select * from paper_info where PaperID="&v_paperid&""
set rs5=server.createobject("adodb.recordset")
rs5.open sql5,conn,3,2
%>
<tr>
<td width="42" bgcolor="#E1E1E1"><div align="center"><%=j%></div></td>
<td width="81"><div align="center"><%=rs2("objid")%> </div></td>
<td width="188"><div align="center"><%=rs5("PaperName")%> </div></td>
<td width="109"><div align="center"><%=rs4("UserRName")%> </div></td>
<td width="191"><div align="center"><%=rs2("passtime")%> </div></td>
<td width="161"><div align="center"><a href="javascript:shenhe(<%=v_paperid%>)">查看审核意见</a> </div></td>
<td width="130"><div align="center"><a href="adminpaperview2.asp?TempPaperid=<%=v_paperid%>&id=1">查看</a></div></td>
</tr>
<%
j=j+1
rs2.movenext
wend
rs4.close
rs5.close
%>
<%
end if
rs2.close
%>
</table>
<br>
<br>
<%elseif papertype=3 then%>
<table width="96%" border="1" cellpadding="0" cellspacing="1" bordercolor="#C0C0C0">
<tr bgcolor="#E1E1E1">
<td colspan="5"><div align="center" class="style3">还未审核的试卷</div></td>
</tr>
<tr>
<td width="49" bgcolor="#E1E1E1"><div align="center" class="style4"><strong>序号</strong></div></td>
<td width="98" bgcolor="#E1E1E1"><div align="center" class="style3">试卷号</div></td>
<td width="230" bgcolor="#E1E1E1"><div align="center" class="style3">试卷名</div></td>
<td width="536" colspan="2" bgcolor="#E1E1E1"><div align="center" class="style3">操作</div></td>
</tr>
<%
k=1
if not rs3.eof then
%>
<%
while not rs3.eof
%>
<%
v_paperid=rs3("objid")
sql5="select * from paper_info where PaperID="&v_paperid&""
set rs5=server.createobject("adodb.recordset")
rs5.open sql5,conn,3,2
%>
<tr>
<td width="49" bgcolor="#E1E1E1"><div align="center"><%=k%></div></td>
<td width="98"><div align="center"><%=rs3("objid")%> </div></td>
<td width="230"><div align="center"><%=rs5("PaperName")%> </div></td>
<td width="267"><div align="center"><a href="adminpaperview.asp?TempPaperid=<%=v_paperid%>&id=1">修改</a></div></td>
<td width="268"><div align="center"><a href="adminpaperdel.asp?TempPaperid=<%=v_paperid%>">删除</a></div></td>
</tr>
<%
k=k+1
rs3.movenext
wend
rs5.close
%>
<%
end if
rs3.close
%>
</table>
<%end if%>
<table width="724" border="0">
<tr>
<td width="718"><div align="center">
<input type="submit" name="Submit" value="返回">
</div></td>
</tr>
</table>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?