Ciao a tutti,

premetto che non conosco bene asp, ma necessito di poter aggironare lo stock di un mini eshop che ho trovato in rete free ma molto limitato.

Al fine di non far comandare materiale che non c'è, necessito che alla fine della comanda mi aggiorni lo stock.. premett che piu o meno ci sono riuscita,ma su 2 o 3 prodotti me ne aggiorna uno solo

L'update non so dove e come metterlo:

Dim Connstock, rsStock
Set Connstock = Server.CreateObject("ADODB.Connection")
Connstock.Open ConString
Set rsStock = Connstock.Execute("SELECT productname,numinstock,quantity,ordini.productid as idord,ordini.productid as idprod FROM ordini,prodotti WHERE ordini.productid=prodotti.productid and stock='attesa'")

While Not rsStock.EOF
Dim stock,quantita,finalestock,idprod
idprod=rsStock("idprod")
stock = rsStock("numinstock")
quantita = rsStock("quantity")
finalestock = stock-quantita
%>

- <%=idprod%><%= rsStock("productname") %>-<%= stock %> - <%= quantita %> = <%= finalestock %>


<%
Connstock.Execute "UPDATE prodotti,ordini SET numinstock = "&finalestock&",stock='aggiornato' WHERE prodotti.productid="&idprod&" and stock='attesa'"

rsStock.MoveNext
Wend
rsStock.Close
Set rsStock = Nothing

Connstock.Close
Set Connstock = Nothing