|
<%
UserName=Request.form("Usr")
password=Request.form("pswd")
response.write password
sql_chkUser="select count(usrname) from kirsten_users where UsrName= '" & UserName & "' "
' response.write sql_chkUser
rs.open sql_chkUser,con
cnt=rs(0)
rs.close
if cnt>=1 then
sql1="select pswd from kirsten_users where UsrName= '" & UserName & "' "
rs.open sql1,con
if trim(rs("pswd")) = trim(password) then
session("usrname")=Username
response.redirect "mem_loged.asp"
response.write rs("pswd")
else
response.redirect "login_failed.html"
'response.redirect "register.asp?msg=User "& UserName &" Already Exists. Please Select some other Login Name !!!!"
end if
else
response.redirect "login_failed.html"
end if
%> |