去除同一ip每天只能注册一次功能  这个里面可以修改吗？

 response.end
 end if
set rs8=server.CreateObject("adodb.recordset")
regIP8=trim(Request.ServerVariables("REMOTE_ADDR"))
rs8.Open "select * from A_user where regIP='"&regIP8&"'  order by id desc",conn,1,1
if  rs8.recordcount>0 then

 cok9=1

 response.Write "<script LANGUAGE='javascript'>alert('24小时内只能注册一个账号！');history.go(-1);</script>"

 response.end

end if
rs8.close
set rs8=nothing