Problema carrello spesa e spese di spedizione

[klinik]

Salve stò testando un semplice carrello della spesa, con selezione prodotti, compilazione dati, riepilogo e pagamento.

Il mio problema è con le spese di spedizione, nello script originale ho questa stringa

SpeseDiSpedizione="10,50"

io avrei bisogno di poter selezionere 4 tipi di spedizione:
SDA 24h
SDA 3gg
SDA 24h + contrassegno
SDA 3gg + contrassegno
ho provato con in select a tendina ma non ne vengo fuori

Quancuno sà darmi una dritta?
Grazie Gab

[Roby_72]

Non ho capito...
Vuoi che le spese cambino in base al tipo di spedizione??

Roby

[klinik]

A furia di provare ho risolto così:

<%@LANGUAGE = VBScript%>
<%
Dim spedizione
spedizione= Request.Form("spedizione")
%>

<script type="text/javascript">
function SelectPost()
{
document.modulo.method = "post";
document.modulo.action = "carrello.asp";
document.modulo.submit();
}
</script>

<form name="modulo">
<select name="spedizione" onchange="SelectPost()">
<option value="">Seleziona le spese di spedizione</option>
<option value="9,00">Corriere SDA 3gg € 9,00</option>
<option value="12,80">Corriere SDA 24h € 12,80</option>
<option value="13,00">Corriere SDA 24h contrassegno € 13,00</option>
<option value="12,50">Corriere SDA 3gg contrassegno € 12,50</option>
</select>
</form>

<%
SpeseDiSpedizione = spedizione

Session.LCID=1040
Set DatabaseWebStore = Server.CreateObject("ADODB.Connection")
DBString =""
DBString = DBString + "Driver={Microsoft Access Driver (*.mdb)};"
DBString = DBString + "Dbq=" & Server.MapPath(".") & "\mdb-database\webstore.mdb;"
DBString = DBString + "Uid=Admin;"
DBString = DBString + "Pwd=;"
DatabaseWebStore.Open DBString
if len(Session("aperta")) > 0 Then
QuantiArticoliInScontrino = Session("QuantiArticoliInScontrino")
ScontrinoInScontrino = Session("ScontrinoInScontrino")
ScontrinoIDArticolo = Session("ScontrinoIDArticolo")
ScontrinoCodiceArticolo = Session("ScontrinoCodiceArticolo")
ScontrinoDenominazioneArticolo = Session("ScontrinoDenominazioneArticolo")
ScontrinoQuantitativoArticolo = Session("ScontrinoQuantitativoArticolo")
ScontrinoConfezioneArticolo = Session("ScontrinoConfezioneArticolo")
ScontrinoPrezzoArticolo = Session("ScontrinoPrezzoArticolo")
NOITEMSINSHOPPINGBASKET = Session("NOITEMSINSHOPPINGBASKET")
INFO_NOITEMSINSHOPPINGBASKET = Session("INFO_NOITEMSINSHOPPINGBASKET")
%>

..per cui selezionando l'importo dal menù a tendina mi ricarica la pagina, mi segna le spese di spedizione selezionate e mi ricalcola il totale.
Purtroppo dopo la fase sucessiva, dove metto i dati per l'ordine, non mi tiene le spese di spedizione....

Credo che mi rifarò sentire presto...

Grazie a tutti per ora
Gab