Grazie per aver risposto... il fatto è questo: io non ho cambiato nulla! Ma proprio nulla

Questo è il codice intero della pagina che controlla la login così dalla otte dei tempi ma che da un giorno alla'ltro ha smesso di funzionare

codice:
<% Option Explicit %>
<% Response.Buffer = True %>

<!DOCTYPE html PUBLIC "-//W3C//DTD XHTML 1.0 Transitional//EN"
        "http://www.w3.org/TR/xhtml1/DTD/xhtml1-transitional.dtd">
<html xmlns="http://www.w3.org/1999/xhtml" lang="it">
<head>
	
<title>Area editing - Login </title>
	<meta http-equiv="Content-Type" content="text/html; charset=iso-8859-1" />
	<link rel="stylesheet" href="/cs/base.css" type="text/css" media="screen" />
	<style type="text/css" media="screen">
		@import url(/cs/s.css);
		@import url(/cs/news.css);
		@import url(/news/edit/area_edit/cs/stili.css);
	</style>
	<script type="text/javascript" src="/js/external_link.js"></script>
</head>
<body class="news">
<div class="wrap">
  
  <div class="main">
	<div class="submenu">
		<ul class="indietro">
			[*]indietro
  		[/list]
	</div>
  
    <div class="contenuto"> 
      <div class="bread"> 
        
  1. Area Editing News
  2. Errore

      </div>
      <div class="centrale"> 
        <h1>Errore</h1>
<%
	Dim strUserid, strPassword, strCookie
	strUserid = Request.Form("frmUserid")
	strPassword = Request.Form("frmPassword")
	strCookie = Request.Form("frmCookie")
%>

<%
	Dim objRso, strSql, bolError
	Set objRso = Server.CreateObject("ADODB.Recordset")
	strSql = "SELECT id, strPassword, bolAdmin, strSessione " & _
	"FROM tblUtenti " & _
	"WHERE strUserid = '" & strUserid & "' And bolConferma = True And bolAttivato = True"
	objRso.Open strSql, objCon, adOpenKeyset, adLockReadOnly, adCmdText
	
	If objRso.Recordcount = 1 Then
		If objRso("strPassword") = strPassword Then
			If objRso("bolAdmin") = True Then
				If objRso("id") = 1 Then Session("SuperAdmin") = True
				Session("admin") = True
				Session("user") = False
			Else
				Session("user") = True
				Session("admin") = False

'				*********************************
'				SCRITTURA DATI PER LE STATISTICHE
'				*********************************

				Dim idUtente
				idUtente = objRso("id")
				Call WriteStats(idUtente)

			End If
			Session("id") = objRso("strSessione")

'			*******************************************
'			CONTROLLO ED EVENTUALE SCRITTURA DEL COOKIE
'			*******************************************

			If Request.Form("frmCookie") = "Y" Then
				Response.Cookies("user") = Session("id")
				Response.Cookies("user").Expires = Date() + 60
			End If

'			**************************************
'			REINDIRIZZAMENTO ALLA PAGINA di editing
'			**************************************

			Response.Redirect("../area_edit/default.asp")

		Else
			Response.Write "<p class=""error"">Password non valida.</p>"
			bolError = True
		End If
	Else
		Response.Write "<p class=""error"">Nome utente inesistente o non ancora attivato.</p>"
		bolError = True
	End If
	objRso.Close
	Set objRso = Nothing
	If bolError Then
		Response.Write "

Torna alla maschera di autenticazione</p>"
	End If
%>

      </div>
    </div>
  </div>
  
  
</div>
</body>
</html>