Lista utenti connessi e recupero dati

[[trodat]]

Ciao a tutti.

Con uno script trovato con la ricerca sul forum e adeguatamente personalizzato, riesco a visualizzare la lista degli utenti connessi ad un'area riservata della pagina web e cliccando sul nome di ognuno si apre il profilo relativo, praticamente come in questo forum.

Il problema è che su qualsiasi nome clicco si apre sempre e comunque il profilo dell'ultimo utente connesso, il link sul quale clicco per aprie il profilo è questo:

profilo.asp?utente=fratello&id=534
profilo.asp?utente=sorella&id=3

ma la query che dovrebbe aprire i dati di quel determinato id restituisce sempre:

SELECT * FROM users where id = 3

cioè l'id dell'ultimo utente connesso... dove sbaglio? Grazie

[99eros9]

Con quel poco codice, non si capisce dov'è il problema

[[trodat]]

Originariamente inviato da 99eros9
Con quel poco codice, non si capisce dov'è il problema

grazie, codice completo di visualizza_utenti.asp:

<%
response.buffer = True

username = session("username")
id = session("id")

if id = "" then 
Response.Write("Non ci sono utenti collegati in questo momento")
else

SQL = "SELECT * FROM users where id = "& id
Set Rec = Server.CreateObject("ADODB.Recordset")
Set Rec = oConn.Execute(SQL)

Dim arrUtenti, i 
Response.Write("In linea:")
arrUtenti = Split(Application("Utente"),"|") 
dim utenti 
for i = 0 to UBound(arrUtenti)-1
if i <> UBound(arrUtenti)-1 then
response.write ("<font color=red size=1 font face=verdana>"&replace(arrUtenti(i), "#^#", " ")&", </font>")
else 
response.write ("<font color=red size=1 font face=verdana>"& replace(arrUtenti(i), "#^#", " ")&"</font></font><font face=""Verdana"" size=""1""><font color=""black"">)</font>")
end if 
Next 
end if 
%>

questa invece la pagina profilo_utente.asp:

<base target="I1">
<% 
response.buffer = True

dim id, username

    username = session("username")	
    id = session("id") 

if id = "" then 
Response.Write("nessuno in linea")
else

SQL = "SELECT * FROM users where id = "& id
response.write sql &"
"
Set Rec = Server.CreateObject("ADODB.Recordset")
Set Rec = oConn.Execute(SQL)
end if

rec.close 
Set rec = Nothing 
%>

%>

[99eros9]

e dove recuperi il valore del parametro id nella pagina del profilo utente? a me sembra che gli assegni solo il valore della variabile di sessione...

[[trodat]]

Originariamente inviato da 99eros9
e dove recuperi il valore del parametro id nella pagina del profilo utente? a me sembra che gli assegni solo il valore della variabile di sessione...

Come devo fare per assegnarla correttamente?

[99eros9]

id = request.queryString( "id" )

[[trodat]]

Originariamente inviato da 99eros9
id = request.queryString( "id" )

GRAZIE!!! funziona!!!