ASP复选框取值，密码修改

是一个选课系统，学生进行选课用的复选框，<!--#include file=conn.asp -->
<!--#include file=xuanke_checkright.asp -->


<%
call CheckLogin()'一般用户访问权限判断函数

kcid=replace(trim(request.form("kcid")),"'","")
If kcid = "" or IsNULL(kcid) or (not isNumeric(kcid)) then
    Response.Write "<script language=JavaScript>alert(' 限制人数必须为数字格式！\n\n系统将自动返回前一页面...');history.back();</script>"

    Response.End
end if
   
    set RS=Server.CreateObject("ADODB.RecordSet")
      infolist="select * from 教师表_teacher where id="&kcid&""
      RS.open infolist,conn,1,3
      if rs.eof  then
            str="该课程的信息不存在，请检查！"
            MsgShow str,"0",url  
   
            'call CloseDatabase()
      else
            if rs("xzrs")-rs("yxrs")>0 then

                         set RS12=Server.CreateObject("ADODB.RecordSet")
                          infolist2="select * from 学生表_student where name='"&session("XZW_xsID")&"' "
                          RS12.open infolist2,conn,1,3
                          if RS12.eof  then
                                str="该学生的信息不存在，请检查！"
                                MsgShow str,"0",url  
                               
                                call CloseDatabase()
                          else
                                if RS12("SXKC") = "" or IsNULL(RS12("SXKC")) then
                                    RS12("SXKC")=kcid
                                    RS12.update
                                else
                                    str="你已经选好课程了，请不要重复选择！"
                                    url="wdkc.asp"
                                    MsgShow str,"1",url  
                                   
                                    call CloseDatabase()
                                    response.end
                                  end if
                            end if
                          RS12.close
                rs("yxrs")=rs("yxrs")+1
                rs.update
                rs.close
                set rs=nothing
                '-------------------------------
                str="祝贺您！您的选课已经成功完成！"
                url="wdkc.asp"
                MsgShow str,"1",url  
                    call CloseDatabase()
                    response.end

            else
                    str="该老师的课已被选满，请选其他老师的课！"
                    MsgShow str,"0",url  
   
                    call CloseDatabase()
                    response.end
            end if
    end if
%>
这是选课保存页面的代码。选课确定的时候都是弹出"该老师的课已被选满，请选其他老师的课！"这个提示。不知道哪里出错了？还有就是学生进行密码修改的时候弹出”没有登录“

1493784541我的Q Q 你看看哪个提示是判断什么才会弹出的,检查判断语句