adminpaperanalysis.asp
来自「网络考试系统最终备份」· ASP 代码 · 共 137 行
ASP
137 行
<!--#include file="conn.inc"-->
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 5.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<script language="javascript">
function submit1(myform)
{
myform.action="selectTestUser.asp";
myform.submit();
}
function submit2(myform)
{
myform.action="enterScore.asp";
myform.submit();
}
function submit3(myform)
{
myform.action="searchscore.asp";
myform.submit();
}
function submit4(myform)
{
myform.action="selectTestUser.asp";
myform.submit();
}
function submit5(myform)
{
myform.action="selectTestUser.asp";
myform.submit();
}
</script>
<title>网上考试系统 | 系统管理 | 试卷分析</title>
<%
testid = request.QueryString("id")
testid = trim(testid)
subsql = "select * from paper_info where PaperID ="&testid&""
set srs = server.CreateObject("adodb.recordset")
srs.open subsql,conn,3,2
sid = srs("Sub_ID")
test_name = srs("PaperName")
typeid = srs("Paper_Type")
srs.close
set srs = nothing
tsql = "select * from paper_type where PaperType ="&typeid
set trs = server.CreateObject("adodb.recordset")
trs.open tsql,conn,3,2
ptype = trs("PaperTypeName")
trs.close
set trs = nothing
subsql = "select * from subject_info where SubID ="&sid&""
set srs = server.CreateObject("adodb.recordset")
srs.open subsql,conn,3,2
subjectview = srs("SubName")
srs.close
set srs = nothing
%>
<link rel="stylesheet" type="text/css" href="css.css">
</head>
<body <table border="0" cellpadding="2" cellspacing="0" style="border-collapse: collapse" id="AutoNumber2" width="100%">
<tr>
<td width="100%" bgcolor="#FFFFFF">
<p>当前位置:系统管理 > 评卷管理> 试卷分析</td>
</tr>
</table>
</p>
<form name="form1" method="post" action="" onSubmit="return submit();">
<input type="hidden" name="sub_id" value=<%=sid%>>
<table border="1" cellpadding="2" cellspacing="1" style="border-collapse: collapse" bordercolor="#C0C0C0" width="100%" id="AutoNumber3">
<tr>
<td width="80" align="center" bgcolor="#E1E1E1">当前科目</td>
<td>
<input type="text" name="subjectview" size="30" value="<%=subjectview%>" readonly class="inputnormal"> </td>
</tr>
<tr>
<td height="30" align="center" bgcolor="#E1E1E1">试卷类型</td>
<td><input type="text" name="subjectview2" size="30" value="<%=ptype%>" readonly class="inputnormal"></td>
</tr>
<tr>
<td align="center" bgcolor="#E1E1E1">试卷编号</td>
<td><input type="text" name="v_test_id" size="30" value="<%=testid%>" readonly class="inputnormal"></td>
</tr>
<tr>
<td align="center" bgcolor="#E1E1E1">试卷名称</td>
<td><input name="question" type="text" class="inputnormal" value="<%=test_name%> " size="60" readonly="readonly"> </td>
</tr>
<tr>
<td align="center" bgcolor="#E1E1E1"> </td>
<td><input type="submit" value="查看考试人员" name="selectUser" onClick="submit1(this.form)" class="s02">
<input type="submit" value="平时成绩录入/修改" name="enterScore" onClick="submit2(this.form)" class="s02">
<input type="submit" value="试卷错题统计" name="staterrorPaper" onClick="submit4(this.form)" class="s02">
<input type="submit" value="试卷分析" name="paperanalysis" onClick="submit5(this.form)" class="s02"></td>
</tr>
<tr>
<td align="center" height="20" colspan="2"> </td>
</tr>
</table>
</form>
</body>
</html>
⌨️ 快捷键说明
复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?