asp高手请帮助一下!

来源:百度知道 编辑:UC知道 时间:2024/05/16 15:05:17
我有个推广系统,里面有防作弊,一个IP只能注册一次增加点数,但现在失效了,1个IP无论注册多少次都增加点数,下面这段加上去还是不起效果,请问高手,是不通还是有错,或则请赐教一段代码

这个就是加的那个防作弊的语句
'''''''''''''''''''''''''''''''''''''''''''''
ipip=request.ServerVariables("REMOTE_ADDR")
sql_wr="Select * From VIP_RegUser Where LastLoginIp='"&ipip&"'"
Rs_wr.Open Sql_wr,Conn,1,1
if rs_wr.eof then

这段是增加点数的
If User_Name<>"" Then
Set Rs= Server.CreateObject("ADODB.Recordset")
Sql="Select Top 1 * From VIP_User_XX"
Rs.Open Sql,Conn,3,2
Rs.AddNew
Rs("User_Name")=User_Name
Rs("XX_Name")=XX_Name
Rs.Update

下面这个是IPIP.asp的文件代码

<%
ipip=request.ServerVariables("REMOTE_ADDR")

你获取IP后,存入SESSIONG就行了,每次都与SESSING相比较一下

我想问一句:LastLoginIp应该是最近登陆IP吧?不是注册IP吧?先保证这个字段名别搞错!

然后你用response.write输出sql_wr,把语句拷贝到查询分析器里运行一下,看看是不是你的IP字符串多了什么空格之类的东西?差一个字符就不等于了!

你没有按我说的做吗?你发出来的程序没什么问题,有问题应该是没有发出来的程序部分有问题,或者你的输入有问题!

ipip=request.ServerVariables("REMOTE_ADDR")
sql_wr="Select * From VIP_RegUser Where LastLoginIp='"&ipip&"'"
Rs_wr.Open Sql_wr,Conn,1,1
if rs_wr.eof and rs_wr.bof then

跳点