hits.asp

来自「功能最强大的ASP网站」· ASP 代码 · 共 27 行

ASP
27
字号
<!--#include file="conn.asp"-->

document.write("<head><meta http-equiv='Content-Language' content='zh-cn'><meta http-equiv='Content-Type' content='text/html; charset=gb2312'><meta name='robots' content='none'></head>");

<%
title=trim(request("title"))
hits=1
y_hits=0

set rs=server.createobject("adodb.recordset")
sql="select * from NEWS where title='"&title&"'"
rs.open sql,conn,1,3

if rs.eof and rs.bof then
f_hits=100
else
rs("hits")=rs("hits")+hits
%>

document.write("<%=rs("hits")%>");

<%
rs.update
rs.close
end if
set rs=nothing
%>

⌨️ 快捷键说明

复制代码Ctrl + C
搜索代码Ctrl + F
全屏模式F11
增大字号Ctrl + =
减小字号Ctrl + -
显示快捷键?