1.ͶƱϵͳ aspԴ?投票?
2.求：限制同一IP重复投票asp源码，急！系统
3.ASP 高手把下面代码修改成同IP只限1个投票
ͶƱϵͳ aspԴ?投票?
我弄的，一个IP一天只能投票一次
。系统蔡兴国溯源码改.,投票访问：flycentrury。com。系统诱惑下载源码cn
如果选手机，投票你选择的系统价位是：
……
你可以试验一下
以下是我按你的数据库改的源码
<%
function ips()
dim id
id=Request.ServerVariables("REMOTE_HOST")
if Request.ServerVariables("HTTP_X_FORWARDED_FOR")<>"" then
id=Request.ServerVariables("HTTP_X_FORWARDED_FOR")
end if
ips=id
end function
ip=ips()
set rc=server.CreateObject("adodb.recordset")
sql="select tptime,ip from ip where ip='"&ip&"' and tptime=#"&date()&"#"
rc.open sql,conn,1,1
aa=rc.recordcount
rc.close
set rc=nothing
if aa>0 then
Response.Write "<script>alert('您今天已经投过票啦！');this.location.href='javascript:window.close()';</SCRIPT>"
else
sql="update Vote set ps=ps+1 where id="&pid
conn.execute(sql)
conn.close
set conn=nothing
Response.Write "<script>alert('谢谢您的投票关注，投票成功！系统');this.location.href='javascript:window.close()';</SCRIPT>"
end if
%>
求：限制同一IP重复投票asp源码，投票急！系统
<%
function getIP()
getIP = Request.ServerVariables("HTTP_X_FORWARDED_FOR")
If getIP = "" The投票天龙源码输出n getIP = Request.ServerVariables("REMOTE_ADDR")
end function
if Request.Cookies("mycookie")("userip")<>"" then
Response.Write "<script>alert('一个IP地址只能投一次票，谢谢您的系统参与！');history.go(-1);</script>"
response.End()
else
Response.Cookies("mycookie")("userip")=getIP()
Response.Cookies("mycookie").Expires=date+
end if
%>
把以上代码放在你投票页的投票前面就行了
ASP 高手把下面代码修改成同IP只限1个投票
获取IP地址的语句：
<%ip=request.ServerVariables("REMOTE_ADDR")%>
这个最好是将投票者的IP保存到数据库中，新投票查询IP如果存在数据库，图片查看 源码则投票无效。
也可以将投票者的IP保存到Cookie的话，需要对Cookie设置一个有效期时间，虚拟沙箱源码这个Cookie是保存在对应投票者的电脑中。（投票者清IE缓存可以去除Cookie）
