Categoria Categoria
<% listboxlavorati.display %>
<% btnRicerca.display %>
<% 'Response.Write session("sql")
if len(session("sql"))>0 then
rs.Open session("sql"),conn,3,3%>
<%if rs.RecordCount =0 then%>
<% else%>
<%do while not rs.EOF %>
<%=ucase(rs("Descrizione"))%> <%=ucase(rs("Descrizione"))%>
<%=FormatCurrency(rs("prezzo"))%> <%=FormatCurrency(rs("prezzo"))%>
<%Txtquantita.name="T" & trim(Rs("id_prodotto") )
Txtquantita.id =trim(Rs("id_prodotto"))
Txtquantita.value =0%>
<% Txtquantita.display %>
<% btncarrello.display %>
<%rs.MoveNext %>
<% loop%>
<% end if
%>
<% end if
%>