28,408
社区成员
发帖
与我相关
我的任务
分享关于判断访问方的ip？
我在写一个投票程序的时候为了防止恶意投票，想加入了判断访客ip的代码，我现在的想法是将访客第一次访问的ip写入数据库还是创建一个session变量或者说我的两种想法都是错误的？
...全文
请发表友善的回复…
发表回复
ecstar 2001-09-21
- 打赏
- 举报
不夸张，投票结果也要用到数据库呢
viking 2001-09-21
- 打赏
- 举报
由于上网的用户 IP 都是不固定的，如果在访问一次后就封掉不太合适
建议使用 SESSION 变量，设置过期时间为 5 分钟，这样在 5 分钟后
此 IP 又可以使用。如果流量较大的话，重复投票可以忽略！
icech 2001-09-21
- 打赏
- 举报
1、如果将IP写入数据库，会牵连很多通过局域网同一代理访问的人不能投票。
2、其实防止恶意投票，就是短期内。所以利用cookies是比较好的一种方式。
给出源代码如下：
<%
if not Request.ServerVariables("REMOTE_ADDR")=request.cookies("IPAddress") then
response.cookies("IPAddress")=Request.ServerVariables("REMOTE_ADDR")
%>
<!--#include file="dbconn.asp"-->
<%
dim rs
dim sql
dim selected
selected=request.form("options")
set rs=server.createobject("adodb.recordset")
sql="update research set select"&selected&"=select"&selected&"+1 where id=1"
rs.open sql,conn,3,3
set rs=nothing
conn.close
set conn=nothing
response.redirect "result.asp"
else
Response.write "您已经投了票，谢谢！"
end if
%>
2、其实防止恶意投票，就是短期内。所以利用cookies是比较好的一种方式。
给出源代码如下：
<%
if not Request.ServerVariables("REMOTE_ADDR")=request.cookies("IPAddress") then
response.cookies("IPAddress")=Request.ServerVariables("REMOTE_ADDR")
%>
<!--#include file="dbconn.asp"-->
<%
dim rs
dim sql
dim selected
selected=request.form("options")
set rs=server.createobject("adodb.recordset")
sql="update research set select"&selected&"=select"&selected&"+1 where id=1"
rs.open sql,conn,3,3
set rs=nothing
conn.close
set conn=nothing
response.redirect "result.asp"
else
Response.write "您已经投了票，谢谢！"
end if
%>
beckheng 2001-09-20
- 打赏
- 举报
太夸张了吧，用文件保存就行了！
tonnycncn 2001-09-20
- 打赏
- 举报
写入数据库
