__________________________________________________________________
Remove the ' character from the begining of the following lines:
'Validated = "OK"
'if Request.Cookies("ValidUser") <> Validated then
' dim s
' s = "https://"
' s = s & Request.ServerVariables("HTTP_HOST")
' s = s & Request.ServerVariables("URL")
' if Request.QueryString.Count > 0 THEN
' s = s & "?" & Request.QueryString
' end if
' Response.Redirect "Logon.asp?from=" &Server.URLEncode(s)
'End if
_________________________________________________________________
Hope this helps.
Jim