<!--#include file="../checkLogin.asp"-->
<!--#include file="../SQLconn.asp"-->
<html>
<head>
<title>级前100名</title>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">

<link rel="stylesheet" type="text/css" href="../images/<%=request.cookies("imgdir")%>/css/style.css" media="all"/>
<style type="text/css">
<!--
.STYLE2 {color: #000000}
-->
</style>
</head>


<form method="post" action="jiqianNming.asp">
<body background="images/main.JPG" text="#000000">
 <%
  strYears = TRIM( Request( "selYears" ) )
  strGrade = TRIM( Request( "selGrade" ) )
  
  strTestName = TRIM( Request( "selTestName" ) )
  strSubject = TRIM( Request( "selSubject" ) )
  %>
  

  <table width="90%" align="center" border="0" cellpadding="3"   cellspacing="0"  bordercolor="#6D8DD8">
    <TR>
      <TD width="7%" nowrap class="STYLE1"><div align="center">学期</div></TD>
      <TD width="10%" class="STYLE1"><div align="center">
        <select name="selyears" id="selyears">
          <option><%=strYears%></option>
          <% Set RSsel = Conn.Execute("select vname,shuoming from  varset where name='xueqi'")
                   While NOT RSsel.EOF %>
          <option value=<%=RSsel( "vname" )%>><%=RSsel( "vname" )%></option>
          <% RSsel.MoveNext
                  Wend
                  RSsel.Close%>
        </select>
      </div></TD>
      <TD width="6%" nowrap class="STYLE1"><div align="center">级别</div></TD>
      <TD width="8%" valign="middle" class="STYLE1"><div align="center">
        <select name="selgrade" id="selgrade">
          <option selected value=<%=strGrade%>><%=strGrade%></option>
          <% Set RSsel = Conn.Execute("select vname from  varset where name='grade'")
                   While NOT RSsel.EOF %>
          <option value=<%=RSsel( "Vname" )%>><%=RSsel( "vname" )%></option>
          <% RSsel.MoveNext
                  Wend
                  RSsel.Close%>
        </select>
      </div></TD>
      <TD width="14%" valign="middle" nowrap class="STYLE1"><div align="center">考试名称</div></TD>
      <TD width="12%" valign="middle" class="STYLE1"><div align="center">
        <select name="seltestname" id="seltestname">
          <option selected value=<%=strTestName%>><%=strTestName%></option>
          <% Set RSsel = Conn.Execute("select vname from  varset where name='testname' order by vid ")
                   While NOT RSsel.EOF %>
          <option value=<%=RSsel( "Vname" )%>><%=RSsel( "vname" )%></option>
          <% RSsel.MoveNext
                  Wend
                  RSsel.Close%>
        </select>
      </div></TD>
      <TD width="7%" valign="middle" class="STYLE1"><input name=submit1 type=submit class="topanniu" id=submit1 style="LEFT: 393px; TOP: 72px" value=查询></TD>
    </TR>
</TABLE>
  <%Set RS = Conn.Execute("select * from markzhuke  where  Years='"&stryears& "'  And grade='"&strgrade& "'  And testname='"&strTestName& "'    order by score desc")%>
 
   <table width="95%" align="center" border="1" cellpadding="3"   cellspacing="0"  bordercolor="#6D8DD8"  class="mtable">   
<tr style="background-color:#D6E4FF"  class="TableHeader">

   <td width=184 height="33" align=middle class="STYLE1"><div align="center" class="STYLE2">班别 </div></td>
    <td width=190 align=middle class="STYLE1"><div align="center" class="STYLE2">学号 </div></td>
    <td width=299 align=middle class="STYLE1"><div align="center" class="STYLE2"> 姓名 </div></td>
    <td width=268 align=middle class="STYLE1"><div align="center" class="STYLE2">主科总分</div></td>
    <td width=268 align=middle class="STYLE1"><div align="center">级排名</div></td>
</tr>　
  <% 
  i=1
  While NOT RS.EOF %>
  <tr>
   <td width=184 height="28" align=middle class="STYLE1">   <div align="center"> <%=RS( "class" )%>  </div></td>
    <td width=190 align=middle class="STYLE1">   <div align="center"><%=RS( "number" )%>  </div></td>
    <td width=299 align=middle class="STYLE1">  <div align="center"><%=RS( "uname" )%>    </div></td>
    <td width=268 align=middle class="STYLE1">   <div align="center"><%=RS( "score")%>   </div></td>
    <td width=268 align=middle class="STYLE1"><%=i%></td>
  </tr>
  <%
  i=i+1
  RS.MoveNext
  Wend
    RS.Close
  %>
</table>
</body>
</html>
