<%@ Language=VBScript %> <% Con.open strSQL="SELECT * FROM cuscini_ita" set objRS = Server.CreateObject ("ADODB.Recordset") objRS.Open strSQL,Con titolo1=objRS("titolo1") titolo1=server.htmlEncode(titolo1) titolo1=Replace(titolo1, vbcrlf, "
") titolo1=Replace(titolo1, " ", " ") titolo2=objRS("titolo2") titolo2=server.htmlEncode(titolo2) titolo2=Replace(titolo2, vbcrlf, "
") titolo2=Replace(titolo2, " ", " ") titolo3=objRS("titolo3") titolo3=server.htmlEncode(titolo3) titolo3=Replace(titolo3, vbcrlf, "
") titolo3=Replace(titolo3, " ", " ") titolo4=objRS("titolo4") titolo4=server.htmlEncode(titolo4) titolo4=Replace(titolo4, vbcrlf, "
") titolo4=Replace(titolo4, " ", " ") titolo5=objRS("titolo5") titolo5=server.htmlEncode(titolo5) titolo5=Replace(titolo5, vbcrlf, "
") titolo5=Replace(titolo5, " ", " ") titolo6=objRS("titolo6") titolo6=server.htmlEncode(titolo6) titolo6=Replace(titolo6, vbcrlf, "
") titolo6=Replace(titolo6, " ", " ") titolo7=objRS("titolo7") titolo7=server.htmlEncode(titolo7) titolo7=Replace(titolo7, vbcrlf, "
") titolo7=Replace(titolo7, " ", " ") titolo8=objRS("titolo8") titolo8=server.htmlEncode(titolo8) titolo8=Replace(titolo8, vbcrlf, "
") titolo8=Replace(titolo8, " ", " ") descrizione1=objRS("descrizione1") descrizione1=server.htmlEncode(descrizione1) descrizione1=Replace(descrizione1, vbcrlf, "
") descrizione1=Replace(descrizione1, " ", " ") descrizione2=objRS("descrizione2") descrizione2=server.htmlEncode(descrizione2) descrizione2=Replace(descrizione2, vbcrlf, "
") descrizione2=Replace(descrizione2, " ", " ") descrizione3=objRS("descrizione3") descrizione3=server.htmlEncode(descrizione3) descrizione3=Replace(descrizione3, vbcrlf, "
") descrizione3=Replace(descrizione3, " ", " ") descrizione4=objRS("descrizione4") descrizione4=server.htmlEncode(descrizione4) descrizione4=Replace(descrizione4, vbcrlf, "
") descrizione4=Replace(descrizione4, " ", " ") descrizione5=objRS("descrizione5") descrizione5=server.htmlEncode(descrizione5) descrizione5=Replace(descrizione5, vbcrlf, "
") descrizione5=Replace(descrizione5, " ", " ") descrizione6=objRS("descrizione6") descrizione6=server.htmlEncode(descrizione6) descrizione6=Replace(descrizione6, vbcrlf, "
") descrizione6=Replace(descrizione6, " ", " ") descrizione7=objRS("descrizione7") descrizione7=server.htmlEncode(descrizione7) descrizione7=Replace(descrizione7, vbcrlf, "
") descrizione7=Replace(descrizione7, " ", " ") descrizione8=objRS("descrizione8") descrizione8=server.htmlEncode(descrizione8) descrizione8=Replace(descrizione8, vbcrlf, "
") descrizione8=Replace(descrizione8, " ", " ") testo=objRS("testo") testo=server.htmlEncode(testo) testo=Replace(testo, vbcrlf, "
") testo=Replace(testo, " ", " ") objRS.Close Set objRS = Nothing Con.Close Set Con = Nothing %> La Bottega del Piccolo Punto ricami mezzo punto ricami punto croce ricami piccolo punto small embroidery point, embroidery point cross, embroidery means point,

Si montano cuscini in modo originale e molto accurato, con stoffe, sete, ricami e passamanerie
rarissime, antiche e moderne. Ogni vecchio cuscino può essere rimontato valorizzandone le caratteristiche. Curiamo in modo particolare le passamanerie e i fiocchi ed eseguiamo il lavoro interamente a mano.

<%=titolo1%> <%=titolo2%> <%=titolo3%> <%=titolo4%>
<%=descrizione1%> <%=descrizione2%> <%=descrizione3%> <%=descrizione4%>
<%=titolo5%> <%=titolo6%> <%=titolo7%> <%=titolo8%>
<%=descrizione5%> <%=descrizione6%> <%=descrizione7%> <%=descrizione8%>
<%=(testo)%>