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

Rappresentiamo le ditte più importanti di kits inglesi, americani e francesi a punto croce e a mezzo punto, in lana, cotone e seta. E' nostro grande successo realizzare Canovacci dipinti a mano, riproducendo qualsiasi oggetto: cani, gatti, cavalli, ville, stoffe antiche, damaschi, fiori, verdure, stemmi araldici, corone, piatti, vasi, barche automobili e tutti gli sports, sia su vostra indicazione che fornendoci una fotografia o schizzo del soggetto.

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