<%@ Language=VBScript%>
<!--#include file="conn.asp"-->
<!--#include file="ConnUser.asp"-->
<!--#include file="config.asp"-->
<!--#include file="char.inc"-->

<html>
<head>
<meta http-equiv="Content-Language" content="zh-cn">
<meta http-equiv="Content-Type" content="text/html; chars8et=gb2312">
<LINK href=news.css rel=stylesheet>
<title>单位部门稿件排行__<%=jjgn%></title>
</head>
<body topmargin="0">
<!--#include file="top2.asp"-->
<!--整体表格开始--><!--整体表格结束--><table width="1002" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" style=" border-bottom: 1px solid #cccccc ">
  <tr>
    
    <td width="1002" valign="top">
	<!--内部表格开始-->
	
	<table width="1002" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
        <tr> 
          <td height="3" bgcolor="#FFFFFF"><img src="IMAGES/kb.gif" width="9" height="3"></td>
        </tr>
        <tr> 
          <td height="25" background="IMAGES/menu-guestbook.gif">&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;&nbsp;<font class=m_tittle>&nbsp;</font>栏目导航&nbsp;&nbsp;<b>当前位置：<a class="daohang" href="./" >网站首页</a>&gt;&gt;单位部门稿件排行</b></td>
        </tr>
        <tr> 
          <td height="25" ><div align="center"> 
              <a class=daohang href="./" > 
              <script language=javascript src=./zongg/ad.asp?i=13></script> 
              </a> </div></td>
        </tr>
        <tr> 
          <td height="25" background="IMAGES/menu-guestbook.gif">　</td>
        </tr>
        <tr> 
          <td height="25" background="IMAGES/menu-guest-l.gif">
		  <div align="center">


	<table width="1002" border="1" cellpadding="3" cellspacing="0" style="border-collapse: collapse" bordercolor="#C0C0C0" width="100%" id="AutoNumber1">

		<%set rs8=server.CreateObject("ADODB.RecordSet")
		sql8="select * from "& db_Dep_Table &" where depnumber>=0 order by depnumber desc"
		rs8.open sql8,Conn,1,1
		if not rs8.EOF then
		
		%>

		<tr align="center" class="TDtop1"> 
			<td width="50" height="25" >排名</td>
			<td width="300" >单位名称</td>
			<td width="200" >所属部门</td>
			<td width="200" >累计投稿</td>
		</tr>
		<% 
		i=1
		while not rs8.EOF 
		%>
		<tr> 
			<td width="50" align="center" bgcolor="#FFFFFF"><%=i%></td>
			<td width="300" align="center" bgcolor="#FFFFFF"><%=rs8("depnameRed")%></td>
			<td width="200" height="25" align="center" bgcolor="#FFFFFF"><%=rs8("deptype")%></td>
			<td width="200" bgcolor="#FFFFFF" align="center"><%=rs8("depnumber")%></td>
		</tr>

		<%rs8.MoveNext
		i=i+1
		wend
		end if
		rs8.close
		set rs8=nothing
		%>

</table>
	
	<!--内部表格结束-->
	</td>
    
  </tr>
</table>

		  
</div>
</tr>
</table>
<table width="1002"  border="0" align="center" cellpadding="0" cellspacing="0">
  <tr>
    <td height="78" background="IMAGES/pjbottom.jpg"><table width="100%"  border="0" cellspacing="0" cellpadding="0">
      <tr>
        <td><!--#include file=Bottom.asp --></td>
      </tr>
      <tr>
        <td>&nbsp;</td>
      </tr>
    </table></td>
  </tr>
</table>

</body>
</html>
