asp记录访问者IP？？
<%dimconn,rs,ip,now_timesetconn=Server.CREATEOBJECT("ADODB.CONNECTION")DBPath=Server....
<%dim conn,rs,ip,now_time
set conn=Server.CREATEOBJECT("ADODB.CONNECTION")
DBPath = Server.MapPath("ip.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
set rs=server.CreateObject("adodb.recordset")
sql = "select * from ip order by id desc "
rs.open sql,conn,3,2
rs.addnew
ip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If ip = "" Then
ip = Request.ServerVariables("REMOTE_ADDR")
else
ip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
end if
'获取访问者的IP
now_time = now () '获取登陆时间(服务器时间)
rs("ip") = ip
rs("time") = now_time
rs.update%>
上面这段代码是记录访问者的IP，但问题是，我如果转换页面或是刷新页面的话，他又会写一次数据。
哪位大哥帮忙指点下，解决这个问题
注：我这个是写在头部文件，每个页面都调用的！！！ 展开
set conn=Server.CREATEOBJECT("ADODB.CONNECTION")
DBPath = Server.MapPath("ip.mdb")
conn.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & DBPath
set rs=server.CreateObject("adodb.recordset")
sql = "select * from ip order by id desc "
rs.open sql,conn,3,2
rs.addnew
ip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If ip = "" Then
ip = Request.ServerVariables("REMOTE_ADDR")
else
ip = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
end if
'获取访问者的IP
now_time = now () '获取登陆时间(服务器时间)
rs("ip") = ip
rs("time") = now_time
rs.update%>
上面这段代码是记录访问者的IP，但问题是，我如果转换页面或是刷新页面的话，他又会写一次数据。
哪位大哥帮忙指点下，解决这个问题
注：我这个是写在头部文件，每个页面都调用的！！！ 展开
Storm代理
2023-07-25 广告
StormProxies是一家提供动态代理服务器服务的企业，旨在帮助用户更好地管理网络访问和安全。以下是一些关于StormProxies的IP动态代理服务的特点：1. 高匿名性：StormProxies的动态代理服务器具有高匿名性，可以有效...
点击进入详情页
本回答由Storm代理提供
推荐律师服务：
若未解决您的问题，请您详细描述您的问题，通过百度律临进行免费专业咨询
