nome e cognome da visualizzare

[David_pop]

cosi mi stampa solo la scritta:
SELECT * FROM Clienti WHERE user = ''

[maximum]

<%

Dim scelta
Dim prodotto
Dim Recordset2
Dim Recordset2_numRows
dim id

....collegamento

scelta= Request.QueryString("scelta")
prodotto = Request.QueryString("prodotto")

if scelta="0" then
sSQL = "SELECT * FROM Ritmica WHERE TitoloProdotto='"&prodotto&"'"
else
sSQL = "SELECT * FROM Ritmica WHERE id="&prodotto&""
end if
set rs = conn.execute(sSQL)
if not rs.EOF then
id=(rs.Fields.Item("ID").Value)
end if

Dim User
user= Request.QueryString("user")
scelta= Request.QueryString("scelta")
if scelta="0" then
sSQL = "SELECT * FROM Clienti WHERE user = '" &user& "' "
end if
set rs = conn.execute(sSQL)
if rs.eof then
response.redirect("login.asp")
else
response.write("Benvenuto " & rs("nome") & " " & rs("cognome"))
end if
%>

Dalla querystring non gli arriva nulla.
"user" da dove arriva?

[David_pop]

questo cambiamento vi era già..

[maximum]

Poi essere più preciso?
Posta il codice della pagina che chiama questa (questo codice di sopra).

[David_pop]

questa pagina richiama poi cliccando sul bottone quella discussa prima..

<%

Dim arrVoci(6,6)
Dim Recordset2
Dim Recordset2_numRows
dim id

connessione...


set rs = conn.execute(sSQL)
if not rs.eof then
cnt = 1
i = 0
do until rs.eof
if cnt > 0 then
arrVoci(i,0) = rs("TitoloProdotto")
arrVoci(i,1) = rs("Collezione")
arrVoci(i,2) = rs("ImmagineProdotto")
arrVoci(i,3) = rs("DescrizioneProdotto")
arrVoci(i,4) = rs("Marchio")
arrVoci(i,5) = rs("ImmagineBigProdotto")
stato = rs("stato")
if stato = "disponibile" then
arrVoci(i,6) = "[img][/img]"
else
arrVoci(i,6) = "[img][/img]"
end if

i = i + 1
end if

cnt = cnt + 1
rs.moveNext
loop
end if
rs.close
set rs = nothing
if i < 5 then
for i = i to 5
arrVoci(i,0) = ""
arrVoci(i,1) = ""
arrVoci(i,2) = "spacer.gif"
arrVoci(i,3) = ""
arrVoci(i,4) = ""
arrVoci(i,5) = "spacer.gif"
arrVoci(i,6) = "spacer.gif"
next
end if
%>

[maximum]

Non vedo il bottone, dove sta?

[David_pop]

beh il bottone è nell'html della pagina:

<%= arrVoci(0,6) %>

[maximum]

Ok, praticamente manca la "user" che poi nel codice della pagina inizialmente discussa recuperi in querystring per fare la query sulla tabella degli utenti, ecco perchè ti torna al login.asp.

Ci sei?

Ora il problema è capire come sistemare il tutto e le strade sono due, o trovi il modo di fare viaggiare la "user" (io personalmente te lo sconsiglio); oppure dopo che esegui il login, salvi in sessione la username dell'utente loggato:ù

sessione("username") = request.form("username")

dopo di che in quella query ti basta fare la variazione segnata in grassetto:

<% 
Dim scelta 
Dim prodotto 
Dim Recordset2 
Dim Recordset2_numRows 
dim id 

....collegamento 

scelta= Request.QueryString("scelta") 
prodotto = Request.QueryString("prodotto") 

if scelta="0" then 
sSQL = "SELECT * FROM Ritmica WHERE TitoloProdotto='"&prodotto&"'" 
else 
sSQL = "SELECT * FROM Ritmica WHERE id="&prodotto&"" 
end if 
set rs = conn.execute(sSQL) 
if not rs.EOF then 
id=(rs.Fields.Item("ID").Value) 
end if 

scelta= Request.QueryString("scelta") 
if scelta="0" then 
sSQL = "SELECT * FROM Clienti WHERE user = '" & Session("username")  & "' " 
end if 
set rs = conn.execute(sSQL) 
if rs.eof then 
response.redirect("login.asp") 
else 
response.write("Benvenuto " & rs("nome") & " " & rs("cognome")) 
end if 
%>

Ti è tutto chiaro?

P.S.:Continuiamo stasera la discussione, diciamo verso le 21:30? ci sei?

[David_pop]

cosi ritorna sempre alla login.asp

[maximum]

Devo scappare, continuiamo stasera la discussione, diciamo verso le 21:30? ci sei?