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

📄 list_cj.asp

📁 一套考试系统,通过局域网可以发布题目,组织考试
💻 ASP
字号:
<!--#include file="open.asp" -->
<!--#include file="inc/md5.inc" --><!DOCTYPE HTML PUBLIC "-//W3C//DTD HTML 4.01 Transitional//EN">
<html>
<head><!--#include file="inc/css.css" -->
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>显示成绩</title>
</head>

<body topmargin="1">
<!--#include file="inc/top.asp" -->
<!--#include file="inc/menu.asp" -->
<%if session("zzteacher")=false then
    te_user_login=trim(request.form("te_user_login"))
	te_pass_login=trim(request.form("te_pass_login"))
	if te_user_login<>"" and te_pass_login<>"" then
	    te_pass_login=ucase(md5(te_pass_login))
		str="select * from user_te where teacher_user='"&te_user_login&"' and teacher_pass='"&te_pass_login&"'"
		set rs=conn.execute(str)
		if not rs.eof then
		    session("zzteacher")=true
			if rs("teacher_class")="超级管理员" then
			   session("adminadmin")=true
			end if
		end if
	end if
end if%>

<table width="770" border="1" align="center" cellpadding="0" cellspacing="0" bordercolor="ff99cc" bgcolor="edebeb">
  <tr>
    <td width="200" valign="top"><table width="163" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr> 
          <td class="unnamed6"> </td>
        </tr>
        <tr> 
          <td background="images/nxmt_lj_46.gif" class="unnamed10"> </td>
        </tr>
        <tr> 
          <td background="images/nxmt_lj_44.gif">
<div align="center" class="unnamed14">用户登录</div></td>
        </tr>
        <tr> 
          <td background="images/nxmt_lj_44.gif" class="unnamed12"> 
            <%if session("zzteacher")=flase then%> 
            <form action="test_pigai.asp" method="post" name="form1" class="unnamed12">
              <div align="center">用户名: 
                <input name="te_user_login" type="text" id="te_user_login" size="12" maxlength="15">
                <br>
                <br>
                密 码: 
                <input name="te_pass_login" type="password" id="te_pass_login" size="12" maxlength="15">
                <br>
                <br>
                <input type="submit" name="Submit" value=" 登 录 ">
              </div>
            </form>
            <div align="center"> 
              <% else
       response.write "<br><center>已登录  <a href=quit.asp>退出</a>"
     end if
%>
            </div></td>
        </tr>
        <tr> 
          <td background="images/nxmt_lj_45.gif" class="unnamed10"> </td>
        </tr>
      </table>
      <table width="163" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td>&nbsp;</td>
        </tr>
        <tr>
          <td><div align="center"><INPUT class=unnamed5 onclick=javascript:history.go(-1) type=button value= 返 回 ></div></td>
        </tr>
      </table>
      <table width="163" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td class="unnamed6">&nbsp;</td>
        </tr>
        <tr> 
          <td class="unnamed6"> </td>
        </tr>
      </table>
      <table width="163" border="0" align="center" cellpadding="0" cellspacing="0">
        <tr>
          <td><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=6,0,29,0" width="163" height="172">
              <param name="movie" value="images/colok.swf">
              <param name="quality" value="high">
              <embed src="images/colok.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="163" height="172"></embed></object></td>
        </tr>
      </table>
      <br>
    </td>
    <td width="570" valign="top"><div align="center"> <font color="#0000FF"><strong><span class="unnamed14"> 
        <%table_name=request.querystring("table_name")
if table_name<>"" then
   str="select * from test_gl where 数据表名='"&table_name&"'"
   set rs=conn.execute(str)
   response.write rs("考试名称")%>
        </span></strong></font> <span class="unnamed12"> 
        <% response.write "<br><br><class=unnamed14>班级:"&rs("考试班级")&" 考试日期:"&rs("考试日期")&"<br>开始时间:"&rs("开考时间")&" 结束时间:"&rs("结束时间")&" 试题数:"&rs("试题数量")&"个"
   str="select * from "&table_name&""
   set rs=conn.execute(str)
%>
        </span> 
        <table width="500" border="1" cellpadding="0" cellspacing="0" class="unnamed12">
          <tr bgcolor="#CCCCCC"> 
            <td height="20">
<div align="center">学籍卡号</div></td>
            <td height="20">
<div align="center">姓 名</div></td>
            <td height="20">
<div align="center">答对数</div></td>
            <td height="20">
<div align="center">答错数</div></td>
            <td height="20">
<div align="center">总得分</div></td>
          </tr>
<%do while not rs.eof%>
          <tr> 
            <td height="20">
<div align="center"><%=rs("xj_id")%></div></td>
            <td height="20">
<div align="center"><%=rs("name")%></div></td>
            <td height="20">
<div align="center"><%=rs("答对数")%></div></td>
            <td height="20">
<div align="center"><%=rs("答错数")%></div></td>
            <td height="20">
<div align="center"><%if rs("总得分")<60 then response.write "<font color=#FF0000>"&rs("总得分")else response.write rs("总得分")%></font></div></td>
          </tr>
<%rs.movenext
  loop%>
        </table>
        <%end if%>
	</div></td>
  </tr>
</table>

<!--#include file="inc/bottom.asp" -->
<%conn.close%>
</body>
</html>

⌨️ 快捷键说明

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