<%@ Language=VBScript %> <% Dim strConnect %> <% Session("blnLogin")= False Session("username")= "****" Session("password")= "****" Session("firstname")= "****" Session("lastname")= "****" Session("email")= "****" Session("visitorip")= Request.Servervariables("REMOTE_HOST") Session("visitorbrowser")= Request.Servervariables("HTTP_USER_AGENT") Session("visitorreferer")= Request.Servervariables("HTTP_REFERER") Session("visitoraccount")= Request.Servervariables("LOGON_USER") Session("visitorservername")= Request.Servervariables("SERVER_NAME") Application("WhoOn") = Application("WhoOn") - 1 Response.Redirect "index.asp" %>