Like Us on Facebook Donate to SafeSpace

Login

Home
<% '================ Logging out of session If lcase(request("Logout")) = "logout" Then Call LogOffUser response.redirect Dirpath & "login.asp" End IF If lcase(request("Login")) = "login" Then%> <% If CheckLogin(Request("UserName"),Request("Password")) Then response.redirect DirPath & AdminPath & "admin.asp" else response.redirect DirPath & "login.asp" End If End IF '================ check if session variable is empty If Session("user") = "" Then%>
Email Address:
Password:
<%response.write Session("error") Else If ValidUser(10) Then response.redirect DirPath & AdminPath & "admin.asp" Else response.Redirect DirPath & "performer_docs.asp" End If End If %>