<%
Validated = "OK"
if Request.Cookies("ValidUser115") <> Validated then
'Construct the URL for the current page.
dim s
s = "http://"
s = s & Request.ServerVariables("HTTP_HOST")
s = s & Request.ServerVariables("URL")
if Request.QueryString.Count > 0 THEN
s = s & "?" & Request.QueryString
end if
'Redirect unauthorized users to the logon page.
Response.Redirect "http://www.bobshankphotography.com/Gallery Photos/2009-05-05 PV Baseball Gallery/LogonLVBA.asp?from=" &Server.URLEncode(s)
End if
%>
Bob Shank Photography