Ciclo, un parere

[Lan]

Ciao a tutti,

Ho un problema che mi angoscia un pò perchè è diversi giorni che provo a venirne a capo ma niente da fare...

devo far passare da una pagina asp a una mail o a un pdf un carrello prodotti e non capisco come fare perchè la tabella del carrelo è composta da questi campi:
idutente
prodotto
prezzo
quantita

e quando vado a visualizzare il carrello nella pagina mi tira su tutti i record di quel utente (fino a qui zero problemi) i problemi escono quando devo passarli alla mail o al pdf...
Non capisco come fare perchè la variabile prodotto naturalmente tira su solo il primo di prodotto e non gli altri che possono esserci...
Inoltre, la mail deve, per questione di policy sul server, crearsi attraverso outlook o programma simile quindi deve passare via form e non so come creare tante variabili prodotto quanti sono i record...
Qualcuno ha qualche suggerimento???
Io ho pensato ad un ciclo però sinceramente non saprei come impostarlo...
perchè dovrei fare un count dei record e da li lavorare con un ciclo for next penso...però anche li ho dei dubbi perche sinceramente non so se il ciclo for next mi da la possibilita di dirgli ok se ci sono 5 record creami 5 variabili prodotto...

[asdfgasdfg]

i = 0
do while not rs.eof
prodotto(i) =rs("prodotto")
i = i + 1
rs.movenext
loop

[Lan]

ok ma facendo così poi quando vado a inviare i dati, come devo fare per fargli tirar su tutte le variabili prodotto(i)???
gli dico praticamente che per ogni prodotto(i) mi deve creare il campo prodotto(I) giusto???
e lo stesso vale per prezzo e quantità????

[asdfgasdfg]

for i = o to ubound(prodotti)
...............
next

[stonati]

L'array prodotto(i) potresti inserirlo in una var di sessione e poi puoi rileggerlo con il ciclo dove vuoi
For i = 0 To UBound(prodotti)
Response.Write (prodotto(i))
Next

[Lan]

ti posto il codice, mi dici se ho scritto bene??
perchè non mi tira su niente eppure la query è ok:

sqlMail = "SELECT cart.cart_id, t_ListinoSelect.Item_Name, t_ListinoSelect.Part_Number, " &_
"cart.cart_quantity, " &_
"cart.cart_prezzo " &_
"FROM cart INNER JOIN t_ListinoSelect ON cart.cart_productID = t_ListinoSelect.ID " &_
"WHERE cart.cart_userID= " & userID & " " &_
"ORDER BY cart_id DESC"
SET RSMail = Con.Execute( sqlMail )

IF RSMail.EOF THEN
for i = o to ubound(Item_Name)
i = 0
do while not rs.eof
prodotto(i) =RSMail("Item_Name")
i = i + 1
rs.movenext
loop
next

%>
<form method="post" action="mailto:xxx@xx.it">
<input type="hidden" name="psw" value="<%=request( "psw" ) %>" />
<input name="<%=prodotto(i)%>" type="hidden" value="<%=prodotto(i)%" />
<input type="submit" value="Invia mail">
<%
else
%>
nonfunzia
<%
end if
%>

[Lan]

Scusate,
rs.movenext è rsmail.movenext...

cmq il risultato è sempre non funzia...

[stonati]

<form method="post" action="mailto:xxx@xx.it"> 
<input type="hidden" name="psw" value="<%=request( "psw" ) %>" /> 
<% For i = 0 To UBound(prodotto) %>
<input name="<%=prodotto(i)%>" type="hidden" value="<%=prodotto(i)%" /> 
<% Next %>
<input type="submit" value="Invia mail"> 
<% 
else 
%> 
nonfunzia 
<% 
end if 
%>

[Lan]

cosi non funziona lo stesso...

[stonati]

Prova così.....

<%
IF RSMail.EOF THEN 
i = 0 
do while not rs.eof 
prodotto(i) =RSMail("Item_Name") 
i = i + 1 
RSMail.movenext 
loop 

%> 
<form method="post" action="mailto:xxx@xx.it"> 
<input type="hidden" name="psw" value="<%=request( "psw" ) %>" /> 
<% For i = 0 To UBound(prodotto) %>
<input name="<%=prodotto(i)%>" type="hidden" value="<%=prodotto(i)%" /> 
<% Next %>
<input type="submit" value="Invia mail"> 
</form>
<% 
'Chiudi la connessione
else 
%> 
nonfunzia 
<% 
end if 
%>
<% 
'Chiudi la connessione
%>