ASP网站计数器的设置问题

来源:百度知道 编辑:UC知道 时间:2024/07/04 06:27:15
1.我想设置计数器的初始值。。
2.我想取消防刷新限制

非常感谢!

以下为计数器源代码:
<!--#include file="../Include/setting.asp" -->
<%
picture=slt
picnum=6
set conn=Server.CreateObject("ADODB.connection")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & Server.MapPath("../"&zf11db_All&"")
Set rs=Server.CreateObject("ADODB.Recordset")
sql= "select * from VisitCount where id=1"
rs.open sql,conn,3,3
'防刷代码开始
ip=Request.ServerVariables("REMOTE_ADDR")
'比对新老IP
if not ip=session("OldIp") then
session("OldIp")=ip
rs("counter")=rs("counter")+1
rs.update
counternum=rs("counter")
rs.close
else
counternum=rs("counter")
rs.close
end if
counternum=cst

1.我想设置计数器的初始值。。
计数器的初始值是在Acess数据库中的!你用Access打开.mdb文件中的表VisitCount修改字段counter!就可以

2.我想取消防刷新限制
把代码
else
counternum=rs("counter")
rs.close
改为跟上面一样就可以,也就是改成:
else
session("OldIp")=ip
rs("counter")=rs("counter")+1
rs.update
counternum=rs("counter")
rs.close