<%
'AJLogin v3.4
'By: Adam Jarret
'RandomRavings.com
%>
<%
br=" "
UserNameField="Username "
attemptedPage = "http://www.thermilate.com/technical_information/specialist_technical_data.asp"
if attemptedPage="" then attemptedPage="none"
stat = request.querystring("stat")
if stat="" then stat="none"
if IsNumeric(stat)=true then
lvl = stat
stat = "level"
end if
select case stat
case "ban"
theError="You Have Been Banned from "&sitename&"."
case "badname"
theError="Incorrect Username"
case "badpass"
theError="Incorrect Password"
case "re-enter"
theError="Incorrect Password"
UserNameField="UserName: "&Session("UserName")&""
br=": "
case "notin"
theError="You Are Not Currently Logged In."
case "level"
if lvl=1 then
theError="You Must Be Logged in To View this Page."
else
theError="You Must Be A Level "&lvl&" User To View this Page."
end if
case "logout"
Session.Abandon
theError="You Are Now Logged Out."
case "sel"
theError="You May Not Log In As Select."
end select
%>
Specialist Technical Data - Login Page