Salve,

per memorizzare il carrello in una variabile di sessione, utilizzo lo script

'+------------------------------------------- GESTIONE CARRELLO ----------------------------------------------------+
' Define Constants '
CONST CARTPID = 0 '
CONST CARTPNAME = 1 '
CONST CARTPPRICE = 2 '
CONST CARTPQUANTITY = 3 '
'
' Get The Shopping Cart '
IF NOT isArray( Session( "cart" ) ) THEN '
DIM localCart( 20, 4 ) '
ELSE '
localCart = Session( "cart" ) '
END IF '
'
' Add Item to cart '
IF idProd <> "" THEN '
foundIT = FALSE '
FOR i = 0 TO UBOUND( localCart ) '
IF localCart( CARTPID, i ) = idProd THEN '
localCart( CARTPQUANTITY, i ) = localCart( CARTPQUANTITY, i ) + 1 '
foundIT = TRUE '
EXIT FOR '
END IF '
NEXT '
IF NOT foundIT THEN '
FOR i = 0 TO UBOUND( localCart, 2 ) '
IF localCart( CARTPID, i ) = "" THEN '
localCart( CARTPID, i ) = idProd '
localCart( CARTPNAME, i ) = prod1 '
localCart( CARTPPRICE, i ) = productPrice '
localCart( CARTPQUANTITY, i ) = 1 '
EXIT FOR '
END IF '
NEXT '
END IF '
END IF '
'
' Update Session variable with Array '
Session( "cart" ) = localCart '
'+------------------------------------------------------------------------------------------------------------------+
mentre per stampare le righe del carrello utilizzo il codice:

<% local_Cart = Session("cart")
FOR int_count = 0 TO UBOUND(local_Cart, 2)
cartr2 = local_Cart( CART_PID, int_count ) '
cartr3 = local_Cart( CART_PNAME, int_count ) '
dec_price = local_Cart( CART_PPRICE, int_count ) '
cartr4 = local_Cart( CART_PQUANTITY, int_count )
IF cartr2 <> "" THEN
%>
<tr class="tdBodyTxtSmall">
<td align="center"><input name="qta_1" type="text" class="input" id="qta_1" value="<% = cartr4 %>" size="2" maxlength="3" /></td>
<td><% = cartr3 %></td>
<td align="right">&euro;. <% = dec_price %></td>
</tr>
<% END IF
NEXT %>
Però le righe non mi vengono visualizzate . Qualcuno sa aiutarmi?

Grazie