% Response.Buffer=true %>
BLS Download Login
<% IF Request.Form("ID")<>"" then
session("ID")=Request.Form("ID")
session("PW")=Request.Form("PW")
session("LoggedIN")="Nope"
session("DownLoadMode")=""
select case lcase(session("ID"))
case "efinity":
if session("PW")="Mobile" then
session("DownLoadMode")="blsefinity"
session("LoggedIN")="Yep"
end if
case "bluelightcs":
if session("PW")="custScrub" then
session("DownLoadMode")="blscs"
session("LoggedIN")="Yep"
end if
case "bluelight":
if session("PW")="10428200" then
session("DownLoadMode")="blsgfps"
session("LoggedIN")="Yep"
end if
case "bluelighteu":
if session("PW")="10428" then
session("DownLoadMode")="blseu"
session("LoggedIN")="Yep"
end if
case "bluelightwsm":
if session("PW")="windows" then
session("DownLoadMode")="blswsm"
session("LoggedIN")="Yep"
end if
case "bluelightaud":
if session("PW")="soxaudit" then
session("DownLoadMode")="blsaud"
session("LoggedIN")="Yep"
end if
case "bluelightint":
if session("PW")="104282" then
session("DownLoadMode")="blsint"
session("LoggedIN")="Yep"
end if
case "myinspection":
if session("PW")="tracker" then
session("DownLoadMode")="blsit"
session("LoggedIN")="Yep"
end if
case else:
session("LoggedIN")="Nope"
end select
If lcase(session("LoggedIN"))="yep" then
Response.Redirect "loggedin.asp"
end if
End If %>