皮皮网

1.asp ͶƱ Դ?票源?
2.网站投票系统更新页add.asp
3.asp投票系统,怎么修改这个ASP投票系统
4.高手进,ASP 根据IP判断投票全代码
5.ASP 高手把下面代码修改成同IP只限1个投票

asp ͶƱ Դ??

       <%

       function getIP()

        getIP = Request.ServerVariables("HTTP_X_FORWARDED_FOR")

        If getIP = "" Then 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

       %>

       把以上代码放在你投票页的票源前面就行了

网站投票系统更新页add.asp

       投票系统更新页add.asp

       在构建投票页面vote.asp时，我们已经设置表单的票源action属性指向了add.asp。这个动态页面用于处理投票操作。票源

       首先，票源如何查看页面源码创建一个新的票源动态页面，例如vote.asp，票源你可以在此添加一个链接跳转到result.asp。票源在页面设计上，票源我们的票源重点是记录每个选项的投票人数，而非读取或插入数据库记录，票源因此，票源我们将使用预存过程来实现数据更新。票源

       在绑定-命令（预存过程）选项中，票源选择SQL定制功能。投票系统的星盘查询 源码核心操作是对数据库表vote中的某个字段进行累加，所以，我们将使用预存过程来执行SQL语句，更新字段值。

       在vote.asp页面中，单选按钮的Value属性被设置为表vote中的字段名。当用户点击按钮时，Request.form("rbResult")的值会对应表vote中的一个字段。所以，易游模块源码SQL语句的目的是在相应字段中增加1，以记录每个投票者的投票。

       需要注意的是，在实际操作中，务必移除SQL语句中的"where"条件，因为我们并不需要根据其他条件来筛选数据。

       至此，投票系统的小杰授权站源码关键文件已经完成。让我们预览一下最终的效果。

asp投票系统,怎么修改这个ASP投票系统

       这列是纪录票数，为整型

       第一个页面，你是通过读取数据库中的纪录嘛，这样很容易获得ID咯。

       当第一个页面跳转到第二个页面的同时，将ID传递到第二个页面，读取需要ID，成品源码是什么在读取的同时，将票数读取出来，这里暂时定义为count。

       投票事件以统计更新：当点击“投票”的时候，让count=count+1，同时写如数据库。

       这样就实现了你所说的功能。

       但是，为了防止恶意刷投票，我们通常会将用户IP地址在他投票的同时纪录下来，保存到数据库中，如果这个IP已经投票过了，那么就不能再次投票了。

       说得比较清楚了，如果还是不会改的话，可以发代码到我邮箱，或者我有空的时候给你做一个这样的系统。我的邮箱是：jcqiuzhihua@.com

高手进,ASP 根据IP判断投票全代码

       我弄的，一个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

       %>

ASP 高手把下面代码修改成同IP只限1个投票

       获取IP地址的语句：

       <%ip=request.ServerVariables("REMOTE_ADDR")%>

       这个最好是将投票者的IP保存到数据库中，新投票查询IP如果存在数据库，则投票无效。

       也可以将投票者的IP保存到Cookie的话，需要对Cookie设置一个有效期时间，这个Cookie是保存在对应投票者的电脑中。（投票者清IE缓存可以去除Cookie）