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

📄 student.asp

📁 党的知识考试
💻 ASP
字号:
🔍 
<!--#include file ="conn.asp"-->
<!--#include file="check.asp"-->

<%sql="select student.* from student where student.id="&request("id") 
set rs=conn.execute(sql)
set rs1=conn.execute("select * from report  order by id desc")
set rs2=conn.execute("select * from report where 学生id="&request("id"))
if not rs2.eof then
sql3="select count(学生id) as ci, max(分数) as hf ,max(补考成绩) as hbf,min(分数) as lf,min(补考成绩) as lbf from report where 学生id="&request("id")&" group by 学生id"
'response.write sql3
'response.end

set rs3=conn.execute(sql3)
ci=rs3("ci")
if rs3("hf")>rs3("hbf") then
hf=rs3("hf")
else 
hf=rs3("hbf")
end if 

if rs3("lf")>rs3("lbf") then
lf=rs3("lf")
else 
lf=rs3("lbf")
end if 
sql4="select count (*) as bjg from report  where 学生id="&request("id")&" and 分数<60 or 补考成绩<60 group by 学生id"
'response.write sql4
'response.end 
set rs4=conn.execute(sql4) 
bjg=rs4("bjg")
else
ci=0
hf=0
lf=0
bjg=0
end if 
%>
<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
<meta name="ProgId" content="FrontPage.Editor.Document">
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>学生党校网上测试系统</title>
<link rel="stylesheet" type="text/css" href="../css.css">
</head>

<body topmargin="0" leftmargin="0">
<p>
<p align="center"><font class=test1>成绩统计管理</font></p>
<div align="center">
  <center>
  <table border="1" cellpadding="5" cellspacing="0" style="border-collapse: collapse" bordercolor="#111111" width="400">
    <tr>
      <td align="center" colspan="3"><font color=red><%=rs("姓名")%></font>各期考试统计<p>学生基本资料==&gt; 性别：<%=rs("性别")%> 班号：<%=rs("班号")%> 
      学号：<%=rs("学号")%></p>
      <p>（参加过<font color=red> <%=ci%> </font>期考试，最高 <font color=red> <%=hf%> </font> 分，最低 <font color=red> <%=lf%> </font> 分， <font color=red> <%=bjg%> </font> 次不及格）</td>
    </tr>
    <tr>
      <td align="center" bgcolor="#CBEFDC">期数</td>
      <td align="center" bgcolor="#CBEFDC">分数</td>
      <td align="center" bgcolor="#CBEFDC">补考成绩</td>
    </tr>
      <%while not rs1.eof 
      sqls="select * from report where 学生id="&request("id")&" and id="&rs1("id")

      set rss=conn.execute(sqls)
      if rss.eof then
      fen="未参加"
      bfen="未参加"
      else
      'response.write "select  * from test where id="&rss("试id")
      'response.end
      set rsss=conn.execute("select  * from test where id="&rss("试卷id"))
            zf=rsss("判断题数")*rsss("判断题每题分数")+rsss("选择题数")*rsss("选择题每题分数")+rsss("填空题数")*rsss("填空题每题分数")

      if rss("分数")>=cint(zf*6/10) then
      fen="<font color=#008000>"&rss("分数")&"分</font>"
      else
      fen="<font color=red>"&rss("分数")&"分</font>"
      end if 
      
      if rss("是否补考")=True then
      IF rss("补考成绩")=0 then
      bfen="无"
      else
      if rss("补考成绩")>=cint(zf*6/10) then
      bfen="<font color=#008000>"&rss("补考成绩")&"分</font>"
      else
      bfen="<font color=red>"&rss("补考成绩")&"分</font>"
      end if 
      end if 
      else
      bfen="未参加"
      end if 
      end if 
      %>
    <tr>
  
      <td align="center"><a href="test.asp">第 <%=rs1("id")%> 期</a></td>
      <td align="center"> <%=fen%></td>
      <td align="center">
         <%=bfen%></td>
    </tr>
    <%rs1.movenext
    wend%>
    <tr>
      <td colspan="3" align="center">
      <form name=form3 action="student_admin.asp">
      查找其它考生&nbsp; 请输入考生姓名<input type="text" name="keyword" size="20"  class="line">&nbsp; <input type="submit" value="查找" name="B1"></form></td>
    </tr>
    </table>
  </center>
</div>

</body>

</html>

⌨️ 快捷键说明

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