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

📄 report.asp

📁 机械工业出版社马涛主编的《网站建设与管理》电子课件+示例源码
💻 ASP
字号:
<!--#include file="conn.asp"-->
<!--#include file="../../teacher/check.asp"-->


<% 
kaoid=request("id")
		set rs=Server.CreateObject("ADODB.Recordset")
		sqls="select  * from report where 试卷id="&kaoid &" order by 学生id desc  "
		set rs=conn.execute(sqls)%>



<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 width="500" border="1" align="center" cellpadding="5" cellspacing="0" bordercolor="#111111" style="border-collapse: collapse">

    <tr>
      <td width="200" align="center" bgcolor="#CBEFDC">学号</td>
      <td width="300" align="center" bgcolor="#CBEFDC">姓名</td>
</tr></table><%if rs.eof then %>暂时没有学生参加过考试<%else%>
  <%do while not rs.eof %>
  <%studyid=rs("学生id")%>
  <table width="500" border="1" align="center" cellpadding="5" cellspacing="0" bordercolor="#111111" style="border-collapse: collapse">
    <tr>
      <td width="200" align="center" bgcolor="#CBEFDC"><a href=../report.asp?id=<%=rs("学生id")%>><%=rs("学生id")%></td>
      <td width="300" align="center" bgcolor="#CBEFDC"><%set js=Server.CreateObject("ADODB.Recordset")
	  sqlstr="select * from student where studyid='"&studyid&"'"
	  js.open sqlstr,conn,1,1%><%=js("yourname")%><%js.close
	  set js=nothing%></td>
    </tr>
  </table> 
  <%rs.movenext
loop
rs.close
set rs=nothing%>
<%end if%>
</body>

</html>

⌨️ 快捷键说明

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