<%
dim username,msg, pass
if request.form("Submit")<>"" then
username = request.form("uid")
pass = request.form("pwd")
if username <> "" then
set rs=con.execute("select * from alumni where uid='" & username & "'")
'set rs=con.execute("select * from alumni where uid='" & username & "' and status='Active'")
if rs.eof then
msg="This user ID does not exist."
response.redirect("alumni.php?msg=" & msg)
else
if rs("pwd")=request.form("pwd") then
session("user")=username
response.redirect("postmsg.php")
else
msg="Wrong Password."
response.redirect("alumni.php?msg=" & msg)
end if
end if
end if
end if
%>
:: Institute of Technical Education & Research ::
