dal 2005 produzione calzature con Professionalità,Qualità e Raffinatezza

<% Txt_Categoria="" ID_Categoria=Controlla_Numero(request("ID_Cat")) sql="Select reparti.*,categorie.* from reparti INNER JOIN categorie on reparti.ID_Reparto=categorie.ID_Reparto where categorie.ID_Categoria="&ID_Categoria CN.Open Set RS=CN.execute(sql) if not RS.eof then Txt_Categoria=RS("Reparto")&" > "& RS("Categoria") RS.close function Controlla_Numero(x) if len(x)=0 then x=0 if not isnumeric(x) then x=0 end if Controlla_Numero=x end function ID_Reparto=Controlla_Numero(request("ID_reparto")) ID_Categoria_Ric=Controlla_Numero(request("ID_Categoria_Ric")) Marca=request("Marca") Genere=request("Genere") Stile=request("Stile") Altro=request("Altro") %>

Funzionalità:

<%=Txt_Categoria%>

<% sql="Select prodotti.* FROM prodotti INNER JOIN categorie ON prodotti.ID_Categoria=categorie.ID_categoria" sql=sql&" WHERE prodotti.ID_Negozio="&ID_Negozio if ID_Categoria>0 then sql=sql&" AND prodotti.ID_Categoria="&ID_Categoria if ID_Reparto>0 then sql=sql&" AND categorie.ID_Reparto="&ID_Reparto if ID_Categoria_Ric>0 then sql=sql&" AND prodotti.ID_Categoria="&ID_Categoria_Ric if len(Marca)>0 then sql=sql&" AND prodotti.Marca like '"&Marca&"'" if len(Genere)>0 then sql=sql&" AND prodotti.Genere like '"&Genere&"'" if len(Stile)>0 then sql=sql&" AND prodotti.Stile like '"&Stile&"'" select case Altro case "Novità" sql=sql&" AND prodotti.Novita='Si'" case "In Offerta" sql=sql&" AND prodotti.sconto>30" case "Outlet" sql=sql&" AND prodotti.sconto>40" case "Fino a €150" sql=sql&" AND prodotti.prezzo_scontato<20" case "da €150 a €500" sql=sql&" AND prodotti.prezzo_scontato>20 and prodotti.prezzo_scontato<50" case "da €500 a €1500" sql=sql&" AND prodotti.prezzo_scontato>50 and prodotti.prezzo_scontato<100" case "oltre €1500" sql=sql&" AND prodotti.prezzo_scontato>100 and prodotti.prezzo_scontato<100000" end select sql=sql&" order by prodotti.ordine" set RS=CN.execute(sql) i=0 do while not RS.eof If i=0 or i=4 then response.write "" if i=4 then i=0 i=i+1 Foto="img/foto_nd.jpg" sql_foto="Select * from prodotti_foto Where ID_Prodotto="&RS("ID_Prodotto") &" order by ordine" Set RS_Foto=CN.execute(sql_foto) if not RS_Foto.eof then Foto=Pat_File_Pubblic&RS_Foto("Foto") Img_Disponibibile="img/ico2_okdispo_it[1].jpg" Txt_Disponibile="disponibile" if RS("Disponibile")="No" then Img_Disponibibile="img/ico-ordinabile.jpg" Txt_Disponibile="ordinabile" end if %> <% if i=4 then response.write "" RS.movenext loop RS.close CN.close if i<4 then for n=i to 3 response.write "" next response.write "" end if %>

<%if RS("Novita")="Si" then%>

Novità

<%end if%>

-<%=RS("Sconto")%>%

<%=RS("Marca")%>

<%=RS("Marca")&" - "&RS("Prodotto")%>

Listino
€ <%=RS("Prezzo")%>

€ <%=RS("Prezzo_Scontato")%>

logo faby small

FABY di Fabiola Ferracuti
Contrada Forche di Tenna
63020 MONTOTTONE (FM) - ITALY
Tel./Fax +39 0734 773527
mail: info@fabyola.it

Richiedi informazioni tramite il nostro FORM