carrello asp

[crescenzo]

ciao a tutti ringrazio in anticipo
ho realizzato un catalogo con flash che prende i dati da un db attraverso una pag asp adesso volendo creare un carrello in flash
ho fatto il carrello in asp e leggo i dati dello stesso da flash
riesco ad aggiungere gli articoli e a fargli fare le somme sempre attraverso il carrello.asp il quale mi formatta i dati in xml e li leggo in flash
allora il problema è il seguente
nel carrello asp avevo creato un form che controllava a fianco di ogni articolo una casella di spunta se nn era spuntata facendogli fare il ricalcolo quell'articolo nn veniva consideratoe si elimina dal carrello
quindi il carrello funziona perfettamente solo che vorrei dirgli senza aprirlo di fare il ricalcolo e magari indicargli la casella nn spuntata ma nn ci riesco proprio adesso posto la parte di codice del carrello se qualcuno mi può aiutare

Dim Requirement
Requirement = Request.Form("ricalcola.x")
If Len(Requirement) > 0 Then
If Requirement = "Annulla" Then
QuantiArticoliInScontrino = 0
NOITEMSINSHOPPINGBASKET = True
Else
Dim QuantiArticoliInNuovoScontrino
Dim Quantitativo
For i = 1 To QuantiArticoliInScontrino
If Request.Form("checked" & CStr(i)) = "ok" Then
ScontrinoInScontrino(i) = True Else
ScontrinoInScontrino(i) = False
End If
If ScontrinoInScontrino(i) Then
Quantitativo = Trim(Request.Form("quantitativo" & CStr(i)))
If IsNumeric(Quantitativo) Then
ScontrinoQuantitativoArticolo(i) = Abs(CLng(Quantitativo))
Else
ScontrinoQuantitativoArticolo(i) = 1
End If
QuantiArticoliInNuovoScontrino = QuantiArticoliInNuovoScontrino + 1
ScontrinoInScontrino(QuantiArticoliInNuovoScontrino) = ScontrinoInScontrino(i)
ScontrinoIDArticolo(QuantiArticoliInNuovoScontrino) = ScontrinoIDArticolo(i)
ScontrinoCodiceArticolo(QuantiArticoliInNuovoScontrino) = ScontrinoCodiceArticolo(i)
ScontrinoDenominazioneArticolo(QuantiArticoliInNuovoScontrino) = ScontrinoDenominazioneArticolo(i)
ScontrinoConfezioneArticolo(QuantiArticoliInNuovoScontrino) = ScontrinoConfezioneArticolo(i)
ScontrinoQuantitativoArticolo(QuantiArticoliInNuovoScontrino) = ScontrinoQuantitativoArticolo(i)
ScontrinoPrezzoArticolo(QuantiArticoliInNuovoScontrino) = ScontrinoPrezzoArticolo(i)
End If
Next
QuantiArticoliInScontrino = QuantiArticoliInNuovoScontrino
If QuantiArticoliInScontrino > 0 Then
ReDim Preserve ScontrinoInScontrino(QuantiArticoliInScontrino)
ReDim Preserve ScontrinoIDArticolo(QuantiArticoliInScontrino)
ReDim Preserve ScontrinoCodiceArticolo(QuantiArticoliInScontrino)
ReDim Preserve ScontrinoDenominazioneArticolo(QuantiArticoliInScontrino)
ReDim Preserve ScontrinoConfezioneArticolo(QuantiArticoliInNuovoScontrino)
ReDim Preserve ScontrinoQuantitativoArticolo(QuantiArticoliInScontrino)
ReDim Preserve ScontrinoPrezzoArticolo(QuantiArticoliInScontrino)
End If
If QuantiArticoliInScontrino = 0 Then
NOITEMSINSHOPPINGBASKET = True
End If
Session("QuantiArticoliInScontrino") = QuantiArticoliInScontrino
Session("ScontrinoInScontrino") = ScontrinoInScontrino
Session("ScontrinoIDArticolo") = ScontrinoIDArticolo
Session("ScontrinoCodiceArticolo") = ScontrinoCodiceArticolo
Session("ScontrinoDenominazioneArticolo") = ScontrinoDenominazioneArticolo
Session("ScontrinoConfezioneArticolo") = ScontrinoConfezioneArticolo
Session("ScontrinoQuantitativoArticolo") = ScontrinoQuantitativoArticolo
Session("ScontrinoPrezzoArticolo") = ScontrinoPrezzoArticolo
Session("NOITEMSINSHOPPINGBASKET") = NOITEMSINSHOPPINGBASKET
End If
End If
%>
<%If NOITEMSINSHOPPINGBASKET = True Then%>
<%=INFO_NOITEMSINSHOPPINGBASKET%>

<%End If%>
<%If NOITEMSINSHOPPINGBASKET = True Then%>
<%Else%>

<%Dim j%>
<%For j = 1 To QuantiArticoliInScontrino%>
<%Response.Write "<nome id=""" & ScontrinoCodiceArticolo(j)  & """/><descrizione h=""" & FormatNumber(ScontrinoPrezzoArticolo(j), 2, -1, 0, -1) &""">" & ScontrinoQuantitativoArticolo(j) & "</descrizione><foto h=""" (ScontrinoPrezzoArticolo(i) * ScontrinoQuantitativoArticolo(i)) &""">"& FormatNumber((ScontrinoPrezzoArticolo(j) * ScontrinoQuantitativoArticolo(j)), 2, -1, 0, -1)&"</foto>"%>
<%Next%>
<FORM ACTION="carrello.asp" METHOD="POST">
<TABLE CELLPADDING=3 CELLSPACING=1 BORDER=0>
<TR>
<TH>
</TH>
<TH>
<font size=-1 color="#336699">
Codice
</font>
</TH>
<TH nowrap>
<font size=-1 color="#336699">
Descrizione
</font>
</TH>
<TH>
<font size=-1 color="#336699">
Importo &euro;
</font>
</TH>
<TH>
<font size=-1 color="#336699">
Q.t&agrave;
</font>
</TH>
<TH>
<font size=-1 color="#336699">
Totale &euro;
</font>
</TH>
</TR>
<TR><TD COLSPAN=6><HR SIZE=1></TD></TR>
<%
Dim Importo
Importo = 0
%>
<%Dim i%>
<%For i = 1 To QuantiArticoliInScontrino%>
<TR>
<TD ALIGN="center" bgcolor="#CCCCCC">

<INPUT TYPE="CHECKBOX" NAME="<%="checked" & CStr(i)%>" VALUE="ok" CHECKED> 
</TD>
<TD bgcolor="#CCCCCC" align="center">
<font size=-1>
<%=ScontrinoCodiceArticolo(i)%> 
</font>
</TD>
<TD nowrap bgcolor="#CCCCCC" align="center">
<font size=-1>
<%=ScontrinoDenominazioneArticolo(i)%> 
</font>
</TD>
<TD ALIGN="center" bgcolor="#CCCCCC">
<font size=-1>
 <%=FormatNumber(ScontrinoPrezzoArticolo(i), 2, -1, 0, -1)%>
</font>
</TD>
<TD ALIGN="center" bgcolor="#CCCCCC">

<INPUT TYPE="TEXT" NAME="<%="quantitativo" & CStr(i)%>" VALUE="<%=ScontrinoQuantitativoArticolo(i)%>" SIZE=2 MAXLENGTH=3>
</TD>
<TD ALIGN="center" bgcolor="#CCCCCC">
<font size=-1>
<%=FormatNumber((ScontrinoPrezzoArticolo(i) * ScontrinoQuantitativoArticolo(i)), 2, -1, 0, -1)%>

</font>
</TD>
</TR>

<tr>
<td colspan=6></td>
</tr>

<%Importo = Importo + (ScontrinoPrezzoArticolo(i) * ScontrinoQuantitativoArticolo(i))%>
<%Next%>
<TR><TD COLSPAN=6><HR SIZE=1>
  <p align="right"><font color="#008000">Spese di spedizione € </font><%=SpeseDiSpedizione%></TD></TR>
<TR>
<TD COLSPAN=5 ALIGN="RIGHT">
<font color="#008000">
Totale &euro;</font>
</TD>
<TD ALIGN="RIGHT">
<%=FormatNumber(Importo + SpeseDiSpedizione, 2, -1, 0, -1)%>
</TD>
</TR>
<TR><TD COLSPAN=6></TD></TR>
<TR><TD COLSPAN=6 ALIGN="RIGHT">
<INPUT TYPE="image" SRC="icons/recalc.gif" NAME="ricalcola" ALT="Ricalcola il totale">
[img]icons/order.gif[/img]
</TD>
</TR>
</TABLE>
</FORM>
<%End If
else%>
<H4>La sessione è scaduta. Torna all'Home Page</H4>
<%End If
%>
</TD></TR>
<TR><TD align=left>
</TD></TR></table>
</td>
    <td width="150" height="100%" rowspan="3" valign="top">
    

</td>
  </tr>
  <tr>
    <td width="450" height="20" align="center">
    <a href="termina_sess1.asp">
Torna al catalogo</a>-- chiudi</td>
  </tr>
  <tr>
    <td width="450" height="20"></td>
  </tr>
  <tr>
    <td width="100%" height="55" colspan="3" align="center">

penso che il controllo venga fatto nella parte in rosso
ripeto da solo il carrello funziona alla grande ma se volessi dirgli di eliminare un articolo senza sfruttare il form che sta nel suo interno come devo fare?????help me

grazieeeee

[crescenzo]

ragazzi mai possibile che nn c'è nessuno che possa aiutarmi in questa cosa
cioè adesso nel carrello c'è un form dove vengono cambiate quantità e attraverso di esso vengono anche eliminati gli articoli
il fatto è che adesso nn devo aprire il carrello ma voglio cmq sfruttare i calcoli che già fa
cioè cose devo inviargli oppure cosa cambiare x far si che la pag mi elimini un'articolo?????????
x voi deve essere una scemenza ma io sto uscendo pazzo
ciaooooooo e grazieeeeeee

[crescenzo]

ho provato a fare una cosa del genere ho eliminato il form e ho messo

<%
Dim mio
mio=request.form("checked1")
Response.Write "checked1=" & mio

%>
nel carrello.asp
e da un'altra pag gli invio la var cheked1
ho provato a far stampare la var che gli invio con un response
ottenedo una cosa del genere
checked1=ok
la var che gli invio la prende ma nn succede niente
ho lasciato il pulsante del ricalcola anche se faccio fare il ricalcolo adesso mi elimina tutto xchè evidentemente vede le var checked1 checked2 nulle

[crescenzo]

up
incredibile sto fondendo
con questo carrello

[crescenzo]

scusatemi se insisto ma almeno vorrei sapere se la cosa è fattibile o meno altrimenti mi rincoglionisco inutilmente

è possibile utilizzare il ciclo per il ricalcolo dall'esterno?????????

[crescenzo]

nn c'è nessun anima pia??!!!!?!?!?!
vi offro un gran caffè dopo prometto
mai possibile sono invisibile qui mi sto facendo una discussione da solo vedete che stò schlerando
help Me

[crescenzo]

neanche una rispostina???????
nn ci sono neanche i moderatoriii Roby??

[crescenzo]

up

[crescenzo]

nn chiedo di controllare il mio codice un pò lungo è scocciante da leggere ma almeno qualcuno sa dirmi se in ogni caso posso nn utilizzare il form x eliminare un articolo dal carrello????
se si come?? magari inviandogli una var checked(i)="no" o nulla
ho provato in vari modi ma evidentemente sbaglio qualcosa
penso che si possa fare
solo che nn sono un'esperto anzi direi che quasi nn ci capisco niente
qualcuno ha un attimino (anche x mandarmi a quel paese magari)
o pretendo troppo
grazie

[crescenzo]

devo desistere???????????
grazie lo stesso