【期货通道源码】【uki 引流源码】【心跳游戏源码】投票评分源码

时间:2024-11-28 18:23:14 分类:动态追踪源码解析 来源:智慧数据源码

1.ͶƱ?投票???Դ??
2.高手进,ASP 根据IP判断投票全代码
3.怎样根据投票结果显示排行榜(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

       %>

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

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

       我弄的,一个IP一天只能投票一次

       。投票改.,评分uki 引流源码访问: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)(求详细点的评分)

       主要是数据库里面的表和sql语句的用法,表的源码设计不多说了,sql语句为:select * from 表 order by hits(投票数) desc

       就是投票书城项目源码说按照投票的多少降序排列,票多的评分就会排在上面!不知道你是否看懂我说的!