<%@LANGUAGE="VBSCRIPT" CODEPAGE="936"%>
<!--#include file="conn.asp"-->
<!--#include file="page.asp"-->
<!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="Content-Type" content="text/html; charset=gb2312" />
<title><%=site_info("title")%>-<%=site_info("keywords")%></title>
<meta name="keywords" content="<%=site_info("keywords")%>" />
<meta name="description" content="<%=site_info("description")%>" />
<link href="style.css" rel="stylesheet" type="text/css" />
</head>
<body>
<!--#include file="header.asp"-->
<div  class="layout">
  <!--#include file="left_news.asp"-->
<div class="list">
<div class="list_title">新闻中心</div>
<div class="list_content">
<% 
set news_fl=server.createobject("adodb.recordset") 
exec="select * from [news_category] order by id asc  " 
news_fl.open exec,conn,1,1 
if news_fl.eof and news_fl.bof then
response.Write("&nbsp;暂无任何分类 !")
end if
do while not news_fl.eof%>
<ul class="news">
<li style="font-size:14px; line-height:30px; background-color:#F3F7F8; border-bottom-style:dashed;"><span class="data"><a href="news_category.asp?id=<%=news_fl("id")%>">更多>></a></span><b><%=news_fl("title")%></b></li>
<% 
set news=server.createobject("adodb.recordset") 
exec="select top 6 * from [news] where category="&news_fl("id")&" order by id desc" 'top 5代表每栏目显示5条新闻
news.open exec,conn,1,1 
if news.eof and news.bof then
response.Write("&nbsp;此分类暂无新闻 !")
end if%>
 <%while not news.eof%>
        <li>
          <span class="data"><%=news("data")%></span><a href="news_view_<%=news("id")%>.htm" title="<%=news("title")%>"><%=left(news("title"),35)%></a></li>
		   <%news.movenext
wend%>
<%
news.close
set news=nothing
%>
</ul>
<%
news_fl.movenext
loop
news_fl.close
set news_fl=nothing
%>
</div>
</div>
</div>
<div class="clear"></div>
<!--#include file="footer.asp"-->
