<!--#include file="../oa/SQLconn.asp"-->
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>广州市南沙区榄核中学校网</title>
<link rel="stylesheet" type="text/css" href="css/css.css" />
<style type="text/css">
<!--
body {
	background-image: url(img/index/line.png);
	background-repeat: repeat-x;
}
.STYLE3 {
	color: #FF0000;
	font-size: 15px; 
}
.STYLE4 {font-size: 14px}
.STYLE7 {
	font-size: 14px;
	font-weight: bold;
}
-->
</style></head>

<body>
<table width="1024" border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td><table width="1022" border="0" align="center" cellpadding="0" cellspacing="0">
      <tr>
        <td width="248" height="56"><img src="img/index/xiaoming.GIF" width="248" height="80" /></td>
        <td width="510"><object classid="clsid:D27CDB6E-AE6D-11cf-96B8-444553540000" codebase="http://download.macromedia.com/pub/shockwave/cabs/flash/swflash.cab#version=7,0,19,0" width="510" height="80">
          <param name="movie" value="img/index/top.swf" />
          <param name="quality" value="high" />
          <embed src="img/index/top.swf" quality="high" pluginspage="http://www.macromedia.com/go/getflashplayer" type="application/x-shockwave-flash" width="510" height="80"></embed>
        </object></td>
        <td width="266" bgcolor="#FFFFFF"><img src="img/index/bo.png" width="263" height="56" /></td>
      </tr>
    </table></td>
  </tr>
  <tr>
    <td><table width="100%" border="0" cellpadding="0" cellspacing="0"     style="border-bottom:1px solid #10A2EB; border-left:1px solid #10A2EB;border-right:1px solid #10A2EB;border-top:2px solid #10A2EB;">
      <tr>
        <td background="img/index/nemu.png"><table  height="34" border="0" cellpadding="0" cellspacing="0" background="img/index/nemu.png">
          <tr>
            <td width="110"     onmouseover="this.style.backgroundImage='url(img/index/nemuSelect.png)'" onMouseOut="this.style.backgroundImage='url(img/index/nemu.png)'"><div align="center"><a href="../Webindex.asp" target="_self" class="STYLETITLE">学校首页</a></div></td>
            <% 
			
			 vname1=request("vname1")
			 vname2=request("vname2")
			
			Set RSsel = Conn.Execute("select avg(vid) as 序号,vname1 from  varset where name='学校网站菜单设置'  group by vname1 order by 序号 ")
			While NOT RSsel.EOF %> 
			<%if vname1=RSsel( "vname1" ) then%>
 <td width="110" class="STYLETITLE"   background="img/index/nemuSelect.png"><div align="center"><div align="center"><a href="Main.asp?vname1=<%=RSsel( "vname1" )%>" target="_self"><%=RSsel( "vname1" )%></a></div></td>
           <%else%>
		   
		 
 <td width="110" class="STYLETITLE"    onmouseover="this.style.backgroundImage='url(img/index/nemuSelect.png)'" onMouseOut="this.style.backgroundImage='url(img/index/nemu.png)'"><div align="center"><div align="center"><a href="Main.asp?vname1=<%=RSsel( "vname1" )%>" target="_self"><%=RSsel( "vname1" )%></a></div></td>
 
          <%end if%>
			<% RSsel.MoveNext
			Wend
			RSsel.Close%>
          </tr>
        </table></td>
        </tr>
    </table></td>
  </tr>
  <tr>
    <td>
	<table width="1024" height="673" border="0" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
      <tr>
        <td height="8" colspan="2" bgcolor="#99CBE6">&nbsp;</td>
        </tr>
      <tr>
	    <td width="234" height="660" align="center" valign="top"  style="border-left:1px solid #BBBBBB;border-right:1px solid #BBBBBB;border-top:1px solid #BBBBBB;border-bottom:1px solid #BBBBBB;"><br>
	      <table width="234" border="0" cellpadding="0" cellspacing="0" >
	        <tr>
	          <td height="38" background="img/index/zinemu.png" style="border-bottom:1px solid #A6D0E7;" >&nbsp;</td>
              </tr>
			  
			   <% 
			
			   
			Set RSsel = Conn.Execute("select vid, vname1,vname2 from  varset where name='学校网站菜单设置' and vname1='"&vname1& "'  order by vid")
			While NOT RSsel.EOF %>
			<%if vname2=RSsel( "vname2" ) then%>
              <tr>
	          <td height="38" background="img/index/zinemuSelect.png" style="border-bottom:1px solid #A6D0E7;" >
			  <div align="center">
			  <a href="Main.asp?vname1=<%=RSsel( "vname1" )%>&vname2=<%=RSsel( "vname2" )%>" target="_self"><%=RSsel( "vname2" )%></a>
			  </div>
			  </td>
              </tr>
		<%else%>
		      <tr>
	          <td height="38" background="img/index/zinemu.png" style="border-bottom:1px solid #A6D0E7;"  onmouseover="this.style.backgroundImage='url(img/index/zinemuSelect.png)'" onMouseOut="this.style.backgroundImage='url(img/index/zinemu.png)'">
			  <div align="center">
			  <a href="Main.asp?vname1=<%=RSsel( "vname1" )%>&vname2=<%=RSsel( "vname2" )%>" target="_self"><%=RSsel( "vname2" )%></a>
			  </div>
			  </td>
              </tr>
		
		
		<%end if%>	  
			
			  
			  
			<% RSsel.MoveNext
			Wend
			RSsel.Close%>
			
			
			
			  
			  
			  <tr>
	          <td height="38" background="img/index/zinemu.png" style="border-bottom:1px solid #A6D0E7;"  onmouseover="this.style.backgroundImage='url(img/index/zinemuSelect.png)'" onMouseOut="this.style.backgroundImage='url(img/index/zinemu.png)'">&nbsp;</td>
              </tr>
			 
	         <tr>
	          <td height="38" background="img/index/zinemu.png" style="border-bottom:1px solid #A6D0E7;"  onmouseover="this.style.backgroundImage='url(img/index/zinemuSelect.png)'" onMouseOut="this.style.backgroundImage='url(img/index/zinemu.png)'">&nbsp;</td>
              </tr>
	        </table>
	      <br></td>
	    <td width="783" valign="top"><table width="98%" height="568" border="0" align="right" cellpadding="0" cellspacing="0">
          <tr>
            <td width="59%" height="568" align="center" valign="top">
			<br>
			<table width="98%" height="629" border="0" cellpadding="0" cellspacing="0" >
              <tr>
                <td height="39" background="img/index/titlenemuLan.png"  style="border-left:1px solid #A0CFE8;border-right:1px solid #A0CFE8;border-top:1px solid #A0CFE8;border-bottom:1px solid #A0CFE8;"><span class="STYLE7">&nbsp;&nbsp;<%=vname1%>
				<%if vname2<>"" then %>
				-&gt;
				<%end if %>
				<%=vname2%></span></td>
              </tr>
              <tr>
                <td height="580" valign="top">
				
				
				
				
				
				
				
				
				
				<%
   Set rs=Server.CreateObject("Adodb.Recordset")
   sql="SELECT  * from SchoolWeb  where  类别='"&vname1&"'  and 二级类别  like '%"&vname2&"%' order by id desc"
   rs.open sql,conn,1,1

   rs.pagesize=20'每页记录条数
   curpage=Request.QueryString("curpage") '将URL参数curpage传给curpage变量
   rs.absolutepage=curpage '将本页设为curpage设置的页数
   if curpage=0 then
     curpage=1
   end if 
%> 
 
                <table width="100%" border="0" align="center">
  
  <tr>
    <td>
	<table width="100%" align="center" border="0" cellpadding="0"   cellspacing="0"  bordercolor="#6D8DD8">   
     
      <%
   for i= 1 to  rs.pagesize
      if rs.eof then
         exit for
      end if
%>
     
      <tr onMouseOut="this.style.backgroundColor=''" onMouseOver="this.style.backgroundColor='#EFF8FF'">
        <td width="621" height="30" class="STYLE1 STYLE3"   style="border-bottom:1px solid #E6D9E6;"  >
		<img src="img/index/dian.jpg" width="16" height="13"><a href="../OA/SchoolWeb/AddFile/viewFile.asp?id=<%=rs("id")%>"  target="_blank" class="STYLE1">&nbsp;<%=rs("标题")%></a></td>
        <td width="209" class="STYLE1" style="border-bottom:1px solid #E6D9E6;"  >
		<div align="center"><%=formatdatetime(rs("发布日期"),2)%></div></td>
      </tr>
      <%  rs.movenext
    next%>
    </table></td>
  </tr>
  
  <tr>
    <td><div align="center" class="STYLE1">
      <br>
     
	 <%if rs.pagecount>1 then%> 
	 
      <%if curpage=1 then%>
      首页
      <%else%>
      <a href="?vname1=<%=vname1%>&vname2=<%=vname2%>&curpage=1">首页</a>
      <%end if%>
      <%if curpage=1 then%>
      上一页
      <%else%>
      <a href="?vname1=<%=vname1%>&vname2=<%=vname2%>&curpage=<%=curpage-1%>">上一页</a>
      <%end if%>
      <%if rs.pagecount<curpage+1 then%>
      下一页
      <%else%>
      <a href="?vname1=<%=vname1%>&vname2=<%=vname2%>&curpage=<%=curpage+1%>">下一页</a>
      <%end if%>
      <%if rs.pagecount<curpage+1 then%>
      尾页
      <%else%>
      <a href="?vname1=<%=vname1%>&vname2=<%=vname2%>&curpage=<%=rs.pagecount%>">尾页</a>
      <%end if%>
  (当前第<%=curpage%>页，共有<%=rs.pagecount%>页，共有：<%=rs.recordcount%>条记录)</div></td>
  
  
  <%end if%>
  
  
  </tr>
</table>
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				
				</td>
              </tr>
            </table></td>
            </tr>
          
        </table>
          <br>	      </td>
	  </tr>
    </table></td>
  </tr>
  <tr>
    <td><table width="100%" height="215" border="0" cellpadding="0" cellspacing="0" background="img/index/bottom.jpg">
      <tr>
        <td   class="STYLE1">&nbsp;</td>
        </tr>
    </table></td>
  </tr>
  <tr>
    <td><p>&nbsp;</p>
      <table width="100%" border="0" cellpadding="0" cellspacing="0"     style="border-top:2px solid #10A2EB;">
        <tr>
          <td><p>&nbsp;</p>
          <p align="center" class="STYLE4 STYLE4">版权所有：南沙区榄核中学 备案编号：粤ICP备11060503号-1</p>
          <p align="center" class="STYLE4 STYLE4">学校地址：南沙区榄核镇榄核中学 电话：84929486</p>
          <p align="center" class="STYLE4 STYLE4"><span class="STYLE4">Copyright 20012-2013 Guangzhou LanHe Middle School, All Rights Reserved 粤ICP备11060503 广州市榄核中学版权所有</span></p>
          <p>&nbsp;          </p>
          <p>&nbsp;</p></td>
        </tr>
      </table>
    <p>&nbsp;</p></td>
  </tr>
</table>
</body>
</html>