皮皮网

1.?线投系统???ͶƱϵͳԴ??

????ͶƱϵͳԴ??

       <%

       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

       %>

       把以上代码放在你投票页的统源投票开源外贸独立站源码前面就行了