ciao optime, avevo allegato il file credevo fosse utile.
Ad ogni modo il codice della pagina è quello che segue.
Estrae :
quantità | descrizione | elimina prodotto
Totale prezzo

mi piacerebbe ottenere :
quantità | descrizione | elimina prodotto
totale quantità |totale prezzo


codice:
<!-- CARRELLO -->
    <body topmargin="0" leftmargin="0">

    <table width="150">
        <tr>
            <td width="193" valign="top">
<%
'---Dichiarazione variabili


'---Recupero i prodotti inseriti nel carrello per questa sessione
    SQLCart = " SELECT * FROM Carrello WHERE IDSessione = '"& SessionID &"' "
    Set RSCart = Conn.Execute(SQLCart)

    If Not RSCart.EoF Then
        TotaleCart = 0
%>
                <br>
                <b><%=Prodotti%> nel carrello: 
<%
'---Stampo a video i prodotti trovati e i relativi prezzi/quantità
        If Not RSCart.EOF Then RSCart.MoveFirst
            Do while Not RSCart.EOF
                If RSCart("IDTipologia") <> 0 Then
                    SQLTipologie = " SELECT Tipologia FROM Tipologie WHERE ID = " & RSCart("IDTipologia")
                    Set RSTipologie = Conn.Execute(SQLTipologie)

                    CartTipologia = RSTipologie("Tipologia")
                Else
                    CartTipologia = ""
                End If
                If RSCart("IDTipologia2") <> 0 Then
                    SQLTipologie2 = " SELECT Tipologia2 FROM Tipologie2 WHERE ID = " & RSCart("IDTipologia2")
                    Set RSTipologie2 = Conn.Execute(SQLTipologie2)

                    CartTipologia2 = RSTipologie2("Tipologia2")
                Else
                    CartTipologia2 = ""
                End If
%>
                </b>
                <br>
                <!-- &nbsp;<img src="<%=Path_Img%>art.jpg" > --><%=RScart("Quantita")%>&nbsp;-&nbsp;<%=RScart("Prodotto")%>&nbsp;
                
                <%If CartTipologia <> "" Then%>
                 
                 <%=CartTipologia%>
                 <%End if%>
                
                <%If CartTipologia2 <> "" Then %>
                   - <%=CartTipologia2%><a href="prod_cancella.asp?id=<%=RScart("ID")%>"><img src="<%=Path_Img%>elimina.jpg"></a>
                <%End if%>
                <%If CartTipologia2 = "" Then %>
                <a href="prod_cancella.asp?id=<%=RScart("ID")%>"><img src="<%=Path_Img%>elimina.jpg"  border="0" alt="<%=Elimina_Prodotto_Carrello%>" align="center"></a>
                
                <%end if%>

<%
                If Session("Rivenditore") Then PrezzoProdotto = RScart("RPrezzo") Else PrezzoProdotto = RScart("CPrezzo")
                PrezzoTotaleProdotto = (UtilizzaPrezzo(PrezzoProdotto) * RSCart("Quantita"))

                SQLSconti = " SELECT Sconto FROM Sconti WHERE IDProdotto = " & RSCart("IDProdotto") & " AND Quantita <= " & RSCart("Quantita") & " ORDER BY Sconto DESC"
                Set RSSconti = Conn.Execute(SQLSconti)

                If Not RSSconti.EOF Then
                    PrezzoTotaleProdotto = ArrotondamentoPrezzo(PrezzoTotaleProdotto - ((PrezzoTotaleProdotto / 100) * RSSconti("Sconto")))
                End If

                RSSconti.Close

                TotaleCart = TotaleCart + PrezzoTotaleProdotto

                RScart.MoveNext
            Loop
%>          
                <br>
                <br>
                <%=Importo%>:
                <br>
                <b><%=SimboloValuta%></b> <font color="red"><%=VisualizzaPrezzo(TotaleCart)%></font> <%=IvaNonCompresaBreve%>&nbsp;
                <a title="Visualizza il tuo ordine nel carrello!" href="carrello.asp"><img src="<%=Path_Img%>carrello.jpg"  border="0"></a>
<p align="center">
<%
        Else
%>
                <br>
                <%=PCarrelloVuoto%><br>
<%
        End If
%>
            </td>
        </tr>
        </table>
<!-- /CARRELLO -->
<%
        End If
%>