<!--#include file="sub/conn.asp"-->
<!--#include file="sub/webvar.asp"--> 
<!--#include file="sub/fun.asp"--> 
<!--#include file="sub/online.asp"-->
<%online%>
<html>
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312">
<title><%=webtitle%></title>
<link href="sub/main.css" rel="stylesheet" type="text/css">
</head>
<%=webbody%>
<!--#include file="top.asp"-->
<table width="970"  border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" style="border-left:#FFD7ED 1px solid;border-right:#FFD7ED 1px solid;">

  <tr>
    <td height="20" ></td>
  </tr>

  <tr> 

    <td width="960" align="center" valign="top" bgcolor="#FFFFFF" style="padding-bottom:6px;"><font color="FF5494">
<%
	if request.cookies("mfqclove6")("username")<>"" then
	   response.write topnews2
	else
	   response.write topnews1
	end if
	%>
      </font> </td>
  </tr>
</table>

<table width="970"  border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF" style="border-left:#FFD7ED 1px solid;border-right:#FFD7ED 1px solid">
 
<tr> 

    <td valign="top" >


<table width="960" border="0" align="center" cellpadding="0" cellspacing="0" bgcolor="#FFFFFF">
  <tr valign="top"> 
    <td width="49" align="right">&nbsp;</td>
    <td width="650" align="center" ><table width="90%" height="40" border="0" align="center" cellpadding="0" cellspacing="1" bgcolor="#FFFFFF" style="border:#CEF2FD 1px dotted;">
        <tr> 
          <td align="center" bgcolor="#D2F5FF" style="padding-top:5px;font-size:10.3pt;"><font color="#999999">『</font> 
            <b><font color="#FF6600">动态·公告</font></b><font color="#999999"> 』</font></td>
        </tr>
      </table>
      <%
set rs=Server.CreateObject("ADODB.recordset")
rs.open "select id,title,addtime,click from love_news where Kind=1 order by id desc",conn,1,1
IF  (rs.State =adStateClosed)  or (rs.BOF=true and rs.EOF =true)  or  rs.RecordCount=0 THEN       
   RESPONSE.Write"<BR><BR>　　　暂时还没有信息...　　<br>"       
ELSE
 dim page,ipage
  rs.pagesize=15
  page=request("Page")
  pages(page)
  page=clng(Page)
  if page > rs.pagecount then response.redirect "login.asp"
  if page=empty then page=1
  rs.absolutepage=page
%>
      <table width="90%" height="30" border="0" cellPadding="1" cellSpacing="0">
        <%for ipage=1 to rs.pagesize%>
        <tr <%if ipage mod 2 =0 then response.write "bgcolor=E9FAFF" end if%>> 
          <td width="56%" height="40"  style="border-bottom:#cccccc 1px dotted;">　<img src=images/05_8.gif hspace="5" align="absmiddle"> 
            <a href=News_show.asp?id=<%=rs("id")%> target="_blank" ><font color="#666666"><%=ChkBadWords(rs("title"))%></font></a> 
            <font color="#999999">&nbsp; </font></td>
          <td width="24%"  style="border-bottom:#cccccc 1px dotted;"> <font color="#666666">发布于</font><font color="999999">[<%=FormatDT(rs("addtime"),5)%>]</font> 
          </td>
          <td width="20%"  style="border-bottom:#cccccc 1px dotted;"><font color="#666666">阅读</font> 
            <font color="#FF0000"><%=rs("click")%></font><font color="#666666"> 
            次</font></td>
        </tr>
        <%Rs.movenext                                                    
If rs.eof Then exit For                                                    
Next%>
      </table>
      <table width="75" height="24" border="0" cellpadding="0" cellspacing="0">
        <tr> 
          <td></td>
        </tr>
      </table>
      <table width="560" border="0" align="center" cellpadding="0" cellspacing="0" >
        <tr> 
          <td width="167" align="right" valign="bottom" style="padding-bottom:7px;">&nbsp;</td>
          <td width="79" align="center" valign="bottom" style="padding-bottom:7px;">&nbsp;</td>
          <td width="324" align="center" style="color:#A5537B;"> 
            <%if page<>1 then%>
            <a href=<%=Request.ServerVariables("SCRIPT_NAME")%>?Page=1><img src="images/index.gif" alt="首页" width="72" height="17" hspace="3" border="0"></a><a href=<%=Request.ServerVariables("SCRIPT_NAME")%>?Page=<%=(page-1)%>><img src="images/pre01.gif" alt="上一页" width="72" height="17" hspace="3" border="0"></a> 
            <%else%>
            <img src="images/index.gif" alt="首页" width="72" height="17" hspace="3" border="0"><img src="images/pre01.gif" alt="上一页" width="72" height="17" hspace="3" border="0">
            <%end if%>
            <% if page<>rs.pagecount then%>
            <a href=<%=Request.ServerVariables("SCRIPT_NAME")%>?Page=<%=(page+1)%>><img src="images/next01.gif" alt="下一页" width="72" height="17" hspace="3" border="0"></a><a href=<%=Request.ServerVariables("SCRIPT_NAME")%>?Page=<%=rs.pagecount%>><img src="images/end.gif" alt="尾页" width="72" height="17" hspace="3" border="0"></a> 
            <%else%>
            <img src="images/next01.gif" alt="下一页" width="72" height="17" hspace="3" border="0"><img src="images/end.gif" alt="尾页" width="72" height="17" hspace="3" border="0">
            <%end if%>
            <script language=javascript>
function mychange(v){
if (v==""){}
else{
window.open (v,target="_self")
}
}
</script> </td>
        </tr>
      </table>
<table width="97%" height="30" border="0" cellpadding="0" cellspacing="0">
        <tr> 
          <td width="66%" align="right">&nbsp;</td>
          <td align="right" valign="bottom"><a href=javascript:window.opener=null;window.close();><font color="#666666"><img src="images/zeai/close.gif" alt="关闭窗口" width="22" height="16" border="0" align="absmiddle"></font></a></td>
          <td width="5%" valign="bottom"><a href="#top"><img src="images/06/bl_top.gif" alt="返回页面顶部" width="22" height="16" border="0"></a></td>
        </tr>
      </table>
<%
End If
rs.close
set rs=nothing%>
    </td>
<td width="230" align="center" valign="top" ><!--#include file="youlan.asp"--></td>
  </tr>
</table>
</td>
</tr>
</table>
<!--#include file="bottom.asp"-->
</body>
</html>
<%Closeconn%>
