关于asp计数器防刷新问题
<%setrspc=server.CreateObject("adodb.recordset")sql="select*frompagecount"rspc.opensq...
<%
set rspc=server.CreateObject("adodb.recordset")
sql="select * from pagecount"
rspc.open sql,conn,1,3
mycount=rspc("cou_num")
rspc("cou_num")=mycount+1
rspc.update
for i=1 to len(mycount)
imghtml=imghtml&"<img src='images\digit\"&mid(mycount,i,1)&".gif' >"
next
response.write "您是第: "&imghtml&"位访问本站"
%>
这是我网站中计数器的代码,请问怎么能防止用户刷新。请高手回答一下,由于后台都搞好了,所以最好不要改动数据库。 展开
set rspc=server.CreateObject("adodb.recordset")
sql="select * from pagecount"
rspc.open sql,conn,1,3
mycount=rspc("cou_num")
rspc("cou_num")=mycount+1
rspc.update
for i=1 to len(mycount)
imghtml=imghtml&"<img src='images\digit\"&mid(mycount,i,1)&".gif' >"
next
response.write "您是第: "&imghtml&"位访问本站"
%>
这是我网站中计数器的代码,请问怎么能防止用户刷新。请高手回答一下,由于后台都搞好了,所以最好不要改动数据库。 展开
展开全部
<%
set rspc=server.CreateObject("adodb.recordset")
sql="select * from pagecount"
rspc.open sql,conn,1,3
mycount=rspc("cou_num")
if session("ip"扮陆)="" then
rspc("cou_num")=mycount+1
rspc.update
session("ip")=1
end if
for i=1 to len(mycount)
imghtml=imghtml&"<img src='images\digit\"&mid(mycount,i,1)&".gif' >"
next
response.write "并缺耐您是第: "&imghtml&"位访问本站"
%>
/绝春/使用session控制了数据库里的数据的更新!
set rspc=server.CreateObject("adodb.recordset")
sql="select * from pagecount"
rspc.open sql,conn,1,3
mycount=rspc("cou_num")
if session("ip"扮陆)="" then
rspc("cou_num")=mycount+1
rspc.update
session("ip")=1
end if
for i=1 to len(mycount)
imghtml=imghtml&"<img src='images\digit\"&mid(mycount,i,1)&".gif' >"
next
response.write "并缺耐您是第: "&imghtml&"位访问本站"
%>
/绝春/使用session控制了数据库里的数据的更新!
推荐律师服务:
若未解决您的问题,请您详细描述您的问题,通过百度律临进行免费专业咨询