hit.asp

来自「ASP入门与提高实用教程 源文件(上传网站)」· ASP 代码 · 共 12 行

<%Response.buffer=True%>
<!--#Include file="conn.asp"-->
<%
Dim bbs_id
bbs_id=Request("bbs_id")                                 
'下面一段将点击次数加1，然后引导至bbstext.asp以显示内容
strSql="Update bbs Set hit=hit+1 Where bbs_id=" & bbs_id
conn.Execute(strSql)
conn.Close
Response.Redirect "bbstext.asp?bbs_id=" & bbs_id 
%>