Function isLogged(UserName, PassWord, LogInPage)         		 
         Entered_UserName = ""
         Entered_PassWord = ""
         
         Entered_UserName = Request.Cookies("UserName")
         Entered_PassWord = Request.Cookies("PassWord")
                 	
         if Entered_UserName <> UserName or Entered_PassWord <> PassWord then           
            if LogInPage <> "" then include(LogInPage) end if
            isLogged = false
         Else
            isLogged = true
         end If
end function