<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="Xyconn.asp"-->
<!--#include file="Inc/xycms.asp" -->
<!--#include file="Inc/config.asp" -->
<!--#include file="page.asp" -->

<%
id=request.QueryString("id")
set rs=server.createobject("adodb.recordset") 
if id="" then
exec="select * from news order by id desc"
else
exec="select * from news where ssfl="&id&" order by id desc"
end if
rs.open exec,conn,1,1
%>
<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN" "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="X-UA-Compatible" content="IE=7" />
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<link href="style/index.css" type="text/css" rel="stylesheet" />
<script type="text/javascript" src="js/jquery.min.js"></script>
<script type="text/javascript" src="js/public.js"></script>
<title>新闻中心_<%=wzname%></title>
</head>
<body>
<!--#include file="head.asp"-->
<div id="banner">
  <script src="advfile/ad22.js"></script></div>
<div id="dc">
  <div class="dc_l">
    <div class="dc_l_t"><h3>新闻分类</h3></div>
    <div class="dc_l_c">
      <div class="dc_l_c_c">
        <ul>
          <%=xycms_newsfllist()%>
        </ul>
      </div>
    </div>
    <div class="dc_l_t"><h3>联系我们</h3></div>
    <div class="dc_l_c">
      <div class="dc_l_c_cc">
        <ul>
          <%=xycms_contact()%>
        </ul>
      </div>
    </div>
  </div>
  <div class="dc_r">
    <div class="dc_r_t"><h3>当前位置：<a href="index.asp" target="_self">网站首页</a> > <a href="news.html" target="_self">新闻中心</a></h3></div>
    <div class="dc_r_c">
      <div class="dc_list">
        <ul>
          <% if rs.eof then
		     response.Write("<li>暂无该类信息记录！</li>")
			 else
			 rs.PageSize =15
             iCount=rs.RecordCount 
             iPageSize=rs.PageSize
             maxpage=rs.PageCount 
             page=request.querystring("page")
             if Not IsNumeric(page) or page="" then
             page=1
             else
             page=cint(page)
             end if
             if page<1 then
             page=1
             elseif  page>maxpage then
             page=maxpage
             end if
             rs.AbsolutePage=Page
             if page=maxpage then
             x=iCount-(maxpage-1)*iPageSize
             else
             x=iPageSize
             end if
             end if
             For i=1 To x %>
          <li><span><%=formatdatetime(rs("data"),2)%></span><a href="news_detail.asp?id=<%=rs("id")%>" target="_self" title="<%=rs("title")%>"><%=rs("title")%></a></li>
          <% rs.movenext
                next
		   %>
        </ul>
        <div class="clear"></div>
        <ul>
          <%call PageControl(iCount,maxpage,page,"border=0 align=center","<p align=center>")
                rs.close
                set rs=nothing%>
        </ul>
      </div>
    </div>
  </div>
  <div class="clear"></div>
</div>
<!--#include file="foot.asp"-->
</body>
</html>
