中易网

asp投票次数限制代码

答案:2  悬赏:40  
解决时间 2021-04-27 14:04

<td width="106" align="center" valign="top"><table width="71" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td width="71" height="60" background="Images/scc.gif" ><div align="center"><%=Rs("digno")%> ℃</div></td>
            </tr>
        </table>
          <table width="74%" border="0" cellspacing="0" cellpadding="0">
            <tr>
              <td align="center"><a href="javascript:Is_Dig(<%=Rs("Id")%>);">喜欢就加热它!</a></td>
            </tr>
          </table></td>

 

 

这是源代码 ,如何修改能使其实现每个IP只能点一次加热这个功能呢,请把修改好的源码写上,谢谢

最佳答案

这需要在数据库表中加入IP记录的数据表.


你需要在你代码中加入如下ASP代码,并在数据库中建立相对应的数据表


conn.execute("delete from IP where datediff('d',time,now())>=1")


'删除数据库中超过一天的IP地址记录(设置为一个IP一天只能投一次票)
  fIP=Request.ServerVariables("Remote_Addr")


'获得用户登陆的IP地址
  Set rs=Server.CreateObject("ADODB.RecordSet")
  rs.open "Select * from IP where sid="&sid&" and ip='"&fIP&"'",conn,1,3


'获取数据库中sid列的值为sid,ip列的值为flp的记录,并保存在rs中
  If not(rs.eof and rs.bof) Then
   Response.Write "<script>alert('你已经投过票了!');window.close()</script>"


'如果有相等的,即IP和数据库里的IP相同,则显示已经投过票了
   Response.End
  Else     '否则,将当前用户信息存入数据库
   rs.addnew   


   rs("sid")=sid 
   rs("ip")=fIP
   rs("time")=now()
   rs.update
  End If
  rs.close
  Set rs=nothing


下面再加上你的计算投票的代码即可

全部回答
这块是源码的很少一部分,在函数 is_Dig()中查看页面的转向,然后在转向的页面中找到 asp程序(进行数据更新的),加入ip判断(前提是必须在该表中有ip项)
我要举报
如以上问答内容为低俗、色情、不良、暴力、侵权、涉及违法等信息,可以点下面链接进行举报!
大家都在看
马上要毕业了~学校说联想要招人,办联想培训
乐2pro拍照不好看.自拍不如乐1s
为什么我的机子老是有奇怪的声音?
宾王商贸区五街/宾王商贸区四街(路口)在哪里
各位朋友,我给儿子起了一个名字不知道怎么样
介绍教学摄影的网站
北京哪里的衣服好看,价格适中,比较流行
AUTOCOMPLETE:IEXPLORE.EXE应用程序错误!100
为什么3145网页删除不掉
观音机场到徐州师范大学
慈利县高峰土家族乡地址在什么地方,想过去办
怎么快速点亮问问啊
想知道: 天津市 天津市南开区车管所 在哪 需
江苏移动5元包月上QQ。每天上多长时间够用?
没有希望的爱情,还能不能坚持?
推荐资讯
求好听的电视剧插曲、片尾曲、主题曲都行
qq宠物神奇之旅我有几个地方去不了 ,谁告诉
吉顺饭庄地址在哪,我要去那里办事
惠普的笔记本商务版性能怎么样?
曙光汽车SUV、双环汽车SUV你们开过吗,怎么样
有一些只有100MB大小的动画视频吗?
系统一卡一卡的怎么回事?
衡水联通怎么查话费.查上网流量
法拉利的KERS系统在蒙扎赛道上估计会有多大的
DNF,解救我啊~~速度秒題吧
《坏蛋》你比较喜欢谁!?
爱在旅途的观后感怎么写。。。。
手机登qq时,显示手机磁盘不足,清理后重新登
刺客的套装怎么选啊?