% if Request("REQUEST_METHOD") <> "POST" then
username = Session("username")
password = Session("password")
%>
Promoters Area Login
|
Please enter your username and password
|
<% else
username = Request("formusername")
session("username") = username
password = Request("formpassword")
session("password") = password
if username = "" OR password = "" then
%>
<% response.write "!! Invalid entry !!"
response.write ""
else
password = Ucase(password)
select case username
case "promoter" if password = "PROMOTE" then session("valid")="true" End if
end select
if session("valid") = "true" then
response.redirect "private.asp"
end if
%>
Incorrect username and password.
Click here
to return to the Crasdant home page
<% end if
end if %>
|
|