global.asa e cookies

[jet]

Con questo global.asa sono riuscito a stampare i nomi degli utenti connessi ed anche il loro numero;
dal momento però che dal login dò la possibilità all'utente di logarsi anche con i cookies, accade che devo appunto "trattare" anche questi nel global.asa

edit by NetKiLLeR

[Mems]

Non ti offendere, ma se la user e la password del tuo db sql all'indirizzo specificato nella stringa di connessione sono giusti, allora sei un pi**a, perchè hai regalato a tutti l'accesso libero al tuo server db.

[jet]

Perchè dopo l'incollamento ad un'ora tarda, prima di eliminare i suddetti, ho inavvertivamente inviato il post; si da il caso che da stanotte ho scritto ai due moderatori in elenco per far eliminare il postt, ma non ho ricevuto notizie in merito; allora, invece di fare del sarcarmo, caro Mems cerca di eliminarlo tu il post e mi faresti un groso favore.

[Mems]

Originariamente inviato da jet
Perchè dopo l'incollamento ad un'ora tarda, prima di eliminare i suddetti, ho inavvertivamente inviato il post; si da il caso che da stanotte ho scritto ai due moderatori in elenco per far eliminare il postt, ma non ho ricevuto notizie in merito; allora, invece di fare del sarcarmo, caro Mems cerca di eliminarlo tu il post e mi faresti un groso favore.

Il mio? Tanto Google e affini beccano lo stesso quei dati.
C'ho provato, ma non me lo fa cancellare.
Ti conviene chiedere al tuo hosting di cambiare la password del tuo server MSSQL.

[jet]

L'ho già fatto; ma oggi è sabato e se parlerà lunedì; grazie comunque;



P.S. la notte è fatta per altre avventure!

[NetKiLLeR]

Riposta pure sotto qui il tutto senza i parametri, bye.

[jet]

Con questo global.asa sono riuscito a stampare i nomi degli utenti connessi ed anche il loro numero;
dal momento però che dal login dò la possibilità all'utente di logarsi anche con i cookies, accade che devo appunto "trattare" anche questi nel global.asa

<SCRIPT LANGUAGE="VBScript" RUNAT="Server">
Sub Application_OnStart
application("UtentiCollegati") = 0
application.unlock
End Sub

Sub Session_OnStart
Session("start") = Now
session.timeout = 26

application.lock
application("UtentiCollegati")=cint(application("U tentiCollegati"))+1
application.unlock
End Sub

Sub Session_OnEnd

application.lock
application("online") = Replace( Application("online") , Session("user") & "," ,"")
application("UtentiCollegati")=cint(application("U tentiCollegati"))-1
application.UnLock

End Sub

Sub Application_OnEnd

End Sub

</script>

questo è il login

<%

user = Request.Form("user")
psw = Request.Form("psw")
MyCheckBox = Request.Form("MyCheckBox")

strConn = "driver={SQL Server};server=xxxxxxx;uid=xxxxxxxx;pwd=xxxxxxx;da tabase=xxxxxxx"

Set conn = Server.CreateObject("ADODB.Connection")

conn.Open strConn


sSql= " SELECT utenti_forum.username, utenti_forum.Psw, utenti_forum.ID"
sSql=sSql & " FROM utenti_forum"
sSql=sSql & " WHERE utenti_forum.username = '" & user & "' AND utenti_forum.Psw = '" & psw & "'"


Set rs = Server.CreateObject("ADODB.Recordset")
Set rs = Conn.Execute(sSql)


If Not Rs.EOF Then
autenticazione = True

Session("user") = rs("username")
Session("pass") = rs("Psw")
ID = rs("ID")
Session("ID") = ID
'response.write ID

if InStr(1, Application("online"), Session("user") & ", " ) = 0 then
'se l'utente non è già presente
Application.Lock
'viene aggiunto l'utente appena loggato alla stringa che contiene
' l'elenco degli utenti
Application("online") = Application("online") & session("user") & ", "
Application.UnLock

end if

Else
autenticazione =False
End If
Rs.Close

if autenticazione = true and MyCheckBox = "yes" then
response.cookies("SalvaForum").expires = now() + 365
response.cookies("SalvaForum")("user")=user
response.cookies("SalvaForum")("psw")=psw


response.cookies("SalvaForum")("ID")=ID

Response.Redirect("forum.asp")
else
if autenticazione = true and MyCheckBox = "" then
Session("Admin") = True

Response.Redirect("forum.asp")
else
Response.Redirect("login.asp")
End if
End if
%>

[jet]

Grazie.

[jet]

Grazie.

[jet]

Quando l'utente entra con le sessioni o utilizza anche i cookies la prima volta, l' Application("online") recupera l'user dell'utente e quindi credoche la pagina login.asp è ok.
Il problema si verifica all'ingresso successivo dell'utente che utilizza i cookies; a questo punto la sua user non si stampa.
Dovrei quindi lavorare nella pagina che recupera l' Application("online") e nel global.asa?
Potrei probabilmente trovare la prima soluzione (il recupero dell'user), ma come elimina un utente che entra con i cookies?