<%@ Language=VBScript %> <% Con.open strSQL="SELECT * FROM tappeti_eng" 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,

We can furnish any kind of carpet: wool, crosssticth point, or midlle point, with a multiple of kits, handmade paintings on canvas made from the material and the design you wish. In our boutique you can even find a vast assortment of ready made carpets in many colours, sizes to choose from all embroidered by hand.
If you wish you can even buy all you need to make your own workcraft.
<%=titolo1%> <%=titolo2%> <%=titolo3%> <%=titolo4%>
<%=descrizione1%> <%=descrizione2%> <%=descrizione3%> <%=descrizione4%>
<%=titolo5%> <%=titolo6%> <%=titolo7%> <%=titolo8%>
<%=descrizione5%> <%=descrizione6%> <%=descrizione7%> <%=descrizione8%>
<%=(testo)%>