<% if len(request.Cookies("quantita"))>0 then arrQT=split(request.Cookies("quantita"),",") arrPROD=split(request.Cookies("carrello"),",") For i=0 to ubound(arrPROD) arrCARR(arrPROD(i))=arrQT(i) next strSQL="SELECT p.articolo,p.idp_prodotto,p.prezzo_c,p.prezzo_r,p.peso," _ & "p.descrizione,p.foto1,c.categoria " _ & "FROM prodotti AS p INNER JOIN categorie AS c ON p.idf_categoria=c.idp_categoria " _ & "WHERE idp_prodotto in (" _ & request.Cookies("carrello") & ")" set conn=OpenDatabase() set rs=conn.execute (strSQL) i=0 do while not rs.eof if request.Cookies("typeCLIE")="rivenditore" then tmpPREZZO_E=formatnumber((cdbl(rs("prezzo_r"))),2) else tmpPREZZO_E=formatnumber((cdbl(rs("prezzo_c"))),2) end if if rs("foto1")<>"0" then tmpFOTO=rs("idp_prodotto") & "_1.jpg" else tmpFOTO="ND.jpg" end if %> <% tmpTOTALE=cdbl(tmpTOTALE) + cdbl(tmpPREZZO_E)*cint(arrCARR(rs("idp_prodotto"))) tmpPESO=cdbl(tmpPESO) + cdbl(rs("peso"))*cint(arrCARR(rs("idp_prodotto"))) i=i+1 rs.movenext loop rs.close conn.close set rs=nothing set conn=nothing end if %>

Elimina	Foto	Prodotto	Qt	Peso (gr)	Prezzo unitario
		<%= chr(160) & rs("categoria") & " " & rs("articolo") %> ">	" size="3" maxlength="3">	<%= rs("peso") %>	<%= "Euro " & tmpPREZZO_E %>

<% if tmpPESO<=50000 then %> <% else %> Per gli ordini superiori ai 50 Kg è necessario contattare l'azienda. Email. info@laluisa.com Tel. +39 0774.53.28.38 <% end if %>