<!--#include file="../checkLogin.asp"-->
<!--#include file="../SQLconn.asp"-->

<html>
<head><title></title><meta http-equiv="Content-Type" content="text/html; charset=gb2312">
 

<link rel="stylesheet" type="text/css" href="../css/style.css" />
<style type="text/css">
<!--
.STYLE3 {color: #FF0000}
-->
</style>
<body>
<%    
        Years = request.cookies("nowxueqi")
		rizhidate=Request("rizhidate")
		if  rizhidate="" then 
		    rizhidate=date()
		end if 
	    strGrade=Request("strGrade")
		fenlei=Request("fenlei")
		
		%>	  
<table width="99%" height="499" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td width="76%" height="33" >  
	<table  width="100%" height="33" border="0" cellpadding="0" cellspacing="0">
      <tr>
	  
	 
		 <% set RsName=server.createobject("adodb.recordset")
		sqlRsName="select vname from  varset where name='beikeji' order by vid"
		RsName.open sqlRsName,conn,1
		if strGrade="" then strGrade=RsName("vname") 
		 
		while not RsName.eof and not RsName.bof
		%>
		   <%    if strGrade=RsName("vname")  then   %>
		 <td width="110" class="Nemuselect"><div align="center"><a href="ClassList.asp?strGrade=<%=RsName("vname")%>&fenlei=<%=fenlei%>" target="_self"><%=RsName("vname")%><%=fenlei%></a></div></td>
		   <%    else   %>
	     <td width="110" class="NemuNot"><div align="center"><a href="ClassList.asp?strGrade=<%=RsName("vname")%>&fenlei=<%=fenlei%>" target="_self"><%=RsName("vname")%><%=fenlei%></a></div></td>
			 
		<%end if
		RsName.movenext
		wend
		RsName.close
		Set RsName = Nothing
		
		%>	    
	  	 <td class="NemuLine">&nbsp;</td> 
       
      </tr>
    </table></td>
    <td width="5%"   style="border-bottom:1px solid #6D8DD8;">&nbsp;</td>
    <td width="5%"   style="border-bottom:1px solid #6D8DD8;">&nbsp;</td>
  </tr>
  <tr>
    <td height="470" colspan="3" valign="top"   style="border-left:1px solid #6D8DD8;border-right:1px solid #6D8DD8;border-bottom:1px solid #6D8DD8;">
	<br>
		<FORM ACTION="ClassList.asp?fenlei=<%=fenlei%>&strGrade=<%=strGrade%>&rizhidate=<%=rizhidate%>" METHOD="GET" enctype="multipart/form-data" NAME="ftype">
  <%    
         
	  
	   Set MyOAASPObj = Server.CreateObject("YFSchoolOApro2.YFSchoolDll2")
       call  MyOAASPObj.BanWuRiZhi(Years,strGrade,rizhidate,fenlei)
       set MyOAASPObj=nothing
		   
	%>
	 
	  
	  
	  
	  
</FORM>




  </td>
  </tr>
</table>
</body>
</html>
