高分求助一个奇怪的问题~ Web 开发 / ASP

作者：佚名    文章来源：不详    点击数：加载中...    更新时间：2008-7-12 字体:[大 中 小]

高分求助一个奇怪的问题~

楼主lovewing82（或许有一天）2006-12-21 17:31:25 在 Web 开发 / ASP 提问

if   trim(request.form("pwds"))<>trim(session("pwdt"))   then  
  error_pwds="您输入的   验证码   不正确"  
  error_back="请按此返回前一页"  
  error_pic="images/error_1"  
   
        else   if   Password_in<>Password_re   then  
                  error_pwds="您2次输入的   密码   不相符"  
                  error_back="请按此返回前一页"  
                  error_pic="images/error_1"  
   
      else  
                              set   rs=server.CreateObject("ADODB.RecordSet")  
            rs.Source="select   *   from   user   where   ID_code='"&ID_code&"'"  
                              rs.Open   rs.Source,conn,1,3  
   
                    if   rs.EOF   then  
  Rs.Addnew  
  rs("id_code")=ID_code  
  rs("Password_in")=md5(Password_in)  
  rs("Password_safe")=Password_safe  
  rs("True_name")=True_name  
  rs("True_sex")=True_sex  
  rs("True_adress")=True_adress  
  rs("True_tel_1")=True_tel_1  
  rs("True_tel_2")=True_tel_2  
  rs("True_mail")=True_mail  
  rs("True_ip")=True_ip  
  rs("True_date")=now  
  rs.update  
  rs.movenext  
   
  error_pic="images/ok_1"  
  error_pwds="恭喜您注册成为凯羿的会员"  
  error_go="请按此   登陆"  
   
        else  
  error_pic="images/ok_1"  
  error_pwds="恭喜您注册成为凯羿的会员"  
  error_go="请按此   登陆"  
                        end   if  
   
  Rs.Close  
  Set   Rs   =   Nothing  
   
  end   if  
  end   if  
   
  现在有个奇怪的问题是..我判断好   验证码和密码后   该判断是否写入数据库了  
  if   rs.eof   then   没有此用户就写入了...  
  的确   最终用户写入数据库  
  但是   rs.update  
            error_pic="images/ok_1"  
            error_pwds="恭喜您注册成为凯羿的会员"  
            error_go="请按此   登陆"  
  后的这些值也没有(这些值最终我会用response.write显示出来)  
  相反却同时执行了   else后面的那些语句...  
  按理说写入数据库就应该结束了...  
  而且我把判断验证码和密码那些都删除..就留写数据库   还是老样子.  
  既写入数据库   又运行最后一个ELSE后面的语句~ 问题点数：50、回复次数：4Top

1 楼lovewing82（或许有一天）回复于 2006-12-21 17:33:27 得分 0

set   rs=server.CreateObject("ADODB.RecordSet")  
  rs.Source="select   *   from   user   where   ID_code='"&ID_code&"'"  
                              rs.Open   rs.Source,conn,1,3  
   
                    if   rs.EOF   then  
  Rs.Addnew  
  rs("id_code")=ID_code  
  rs("Password_in")=md5(Password_in)  
  rs("Password_safe")=Password_safe  
  rs("True_name")=True_name  
  rs("True_sex")=True_sex  
  rs("True_adress")=True_adress  
  rs("True_tel_1")=True_tel_1  
  rs("True_tel_2")=True_tel_2  
  rs("True_mail")=True_mail  
  rs("True_ip")=True_ip  
  rs("True_date")=now  
  rs.update  
  rs.movenext  
   
  error_pic="images/ok_1"  
  error_pwds="恭喜您注册成为凯羿的会员"  
  error_go="请按此   登陆"  
   
        else  
  error_pic="images/ok_1"  
  error_pwds="恭喜您注册成为凯羿的会员"  
  error_go="请按此   登陆"  
                        end   if  
   
  Rs.Close  
  Set   Rs   =   Nothing  
  我删除到还有这些..  
  却出现了既写入数据库   又运行  
  else  
  error_pwds="这个   用户名   已经被使用"  
  error_back="请按此返回前一页"  
  error_go=""  
  error_pic="images/error_1"  
  上面打错了...最后个else后面应该是这个Top

2 楼lcw321321（文子）回复于 2006-12-22 15:05:16 得分 5

估计是你的if   else     else不是很规范  
   
    还有Rs.Close  
  Set   Rs   =   Nothing     好象要提前  
  Top

3 楼hanpoyangtitan（韩波洋）回复于 2006-12-22 16:31:14 得分 45

...Top

4 楼lovewing82（或许有一天）回复于 2006-12-22 16:36:33 得分 0

LS的来接分了..谢谢你回答我的PM~Top