Salve ho un problema, ho un carrello e ogni qualvolta si aggiunge un prodotto questo va a finire alla fine della lista, vorrei che quando si aggiunge un prodotto al carrello invece questo si posiziona all'inizio dell'elenco; mi spego meglio: aggiungendo i prodotti al carrello vorrei che l'elenco partisse dall'ultimo prodotto aggiunto e che arrivasse fino al primo. Vi sposto il codice della pagina carrello1.asp:
i=Session("Contatore")
k=0
while k <= i
PR=Session("Prodotti"&k)
if Session("Prodotti"&k) <> "" then
Set prodotti = Server.CreateObject("ADODB.Recordset")
prodotti.ActiveConnection = cn
prodotti.Source = "SELECT * FROM magaz WHERE codice='"&PR&"'"
prodotti.CursorType = 2
prodotti.CursorLocation = 2
prodotti.LockType = 2
prodotti.Open()
response.write(prodotti("descri"))
prodotti.Close()
Set prodotti = Nothing
end if
k=k+1
wend
Questa invece è la pagina addcarrello.asp che ha la funzione di aggiungere:
If Session("Contatore") = "" then
Session("Contatore")=0
end if
qualeNow=Request("id")
quantNow=Request("qnt")
clifor=Request("clifor")
cont=Session("Contatore")
q=0
coco=0
while q <= cont
'response.Write("Ciclo
")
contr=Session("Prodotti"&q)
if contr <> qualeNow then
'response.Write("Incremento coco
")
coco=coco+1
else
'response.Write("If se esiste
")
Session("Quantita"&q)=Cint(Session("Quantita"&q))+ Cint(quantNow)
coco=0
q=Session("Contatore")+1
end if
q=q+1
wend
if coco <> 0 then
'Response.Write("If di aggiunta se non esiste
")
i=Session("Contatore")
Session("Prodotti"&i)=Request("id")
Session("Quantita"&i)=Request("qnt")
Session("Contatore")=Session("Contatore")+1
Session.timeout=1440
end if
Session("clifor")=clifor
response.Redirect("carrello1.asp")
Mi potete illuminare. Grazie
Rispondi quotando
in questo modo gli ultimi saranno i primi 
