<% @ Language="VBScript" %> <% Response.Expires = 0 Response.CacheControl = "no-cache" Response.AddHeader "Cache-Control", "no-cache" Response.AddHeader "Cache-Control", "private" Response.AddHeader "Cache-Control", "no-store" Response.AddHeader "Cache-Control", "must-revalidate" Response.AddHeader "Cache-Control", "max-stale=0" Response.AddHeader "Cache-Control", "post-check=0" Response.AddHeader "Cache-Control", "pre-check=0" Response.AddHeader "Pragma", "no-cache" Response.Buffer = True Session.LCID = 1030 'Session.Abandon %> <% if request("password") = "" or isempty(request("password")) = cbool(true) then ' no password - do nothing else password = cstr( request("password") ) Set objRegExp = New RegExp objRegExp.Pattern = "[^a-zA-Z0-9]" objRegExp.IgnoreCase = True objRegExp.Global = True objRegExp_Test = objRegExp.Test(password) if cbool(objRegExp_Test) = cbool(false) then check_objRegExp = cbool(true) end if if cstr(password) = cstr(login_password_01) or cstr(password) = cstr(login_password_02) or cstr(password) = cstr(login_password_03) then check_password = cbool(true) end if if cbool(check_objRegExp) = cbool(true) and cbool(check_password) = cbool(true) then session( "ToxLoginError" & session.sessionid ) = clng(0) session( "ToxLogin" & session.sessionid ) = cbool(true) response.redirect( login_response_redirect ) else if session( "ToxLoginError" & session.sessionid ) = "" or isempty(session( "ToxLoginError" & session.sessionid )) = cbool(true) then session( "ToxLoginError" & session.sessionid ) = clng(1) else session( "ToxLoginError" & session.sessionid ) = clng( session( "ToxLoginError" & session.sessionid ) + 1 ) end if if clng(session( "ToxLoginError" & session.sessionid )) => clng(4) then response.redirect( error_response_redirect ) end if end if end if %> Login - Toxit.dk
Velkommen til Nybrobonde.dk

Login   ::

<% if session( "ToxLoginError" & session.sessionid ) = "" or isempty(session( "ToxLoginError" & session.sessionid )) = cbool(true) then else %>
error #<%= session( "ToxLoginError" & session.sessionid ) %>   <% end if %>
made by toxit.dk