<% Response.Status = "301 Moved Permanently" Response.AddHeader "Location", "http://www.quarrataforniture.com/" %> <% idlingua=1 home=1 %> Macchine per tappezzeria Quarrata forniture

Cerca per nome:

Cerca per tipologia di produzione:

<% set prog=conn.execute("select * from prodotti where attivo=0 and home=1 and idlingua="&idlingua&" order by data desc, rand() limit 0,5") do while not prog.eof idprodotti=prog("idprodotti") idcat=prog("idcat") set cat=conn.execute("select * from categorie_prodotti where idcat="&idcat&" and idlingua="&idlingua) if not cat.eof then categoria=UCASE(cat("titolo")) cartella=replace(cat("titolo")," ","-") cartella=replace(cartella,"'","-") end if cat.close titolo=prog("titolo") desc=prog("corpo") if desc <> "" then desc=sHTMLtoTXT(desc) desc=anteprima(desc,30) end if filename= ConvertiTitoloInNomeScript(Titolo, IDprodotti) set alle=conn.execute("select * from allegati where idprodotti="&idprodotti&" and idlingua="&idlingua&" and tipo=0 order by id asc") if not alle.eof then allegato=replace(alle("allegato")," ","%20") Set objImageSize = New ImageSize With objImageSize .ImageFile = Server.MapPath("\public\"&allegato) if .ImageWidth>.ImageHeight then respo=" width=""300"" " else respo="height=""300""" end if End With Set objImageSize = Nothing else allegato="" end if alle.close if allegato<>"" then %>
<%=titolo%> />

<%=categoria%>

<%=titolo%>

<%=desc%>

<% end if prog.movenext loop prog.close %>
<% set cont=conn.execute("select * from contenuti where idcat=2 and data_fine>curdate() and idlingua="&idlingua&" order by data asc LIMIT 0,2") do while not cont.eof titolo=cont("titolo") data=kaos_date("%D %M %Y",cont("data")) corpo=cont("corpo") desc=sHTMLtoTXT(corpo) desc=anteprima(desc,20) %>

<%=titolo%>

<%=desc%>

<%cont.movenext loop cont.close %>

QUARRATA FORNITURE

Macchine per tappezzeria

Quarrata forniture progetta e realizza una gamma completa di macchine per tappezzeria, indispensabili nella lavorazione di divani e poltrone, materassi o sedie da ufficio e capaci di affiancare artigiani e lavoratori in ogni fase della lavorazione.
Le macchine per tappezzeria progettate da Quarrataforniture sono pensate per standardizzare la qualità del prodotto, tutelare la salute e la sicurezza del lavoratore, contenere l'impatto ambientale dell' insediamento produttivo e abbattere i costi di produzione [leggi tutto...]

<% set cont=conn.execute("select * from contenuti where idlingua="&idlingua&" order by data desc") if not cont.eof then idcat=cont("idcat") if idcat=1 then sezione="FAIRS" else sezione="NEWS" end if titolo=cont("titolo") idcontenuti=cont("idcontenuti") data=kaos_date("%D %M %Y",cont("data")) corpo=sHTMLtoTXT(cont("corpo")) strtext=anteprima(corpo,40) filename= ConvertiTitoloInNomeScript(Titolo, IDcontenuti) set allegato=conn.execute("select * from allegati where idcontenuti="&idcontenuti&" and tipo=0 and idlingua="&idlingua&" order by idallegati asc") if not allegato.eof then immagine=allegato("allegato") if immagine <> "" then immagine=immagine else immagine="logo.gif" end if end if allegato.close %>

<%=sezione%>

<%=titolo%>

<%=strtext%>

<%cont.movenext end if cont.close %>
>