Nuovo utente nell'ecommerce

[Javi]

Salve.
Sto facendo un ecommerce, ho un problema quando assegno l'id ad un utente ke sta
aggiungendo qualcosa al carrello. Il mio problema è questo, se il primo utente aggiunge delle cose al carrelo, il secondo utente ke si collega si ritrova nel suo carrello ciò ke aveva aggiunto il primo utente.

Questo è il pezzo di codice usato :

Sub CreaNuovoOrdine()
Application.lock
if Application("orderID") = "" then
Application("orderID") = 1
end if


intOrderID = Application("orderID")
Session("orderID") = intOrderID

Conn.Execute("INSERT INTO orders " _
& " (OrderID, Status) values " _
& " ("&intOrderID&", 'OPEN')")

Application("orderID") = Application("orderID") + 1
Application.Unlock
End Sub

Potete dirmi come fare oppure se avete uno script funzionante.
Grazie

[Roby_72]

Come fai la SELECT dell'elenco prodotti del carrello?

Roby

[Javi]

di quale select parlavi?

[Roby_72]

Questa pagina è inutile ai fini della ricerca del problema.

Roby

[Javi]

AggiungiCarrello.asp:

...................

Sub CreaNuovoOrdine()
Application.lock
if Application("orderID") = "" then
Application("orderID") = 1
end if


intOrderID = Application("orderID")
Session("orderID") = intOrderID
Conn.Execute("INSERT INTO orders " _
& " (orderID, status) values " _
& " ("&intOrderID&", 'OPEN')")

Application("orderID") = Application("orderID") + 1
Application.Unlock
End Sub

Sub AggAOrdine(nOrderID, nProductID, nQuant)
sqlText = "INSERT INTO itemsOrdered " _
& " (orderID, productID, quantity) values " _
& " ("&nOrderID&", "&nProductID&", "&nQuant&")"
Conn.Execute(sqlText)

End Sub



intProdID = Request.form("intProdID")
intQuant = Request.form("intQuant")

set Conn = Server.CreateObject("ADODB.Connection")
Conn.Open ConString

intOrderID = cstr(Session("orderID"))
if intOrderID = "" then
CreaNuovoOrdine
end if

sqlText = "SELECT * FROM itemsOrdered WHERE orderID =" & intOrderID & "AND productID =" & intProdID
set rsOrder = Conn.Execute(sqlText)

if rsOrder.EOF then
txtInfo = "Il prodotto è stato aggiunto al tuo Carrello."
AggAOrdine intOrderID, intProdID, intQuant
else
txtInfo = "Questo prodotto è già presente nel tuo Carrello."
end if


%>

[Roby_72]

Verifica il valore dell'application e della session.
Fatteli stampare.

Roby

[Javi]

<%response.write(Application("orderID))%>
stampa 2

mentre
<% response.write(Session("orderID"))%>
stampa1
.

[Roby_72]

Come vedi non va bene...
Ma stai provando sulla stessa macchina?

Roby

[Javi]

si,stessa macchina!!!!

[Roby_72]

Prova chiudendo il browser e riaprirlo ogni volta che fai l'operazione.

Roby