<% msg = "" reason = trim(lcase(request("reason"))) select case reason case "expire" msg = "Session expired.Please relogin" case "pwd_change" msg = "Password changed successfully!!! Please login again to continue" end select if Request.ServerVariables("REQUEST_METHOD") = "POST" then login_failed = "false" clogin = replace(replace(request.form("txtname"),"'","''"),"""","""""") cPassword = replace(replace(request.form("txtpass"),"'","''"),"""","""""") 'query = "select * from admin where clogin= '" & clogin & "' and cpassword = '" & cPassword &"'" 'response.Write(query) 'response.End() set rs_con = Conn.Execute ("select * from admin where clogin= '" & clogin & "' and cpassword = '" & cpassword &"'") if not (rs_con.eof) then 'response.write(len(rs_con("cpassword"))) 'response.write(len(cpassword)) 'response.end() if trim(rs_con("cpassword")) = cpassword then 'session("ADMIN") = rs_con("cFname") + " " + rs_con("cLname") session("loginid") = rs_con("cLogin") session("clsmain") = rs_con("class") session("semister") = rs_con("semister") cls=rs_con("class") semister=rs_con("semister") if ((cls="2cse") and (semister="I")) then Response.Redirect("facultyfeedmain2014.asp") end if if cls="3cse" then Response.Redirect("thirdcsefacultyfeedmain2014.asp") end if if cls="4Acse" then Response.Redirect("fourthcseafacultyfeedmainii.asp") end if if cls="4Bcse" then Response.Redirect("fourthcsebfacultyfeedmainii.asp") end if if cls="4cse" then Response.Redirect("fourthcseafacultyfeedmain2014.asp") end if if cls="hodcse" then Response.Redirect("hodcse.asp") end if if cls="hodece" then Response.Redirect("hodece.asp") end if if cls="hodeee" then Response.Redirect("hodeee.asp") end if if cls="hodme" then Response.Redirect("hodme.asp") end if if cls="hodsh" then Response.Redirect("hodsh.asp") end if if ((cls="6dcm") and (semister="I")) then Response.Redirect("finaldipfacultyfeedmain2014.asp") end if else msg = "Invalid login Id or Password" end if else login_failed = "true" session("LOGINED")=false msg = "Invalid login Id or Password" end if end if %>