⭐ 欢迎来到虫虫下载站! | 📦 资源下载 📁 资源专辑 ℹ️ 关于我们
⭐ 虫虫下载站

📄 displayscore.asp

📁 一套在线考试系统
💻 ASP
字号:
<!--#include file="conn.asp"-->
<%
Dim i,setno,factno,no,max,maxusername,min,minusername,avg,rs1,sql1
%> <html>

<head>
<meta http-equiv="Content-Language" content="zh-cn">
<title>在线考试系统</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<meta content="Microsoft FrontPage 5.0" name="GENERATOR">
<meta name="ProgId" content="FrontPage.Editor.Document">
<link rel="stylesheet" type="text/css" href="../DEFAULT.CSS">
<script language="javascript">
function userinfo(userid)
{ 
  page="userinfo.asp?userid="+userid
  window.open (page,'查看用户信息','width=260,height=300')
}
function examinfo(examid)
{ 
  page="examinfo.asp?examid="+examid
  window.open (page,'查看考试信息','width=280,height=360')
}
</script><script language="JavaScript1.2" src="../js/lock.js"></script>
</head>

<body>

<%
sql="select * from exam_score where examid='"&trim(request("examid"))&"'"
rs.open sql,conn,3,2
if rs.eof then
%>
<table border="1" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" class="border">
  <tr>
    <td width="100%">
    <p align="center">没有人员参加考试</td>
  </tr>
</table>
<%
else
sql="select * from exam_score where examid='"& request("examid")&"' order by score desc"
set rs=server.createobject("adodb.recordset")
rs.open sql,conn,3,2
%>
<table border="0" cellpadding="0" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="100%" id="AutoNumber3" height="30">
  <tr>
    <td width="100%">
    <p align="right"><img border="0" src="../images/PRINTER.GIF"></td>
  </tr>
</table>
<table border="1" cellspacing="0" style="border-collapse: collapse" bordercolor="#007CD0" width="100%" id="AutoNumber1" cellpadding="0" bgcolor="#F1F1F1">
  <tr>
    <td colspan="9" class="border_blue">
    <p align="center"><%=rs("subject")%>考试成绩一览表</td>
  </tr>
  <tr id="ignore" class="noborder">
    <td height="20" class="border" align="center" width="20"> </td>
    <td height="20" class="border" align="center">证件号码</td>
    <td class="border" align="center">姓名</td>
    <td class="border" align="center">部门</td>
    <td class="border" align="center">单位</td>
    <td class="border" align="center">职务</td>
    <td class="border" align="center">级别</td>
    <td class="border" align="center">岗位</td>
    <td class="border" align="center">成绩</td>
  </tr>
  <%
i=1
do while not rs.eof
sql1="select * from cadre_info where userid="&rs("userid")
set rs1=server.createobject("adodb.recordset")
rs1.open sql1,conn,3,2

%>
  <tr>
    <td height="20" align="center" width="20">
    <p align="center"><%=i%></td>
    <td height="20" align="center"><%=rs("userid")%></td>
    <td align="center"><%=rs1("username")%> </td>
    <td align="center"><%=rs1("department")%> </td>
    <td align="center"><%=rs1("office")%> </td>
    <td align="center"><%=rs1("duties")%> </td>
    <td align="center"><%=rs1("rank")%> </td>
    <td align="center"><%=rs1("post")%> </td>
    <td align="center"><%=rs("score")%> </td>
  </tr>
  <%
i=i+1
rs.movenext
loop
end if
%>
</table>

</body>

</html>

⌨️ 快捷键说明

复制代码 Ctrl + C
搜索代码 Ctrl + F
全屏模式 F11
切换主题 Ctrl + Shift + D
显示快捷键 ?
增大字号 Ctrl + =
减小字号 Ctrl + -