www.gusucode.com > QCMS小型网站管理系统 1.4 SP1 UTF-8 ACCESS源码程序 > inc/hits.asp

    <%@ CODEPAGE=65001 %>
<%Response.Charset="UTF-8"%>
<!--#include file="conn.asp"-->
<!--#include file="news.asp"-->
<%
newsid=request.QueryString("newsid")
if not isnumeric(newsid) then response.Redirect(install&"fail.asp")
set ns=new news
ns.getnewsinfo(newsid)
ns.updatecount(newsid)
response.Write "document.writeln('"&ns.rs("readcount")&"')"
%>