<!--#include file="Conn.asp" -->
<!--#include file="Comm/Site_Class.asp" -->
<%
Dim strMenu,PageTitle

Set Qsite = New Site_Class

Qsite.SiteConfig()
Qsite.GotoErrPage()

Dim NewsId,NewsTitle,NewsContent,AddDate,Newsly,Newswz

Set Rs = server.createobject("ADODB.Recordset")
Set nRs = server.createobject("ADODB.Recordset")

NewsId = Qsite.chgStr(Trim(Request.QueryString("NewsId")))

If NewsId = "" Or IsNull(NewsId) Or Not IsNumeric(NewsId) Then NewsId = 0

Rs.Open "select * from NewsTbl where NewsId = "& NewsId , Conn , 1 , 1
If Rs.Eof Then
	NewsTitle = ""
	NewsContent = ""
	AddDate = ""
Else
	NewsTitle = Rs("NewsTitle")
	NewsContent = Rs("NewsContent")
	AddDate = Qsite.FormatDate(FormatDateTime(Rs("AddDate") , 2))
	Newsly=Rs("Newsly")
	Newswz=Rs("Newswz")
End If
Rs.Close

PageTitle = NewsTitle & " -- " & myrcwwfzmc

%>
<!--#include file="Comm/myrcwwfenzhan.asp" -->
<!--#include file="headn.asp" -->

<div id="kszp1">
<div id="kszp11">
<div id="kszp111">&nbsp;&nbsp;&nbsp;&nbsp;<b>您的位置：</b><a href="http://<%=myrcwwfzwz%>" style="color:#FFFFFF; text-decoration:none;"><%=myrcwwfzmc%></a> >> <a href="../news.asp" style="color:#FFFFFF; text-decoration:none;">资讯中心</a> >> <%=NewsTitle%></div>
<div id="kszp112">
<div id="kszp1122">
<ul>
<li style="height:40px; line-height:40px; text-align:center; font-size:14px; font-weight:bold;"><%=NewsTitle%></li>
<li style="height:24px; line-height:24px; text-align:center; font-size:12px; border-bottom:#CCCCCC 1px dashed;">来源：<a href="http://<%=Newswz%>/" style="text-decoration:none; color:#000000;"><%=Newsly%></a>&nbsp;&nbsp;&nbsp;&nbsp;更新时间：<font face="Arial, Helvetica, sans-serif;"><%=AddDate%></font></li>
<li style="line-height:24px; margin-top:17px;"><%=NewsContent%></li>
<li style="height:50px; line-height:50px;">
<%
set rs=server.createobject("adodb.recordset")                            
sql="select top 1 * FROM NewsTbl where NewsId<"&NewsId&" Order By AddDate desc"
rs.open sql,conn,1,1
do while not rs.eof
%>
<b>上一条新闻：</b><%if Qsite.jingtaiqz=1 then%><a href="news_view.asp?NewsId=<%=rs("NewsId")%>"<%else%><a href="<%=rs("NewsId")%>.html"<%end if%> class="zxzpzt3"><%=left(rs("NewsTitle"),17)%></a>&nbsp;&nbsp;&nbsp;&nbsp;
<%rs.movenext
loop
rs.close() 
Set rs=Nothing
%>
<%
set rs=server.createobject("adodb.recordset")                            
sql="select top 1 * FROM NewsTbl where NewsId>"&NewsId&" Order By AddDate desc"
rs.open sql,conn,1,1
do while not rs.eof
%>
<b>下一条新闻：</b><%if Qsite.jingtaiqz=1 then%><a href="news_view.asp?NewsId=<%=rs("NewsId")%>"<%else%><a href="<%=rs("NewsId")%>.html"<%end if%> class="zxzpzt3"><%=left(rs("NewsTitle"),17)%></a>
<%rs.movenext
loop
rs.close() 
Set rs=Nothing
%>
</li>
</ul>
</div>
</div>

</div>
<div id="kszp12">
<div id="kszp121">&nbsp;&nbsp;&nbsp;最新推荐</div>
<div id="kszp122">
<div id="kszp1221"><ul>
<%
set rs=server.createobject("adodb.recordset")                            
sql="select top 17 * FROM NewsTbl where good=1 Order By AddDate desc"
rs.open sql,conn,1,1
do while not rs.eof
%>
<li style="line-height:20px;"><%if Qsite.jingtaiqz=1 then%><a href="news_view.asp?NewsId=<%=rs("NewsId")%>"<%else%><a href="../news/<%=rs("NewsId")%>.html"<%end if%> style="text-decoration:none; color:#333333;"><%=left(rs("NewsTitle"),17)%></a></li>
<%rs.movenext
loop
rs.close() 
Set rs=Nothing
%>
</ul></div>
</div>
</div>
</div>
<!--#include file="footsy.asp" -->
