<% Select Case Request.ServerVariables("REMOTE_ADDR") DIALER = False If Session("USERNAME") = "" or Session("PASSWORT") = "" Then Response.redirect Session("LOGINPAGE") End If If Session("ZUGANGBIS") < now() Then Response.redirect Session("LOGINPAGE") End If End Select %>