Ciao a tutti,
grazie innanzitutto dell'interessamento.

Io come login uso il software di Joanna non so se lo conoscete.
Un utente si registra ed ha una username e password, ma quando si loggano vengono indirizzati tutti alla pagina nomepagina.asp.


Ecco cosa c'e' scritto nella pagina:

<% Option Explicit %>
<%
If Not Session("user") And Not Session("admin") Then
Response.Redirect("userError.htm")
Else
%>


Mentre questa pagina e' quella che serve per il controllo della login:

<% Option Explicit %>
<% Response.Buffer = True %>
<html>
<head>
<title>Controllo Dati Login</title>
<link rel="stylesheet" type="text/css" href="../stile/stile.css">
</head>
<body vlink="#0000FF">
<%
Dim strUserid, strPassword
strUserid = Request.Form("frmUserid")
strPassword = Request.Form("frmPassword")
%>

<%
Dim objRso, strSql, bolError, strSessione
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
Session("id") = objRso("strSessione")
Response.Redirect("userMenu.asp")
Else
Session("user") = True
Session("admin") = False
Session("id") = objRso("strSessione")
strSessione = Session("id")

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

Dim idUtente, strDataOra, strIpNumber, strUserAgent, objCmd
idUtente = objRso("id")
strDataOra = Cstr(Now())
strIpNumber = Request.ServerVariables("REMOTE_ADDR")
strUserAgent = Request.ServerVariables("HTTP_USER_AGENT")
strSql = "INSERT INTO tblStats (idUtente,strDataOra,strIpNumber,strUserAgent) VALUES " & _
"(" & idUtente & ", '" & strDataOra & "', '" & strIpNumber & "', '" & strUserAgent & "')"
Set objCmd = Server.CreateObject("ADODB.Command")
objCmd.CommandType = adCmdText
objCmd.ActiveConnection = objCon
objCmd.CommandText = strSql
objCmd.Execute
Set objCmd = Nothing

' **************************************
' REINDIRIZZAMENTO ALLA PAGINA DEL MENU'
' **************************************

Response.Redirect("userMenu.asp")
End If
Else
Response.Write "<font class=""normal"">Password non valida.</font>
"
bolError = True
End If
Else
Response.Write "<font class=""normal"">User-Id non presente all'interno del database o non ancora attivata.</font>
"
bolError = True
End If
objRso.Close
Set objRso = Nothing
If bolError Then
Response.Write "Torna al Login"
End If
%>

</body>
</html>


Potreste aiutarmi ?

Grazie infinitamente, Cainus