<!--#include file="conn.asp"-->
<!--#include file="inc/config.asp"-->
<!--#include file="inc/SiteLink_class.asp"-->
<%
dim id
id=request("id")
if id="" then
id=1 
title="新闻中心"
end if
dim wt_addtime,wt_hits,wt_images,wt_service,wt_fileUrl,wt_id
set srst=conn.execute("select  top 1 * from wd_news where  wt_id="&id&"   order by wt_id desc ")
if not srst.eof then
wt_id=srst("wt_id")
wt_title=srst("wt_title")
wt_content=srst("wt_content")
wt_description=left(srst("wt_description"),200)
wt_sortId=srst("wt_sortId")
wt_Keywords=srst("wt_keywords")
wt_addtime=srst("wt_addtime")
wt_images=srst("wt_images")
wt_fileUrl=srst("wt_fileUrl")
end if
srst.close
set srst=nothing

dim rsS,SortName
set rsS=server.CreateObject("adodb.recordset")
rsS.open "select wt_title,wt_id from wd_news_sort where wt_id="&wt_sortid&"",conn,1,1
if not rsS.eof then
SortName=rsS("wt_title")
sId=rsS("wt_id")
end if
rsS.close
set rsS=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><%= wt_title%>_<%=webname%></title>
<meta name="Keywords" content="<%=wt_Keywords%>">
<meta name="Description" content="<%=wt_description%>">
<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"><%=sortname%></div>
            <div class="product_mr_text_about">
            	<div class="ab_r">
    
    <div class='pd_zw_bt'>
      <h1><%=wt_title%></h1>
    </div>
    <div class='ab_r_tool'>加入时间：<%=wt_addtime%> 录入：admin </div><br />
    <%
	  if wt_images<> "" then%>
    <div class="pro_pic" ><img src="<%=wt_images%>"  /></div>
    <%end if%>
    <div class='pd_nc_zw'> <%=SiteLink(wt_content)%> <br >
      </div>
    <script src="/js/fx.asp?images=<%=wt_images%>&amp;title=<%=wt_title%>" language="JavaScript" charset="utf-8"></script>
    <div class="nc_keywords">
      <h2>关键字:
        <%
 dim n,Related_Cases_tiaojian
 if wt_Keywords <> "" then
 wt_Keywords=split(wt_Keywords,",") 
 for N=0 to UBound(wt_Keywords) 
     if wt_Keywords(n)<>"" then
	 response.write ""&wt_Keywords(n)&"&nbsp; "
	 Related_Cases_tiaojian=  " or wt_title like '%"&wt_Keywords(n)&"%'"& Related_Cases_tiaojian
	 Related_Cases_tiaojian=  " or wt_Keywords like '%"&wt_Keywords(n)&"%'"& Related_Cases_tiaojian
	 end if
 next
 end if
 %>
      </h2>
    </div>
    <div class="anli_fy">
      <%
set srst=conn.execute("select top 1  wt_id,wt_title,wt_fileUrl from wd_news where wt_sortid="&wt_sortid&" and    wt_id<"&wt_id&" order by wt_id desc  ")
if not srst.eof then
response.write "<li>上一文章：<a href='news-show.asp?id="&srst("wt_id")&"'>"&srst("wt_title")&"</a></li>"
else
response.write "<li>上面无信息了</li>"
end if
srst.close
set srst=nothing
set srst=conn.execute("select top 1  wt_id,wt_title,wt_fileurl  from wd_news where wt_sortid="&wt_sortid&" and   wt_id>"&wt_id&" order by wt_id desc")
if  not srst.eof then
response.write "<li>下一文章：<a href='news-show.asp?id="&srst("wt_id")&"'>"&srst("wt_title")&"</a></li>"
else
response.write "<li>下面无信息了</li>"
end if
srst.close
set srst=nothing
%>
    </div>
    <div class="Related_Cases">
      <div class="Related_Cases_bt">相关信息</div>
      <div class="Related_Cases_lb">
        <ul>
          <%
if Related_Cases_tiaojian <> "" then
n=0
dim Related_Cases_sql
Related_Cases_sql="select top 2  wt_id,wt_title,wt_fileurl  from wd_news where  "&Related_Cases_tiaojian&"  order by wt_id desc  "
Related_Cases_sql =replace(Related_Cases_sql,"where   or","where ")
'response.Write  Related_Cases_sql  
'response.End() 
set srst=conn.execute(Related_Cases_sql)  
do while not srst.eof
	if srst("wt_id")<>id then  
	n=n+1 
	  response.write "<li><a href='news-show.asp?id="&srst("wt_id")&"'>"&left(srst("wt_title"),259)&"</a></li>"  
	end if
if n mod 5=0 then response.Write("</ul><ul>")
srst.movenext
loop
srst.close
end if  
%>
        </ul>
      </div>
      <div class="ge_he"></div>
    </div>
    <div class="SBack" ><strong><a href="javascript:history.go(-1)" class="ttt"> 返回 </a></strong></div>
  </div>
            </div>
      </div>
    </div>
    
    
    
    
    	<!--#include file="inc/bottom.asp"-->
    
    
    
    
    
</body>
</html>
