gusucode.com > ASP+ACCESS在线考试系统设计(源代码+论文) > ASP+ACCESS在线考试系统设计(源代码+论文)\郭晓璇论文第二稿\papermanage\liulan.asp

    <html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title>selectuser</title>
<meta name="GENERATOR" content="Microsoft FrontPage 4.0">
</head>

<body bgproperties="fixed" background="../images/bkg35.jpg">

<div align="center"><center>
<table border="0" width="100%" height="66">
  <tr>
    <th width="100%" height="39">
    <h1><font face="楷体_GB2312" color="#FF0000">查&nbsp;询&nbsp;所&nbsp;有&nbsp;人&nbsp;成&nbsp;绩</font></h1>    
    </th>    
  </tr>    
  <tr>    
    <th width="100%" height="19"><font face="楷体_GB2312" color="#0000FF">
    <img src="../16/images/line454.gif" width="761" height="1" alt="line454.gif (4497 bytes)"></font></th>    
  </tr>    
</table>    
</center></div>


<%@ Language=VBScript %>    
<form action="评阅试卷.asp" id="FORM1" method="post" name="FORM1">    
  <div align="center"><center><table border="1" width="475">    
    <tr>    
      <th width="10%" height="10%"><font color="#0000FF">用户名</font></th>    
      <th width="30%" height="10%"><font color="#0000FF">试&nbsp; 卷&nbsp; 名</font></th>   
      <th width="10%" height="10%"><font color="#0000FF">总 分</font></th>   
      <th width="10%" height="10%"><font color="#0000FF">成 绩</font></th>   
    </tr>  
<%   
Set conn = Server.CreateObject("ADODB.Connection")   
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq="  & Server.MapPath("../试题库.mdb")   
set rs= server.createobject("adodb.recordset")   
sql="select * from 成绩登记表"  
set  base=conn.execute(sql)  
  
  
'base.movefirst  
do while not base.eof  
zhh=base("用户名")  
papername=base("试卷名称")  
chji=base("成绩")  
danwei=base("总分")  
%>  
    <tr>  
      <td width="10%" height="10%" align="center"><%=zhh%>  
</td>   
      <td width="30%" height="10%" align="center"><%=papername%>   
</td>   
      <td width="10%" height="10%" align="center"><%=danwei%>   
</td>   
      <td width="10%" height="10%" align="center"><%=chji%>   
    </tr>   
<%   
base.movenext   
loop   
%>   
  </table>   
  </center></div>   
</form>   
   
<table border="0" width="100%">   
  <tr>   
    <td width="100%"></td>   
  </tr>   
</table>   
   
<table border="0" width="100%">   
  <tr>   
    <td width="100%"></td>   
  </tr>   
  <tr>   
    <td width="100%"></td>   
  </tr>   
</table>   
<div align="center"><center>   
   
<table border="0" width="100%">   
  <tr>   
    <th width="100%"><a href="../mainselect.asp"><img src="../Images/back.bmp" alt="b5.jpg (1795 bytes)"></a></th>   
  </tr>   
</table>   
</center></div>   
   
<p> </p>   
</body>   
</html>