如何防范利用刷新来“作弊”的计数器?
<%
If IsEmpty(Session("Connected")) Then
Application.Lock
Application("counter") = Application("counter") + 1
Application.UnLock
End If
Session("Connected") = True
%>
<html>
<body BGCOLOR=WHITE>
<p align="center">山水盈盈之拒绝刷新计数器</p>
<p align="center">欢迎光临随风起舞,您是第 <%=Application("counter")%> 位来访者!</p>
</body></html>
[1]
本站资源均来自互联网,仅供研究学习,禁止违法使用和商用,产生法律纠纷本站概不负责!如果侵犯了您的权益请与我们联系!
转载请注明出处: 免费源码网-免费的源码资源网站 » 如何防范利用刷新来“作弊”的计数器?
发表评论 取消回复