<!--#include file="conn.asp"-->
<!--#include file="inc/config.asp"-->
<%
dim id
id=request("id")
dim title,content,jianjie,listid,keywords
if request("id")="" then
set srst=conn.execute("select  top 1 * from wd_news_sort   order by wt_id desc ")
title="新闻中心"
else
set srst=conn.execute("select  top 1 * from wd_news_sort where  wt_id="&id&"   order by wt_id desc ")
title=srst("wt_title")
end if
if not srst.eof then
id=srst("wt_id")
keywords=srst("wt_keywords")
content=srst("wt_content")
end if
srst.close
set srst=nothing

%>

<!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=utf-8" />
<title><%= title &" , "& webname%></title>
<meta name="Keywords" content="<%=keywords%>">
<meta name="Description" content="<%=jianjie%>">
<link rel="stylesheet" href="images/style.css" type="text/css" />
</head>

<body>
	
    
    <!--#include file="inc/top.asp"-->
    
    
    <div class="product_banner">
    	  <!--#include file="banner/ad_pd.asp" -->
    </div>
    
    
    
    <div class="product_mian">
    	
        
        
       <!--#include file="inc/news_sort.asp"-->   
        
        
        
        <div class="product_mian_r fr">
       	  <div class="product_mr_ti"><%=title%></div>
            <div class="product_mr_text_about">
            	<div class="ab_r">
  

    
    <div class="ge_he"></div>
    <%
set srst=server.CreateObject("adodb.recordset")
if request("id")="" then
sql= "select  *  from wd_news  order by  wt_grade asc,wt_id desc"
else
sql= "select  *  from wd_news where  wt_sortid="&ID&" order by  wt_grade asc,wt_id desc"
end if
srst.open sql,conn,1,1
pageno=10
rscount=srst.recordcount
if  rscount<1 then
response.write "<h3>非常抱歉!没有找到相关信息...</h3>"
else
call showsql(pageno)
srst.move(rsno)
for i=1 to loopno
response.write "<div class='news_class'>   "
response.write "<div class='pd_news_lb'>   "
response.write "<a href='news-show.asp?id="&srst("wt_id")&"'>"&srst("wt_title")&"</a> ["&srst("wt_addtime")&"]   "
response.write "</div>   "
'response.write "<div class='nc_zw'>"&left(srst("wt_description"),150)&" "
'response.write "</div>   "
if i mod 1=0 then response.Write("<div class='news_lb_ge'></div> ")
response.write "</div>   "
srst.movenext
next
end if
srst.close
set srst=nothing
dim filename
filename="news.asp?id="&request("id")
%>
    <div class="fy">
      <%call showpage(filename,rscount,pageno,true,true,"篇文章")%>
    </div>
  </div>
            </div>
      </div>
    </div>
    
    
    
    
    	<!--#include file="inc/bottom.asp"-->
    
    
    
    
    
</body>
</html>
