(已解决)为什么论坛的投票帖子有IP限制？怎么解决？-领先建站CMS提供服务商我们专注于CMS建站产品的研发

3715 查看	2 回复

主题：[求助](已解决)为什么论坛的投票帖子有IP限制？怎么解决？ [收藏主题]

perfect643 当前离线

22 主题	0 广播	0 粉丝

级别:学前班

用户积分:43 分
登录次数:24 次
注册时间:2010/9/6
最后登录:2012/5/25

perfect643 发表于：2010/12/1 12:37:29 | 只看该作者查看该作者主题楼主

我们实验室的网站使用的是科讯7.0正式版的，非常感谢！

因为实验室都是公用同一个ip，在论坛发起的投票结果只能投1票了，请问怎么解决这个问题？有设置的地方吗？

刚发完帖子就找到解决的方法了，方法是：

找到一下文件：\Club\ajax.asp，用代码编辑器打开，记事本也行。找到下面代码，将第3行开始的内容全部注释掉就行了。（'××××××就是注释）

Dim IPNum:IPNum=KS.ChkClng(RS("IpNum"))
Dim IPNums:IPNums=RS("IPNums")
'If IpNums<>0 Then // 为解决一个ip只能投票1次的方法
' If Conn.Execute("Select Count(ID) From KS_PhotoVote Where UserIp='" & KS.GetIP & "' and ChannelID=-1 And InfoID='" & ID & "'")(0)>=IPNums Then
' RS.Close:Set RS=Nothing
' KS.Die Escape("对不起，每个IP最多只能投" & IPNums & "次!")
' End If
' End If
' If IpNum<>0 Then
' If Conn.Execute("Select Count(ID) From KS_PhotoVote Where Year(VoteTime)=" & Year(Now) & " and Month(VoteTime)=" & Month(Now) & " and Day(VoteTime)=" & Day(Now) & " and UserIp='" & KS.GetIP & "' and ChannelID=-1 And InfoID='" & ID & "'")(0)>=IPNum Then
' RS.Close:Set RS=Nothing
' KS.Die Escape("对不起，每个IP一天最多只能投" & IPNum & "次!")
' End If
' End If