%@ Language=VBScript %> <%Response.Buffer = true Response.ExpiresAbsolute = #1/1/1980# Response.AddHeader "cache-control", "no-store, must-revalidate, private" Response.AddHeader "Pragma", "no-cache"%> <% if request.querystring("nopassword") = 1 then 'from checkloginbooking.asp str = "
Your Password was incorrect. Please Try Again
" Response.Cookies("TennisCookies").expires = Date - 1 response.Flush() elseif request.querystring("noemail") = 1 then 'from checkloginbooking.asp str = "The Username you entered was not in the database. Please Try Again or Register using the other form.
" Response.Cookies("TennisCookies").expires = Date - 1 response.Flush() elseif request.querystring("alreadythere") = 1 then 'from checkloginbooking.asp str = "The Username you entered is already in use. If you have already registered, LOG IN on the left hand side form. Otherwise, REGISTER with a different user name on the right hand side form.
" Response.Cookies("TennisCookies").expires = Date - 1 response.Flush() elseif request.querystring("emailalready") = 1 then 'from checkloginbooking.asp str = "The Email you entered has already been registered. Please, LOG IN on the left hand side form or click the Forgotten Password or Username link.
" Response.Cookies("TennisCookies").expires = Date - 1 response.Flush() else if Request.Cookies("TennisCookies").haskeys then Session("name") = Request.Cookies("TennisCookies")("tname") Session("email") = Request.Cookies("TennisCookies")("temail") Session("customerid") = Request.Cookies("TennisCookies")("tcid") Session("newsletter") = Request.Cookies("TennisCookies")("tnewsletter") Session("telno") = Request.Cookies("TennisCookies")("ttelno") Session("loggedon") = "true" response.redirect "http://theparklangleyclub.homelinux.com:82/index.asp?ok=true&session=" & Session.SessionID else str = "" end if end if %>![]() |
|
||||||||||||||||||||||||||||||||||||||||||||||||||
|
|
||||||||||||||||||||||||||||||||||||||||||||||||||