<% If request("Submit") <> "" then username = request.form("username") password = request.form("password") SQL = "Select count(username) as pass from tblusers where username = '" & username SQL = SQL & "' and [password] = '" & password & "'" Open_db() Set RS = objconn.execute(SQL) If rs("pass") > 0 then Session("SignedIn") = true Session("User") = username Session("Password") = password response.Redirect("course.asp") else Set rs = nothing Close_db() wrongpass = true end if end if %>
Logo HIV and Mental Health - Depression
Logo Register • Help  
E-Learning
Resources
E-Mentoring
Glossary
User Survey
Contact Us
Home


Sign In

<% if wrongpass = true then response.Write("The username and password you entered were incorrect.
Please try again.") end if %>
Username:
Password:
 

E-Learning • Resources • E-Mentoring • F.A.Q. • Glossary • User Survey • Contact Us • Home