%@LANGUAGE="VBSCRIPT" CODEPAGE="1252"%> <% Response.Expires = -1000 Response.Buffer = True Dim login_username, login_password Dim intError, arrMessage(1) intError = 0 %> <% Session("ValidatedForThisPage") = "" if request.form("submit") = "Login" then login_username = Trim(LCase(request.Form("username"))) login_password = Trim(LCase(request.Form("password"))) if login_username = "signature" And login_password = "welcome" Then Session("ValidatedForThisPage") = "true" Response.Redirect "press_release.asp" else arrMessage(intError) = "Username or Password incorrect." intError = intError+1 end if Else login_username = "" login_password = "" End If %>
Media Centre » Press Release