<!--#include file="Conn.Asp"-->
<%
If GetTabField("QShop_Config", "1=1", "HTMLon") = "1" Then
    Response.expires = 0
    Response.expiresabsolute = Now() - 1
    Response.addHeader "pragma", "no-cache"
    Response.addHeader "cache-control", "private"
    Response.CacheControl = "no-cache"
End If
Dim newsid, sortid, newsname, viewnum, newscontent, addname, adddate
newsid = SafeRequest("id", 1)
Set rs = server.CreateObject("adodb.recordset")
If newsid = "" Then
    sql = "select top 1 newsid,newsname,newscontent,addname,adddate,viewnum from QShop_News order by adddate desc"
Else
    sql = "select * from QShop_News where newsid="&newsid
End If
rs.Open sql, conn, 1, 1
sortid = rs("sortid")
newsname = Trim(rs("newsname"))
addname = Trim(rs("addname"))
adddate = rs("adddate")
viewnum = rs("viewnum")
newscontent = ProcessSitelink(Trim(rs("newscontent")))
rs.Close
Set rs = Nothing
%>
<%htmlTitle = newsname%>
<!--#include file="Templates/Header_Template.Qianbo"-->
<!--#include file="Templates/News_Template.Qianbo"-->
<!--#include file="Templates/Footer_Template.Qianbo"-->
<%CloseConn()%>
<script src="<%=weburl%>FrmNewHit.Asp?id=<%=newsid%>"></script>
<!--#include file="JavaScriptLogin.Asp"-->