请帮我看看这个ASP代码哪里错误

来源:百度知道 编辑:UC知道 时间:2024/05/22 07:41:19
网站的会员每次登录的时候就往 ipa 表中插入一条记录,插入他的用户名和IP地址。如果他登录的时候的IP地址和他前几次登录的IP地址不一样系统就发消息到后台,提示这个人有问题。下面这段代码有罗辑错误。我运行的结果是一个用户名只第一次登录往ipa表中插一条记录,以后这个用户名再次登录就算IP地址不一样也不再往ipa表中插入记录,也不往lianxi表中插入记录。请高手帮我看看是什么问题

session("u_id")=trim(Request.Form("userid")) ’得到登录的这个人的session
sql="select * from IPA where userid='"&session("u_id")&"'"
set rs=conn.execute(sql)
if rs.bof and rs.eof then '如果ipa表中没有这个人的用户名就说明他是第一次登录

sql="insert into IPA values('"&session("u_id")&"','"&left(rss(0),6)&"') "
set rs=conn.execute(sql)
Conn.Close
response.redirect "feiyuan.asp"
else
'-----------------------------------------------------------------
sql="select * from IPA where ip = '"&ip&"'" ‘如果ipa表中有他的用户名就查一下ipa表中有没有和他这种登录的IP地址一样的IP地址,如果没有就往lian表中插一条记录,提示这个人有问题,并往ipa表中插入他的用户名和这次登录的IP
set rs=conn.execute(s

##### 呵呵,你写的代码有意思,我先来解释一下你写的代码的意思 #####

if 第一次登录
插入 id ,ip
重定向
else 不是第一次登录
查找 ipa 表中与现在用户一致的 ip
if 没有一致的 ip
输出:'这个人有问题!'
else
重定向
end if
end if

看了上面的内容知道你错在哪里了吗?
不是第一次登录的人,你找 ipa 表中与现在用户 ip 一致的 ip 而
不是判断 ip 是否也一致

###################### 下面我来改一下 #####################

if 第一次登录
插入 id ,ip
重定向
else 不是第一次登录
if rs("ip")=现在的 ip (说明:查到用户id的这条记录,判断ip是否一致)
重定向
else
输出:'这个人有问题!'
end if
end if

######################## 完整代码 ####################
session("u_id")=trim(Request.Form("userid"))
sql="select * from IPA where userid='"&session("u_id")&"'"
set rs=conn.execute(sql)
if rs.bof and rs.eof then
sql="insert into IPA values('"&se