avevo già aperto una discussione in merito. ho un sito che ha una pagina di ricerca avanzata in asp che rimanda alla pagina asp che gestisce le query. qui sotto c'è il codice delle richeste gestite da prodotti asp. come posso fare una ricerca per prezzo (metterò un campo di input testuale nella pagina della ricerca)?.
<%
pag=request.Querystring("pag")
TipoProdotto=request.querystring("tipoprodotto")
Produttore=request.QueryString("produttore")
BIO=request.QueryString("BIO")
dimpag=12
if isnull(pag) or pag="" then
pag=1
else
pag=Cint(TRIM(pag))
end if
if TipoProdotto="X" then
'la 1 volta �= X x via della pag. ricercaprodotti le pag. successive �di nuovo = X
'x via del querystring
' prendo i parametri da response.form , se sono vuoti allor li prendo da session
' non salvo la sqlstr in un session x non trovarmi eventuali session di ricerche precedenti
' salvando i response.form dei vari parametri son sicuro di avere sempre quelli giusti
' non carico nemmeno prima da session xch�potrei avere dati sporchi
idStato=request.form("Stato")
dsProduttore=request.form("produttore")
TipoProdottoRicerca=request.form("catcomm")
Novita=request.form("novita")
Codice=replace(request.form("codice"),"'","''")
Descrizione=replace(request.form("descrizione"),"' ","''")
Foto=request.Form("foto")
if idstato="tutti" then idstato=""
if dsproduttore="tutti" then dsproduttore=""
if tipoprodottoricerca="tutti" then tipoprodottoricerca=""
'Se tutti i parametri son vuoti allora sono nella pag. > 1 della ric avanzata
'quindi ho i valori salvati su session
if idstato="" and dsproduttore="" and tipoprodottoricerca="" and novita="" and codice="" and foto="" and descrizione="" then
'prendo da session
idstato=Session("idstato")
dsproduttore=session("dsproduttore")
tipoprodottoricerca=session("tipoprodottoricerca")
novita=session("novita")
codice=session("codice")
foto=session("foto")
descrizione=session("descrizione")
else
'salvo su session
session("idstato")=idstato
session("dsproduttore")=dsproduttore
session("tipoprodottoricerca")=tipoprodottoricerca
session("novita")=novita
session("codice")=codice
session("foto")=foto
session("descrizione")=descrizione
end if
'Sto facendo una ricerca avanzata
sqlstr=" SELECT codice,descrizione,prezzo,disponibile,confezione FROM PRODOTTI" & _
" where idStato like '" & idStato & "%'" & _
" and dsProduttore like '" & dsProduttore & "%'" & _
" and TipoProdotto like '" & TipoProdottoRicerca & "%'" & _
" and codice like '" & Codice & "%'" & _
" and descrizione like '" & descrizione & "%'"
if novita="1" then sqlstr=sqlstr & " and nuovo "
if foto="1" then sqlstr=sqlstr & " and foto "
else
if tipoprodotto<>"" and produttore="" then
'Vuol dire che sto facendo una ricerca SOLO x cat.commerciale
sqlstr=" SELECT codice,descrizione,prezzo,disponibile,confezione FROM PRODOTTI" & _
" where idtipoprodotto in (" & TipoProdotto & ") "
if bio="1" then
sqlstr=sqlstr & " and bio"
elseif bio="0" then
sqlstr=sqlstr & " and not bio"
end if
sqlstr=sqlstr & " ORDER BY idtipoprodotto, CODICE"
elseif tipoprodotto<>"" and produttore<>"" then
'Vuol dire che sto facendo una ricerca x cat.commerciale e produttore
sqlstr=" SELECT codice,descrizione,prezzo,disponibile,confezione FROM PRODOTTI" & _
" where idtipoprodotto in (" & TipoProdotto & ") and codproduttore in (" & produttore & ") "
if bio="1" then
sqlstr=sqlstr & " and bio"
elseif bio="0" then
sqlstr=sqlstr & " and not bio"
end if
sqlstr=sqlstr & " ORDER BY idtipoprodotto, CODICE"
elseif tipoprodotto="" and produttore<>"" then
'Vuol dire che sto facendo una ricerca SOLO x produttore
sqlstr=" SELECT codice,descrizione,prezzo,disponibile,confezione FROM PRODOTTI" & _
" where codproduttore in (" & produttore & ") "
if bio="1" then
sqlstr=sqlstr & " and bio"
elseif bio="0" then
sqlstr=sqlstr & " and not bio"
end if
sqlstr=sqlstr & " ORDER BY idtipoprodotto, CODICE"
end if
end if
openConnectionArticoli
set rs=server.createobject("ADODB.Recordset")
'response.Write(sqlstr)
rs.open sqlstr,ObjConn,3,3
nr=0
if not rs.eof then
rs.movelast
nr=rs.recordcount
rs.pagesize=dimpag
pagine=rs.pagecount
rs.movefirst
end if
if nr<0 then nr=0
%>
</p>
<table width="55%" border="0" align="left">
<tr>
<td width="43%"><div align="left"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Articoli
trovati:<%=nr%></font></div></td>
<td width="57%"><div align="left"><font size="1"><font face="Verdana, Arial, Helvetica, sans-serif">pag.
<%=pag%> su <%=pagine%></font></font></div></td>
<td width="28%"> <%
if pag>1 then
href="<div align=right><img src=images/prev_lm.gif border=0></div>"
response.write href
end if
%> </td>
<td width="29%">
<%
if pag<pagine then
href="<div align=right><img src=images/next_lm.gifborder=0></div>"
response.write href
end if
%>
</td>
</tr>
</table>
</p>
<form action="AddCarrello.asp" method="post" id="tabella">
<hr>
<table width="98%" border="0" align="center">
<tr>
<td width="22%" height="18"></td>
<td width="34%"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Descrizione</font></td>
<td width="8%"><div align="right"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Pezzi</font></div></td>
<td width="11%"><div align="right"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Prezzo</font></div></td>
<td width="11%"><div align="right"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Disponibile</font></div></td>
<td width="14%"><div align="right"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">Qta</font></div></td>
</tr>
<%
if not rs.eof then
rs.absolutepage=pag
for i=1 to rs.pagesize
if not rs.eof then
codice=rs("codice")
descrizione=rs("descrizione")
Prezzo=rs("prezzo")
prezzo=formatnumber(prezzo,,,,-2)
Disponibile=rs("disponibile")
Conf=rs("confezione")
if isfoto(codice) then
' response.write("<tr bgcolor=#FFFF99>")
nomeimmagine= codice & ".jpg"
else
' response.write("<tr bgcolor=#FFFFFF>")
nomeimmagine="vuoto.jpg"
end if
%>
<tr bgcolor="#CCCCCC"><td rowspan="3">[img]components/com_virtuemart/shop_image/product/<%=nomeimmagine%>[/img]</td>
<td height="21"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=Codice%>
<input name="Articolo" type="hidden" id="Articolo" value=<%=Codice%>>
</font></td>
<td>
<div align="right"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=Conf%></font></div>
</div></td>
<td><div align="right"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=Prezzo%></font></div></td>
<td><div align="right"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=disponibile%></font></div></td>
<td> <div align="right"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="Qta" style=font-size:11px;width:30px align="left"type="text" id="Qta" value="" size="3" maxlength="3">
</font></div></td>
</tr>
<tr>
<td rowspan="2" valign="top"><font size="1" face="Verdana, Arial, Helvetica, sans-serif"><%=descrizione%></font></td>
<td height="19"></td>
<td></td>
<td></td>
<td></td>
</tr>
<tr>
<td height="38"></td>
<td></td>
<td></td>
<td></td>
</tr>
<%
rs.movenext
end if
next
end if
rs.close
objconn.close
set rs=nothing
%>
</table>
<table width="28%" border="0" align="center">
<tr>
<td width="55%"><font size="1" face="Verdana, Arial, Helvetica, sans-serif">
<input name="imageField" type="image" src="images/carrello.gif" alt="Aggiungi al carrello" width="95" height="33" border="0">
</font></td>
<td width="21%"> <div align="right">
<%
if pag>1 then
href="<div align=right><img src=images/prev_lm.gif border=0></div>"
response.write href
end if
%>
</div></td>
<td width="24%"> <div align="left">
<%
if pag<pagine then
href="<div align=right><img src=images/next_lm.gifborder=0></div>"
response.write href
end if
%>
</div></td>
</tr>
</table>
Rispondi quotando