Ciao potreste aiutarmi?
Dovrei inserire dei dati proveniente da una database (memo, numeri, testo, data) in un pdf.
Questo è il codice che ho usato ma per il campo memo ho un errore.
Me lo inserisce su una sola riga lunghissima che esce fuori al foglio pdf.
Come potrei risolvere?
Vi ringrazio
codice:
<%@language=vbscript%>
<%
Dim ConnMedit1
Set ConnMedit1 = Server.CreateObject("ADODB.Connection")
connMedit1.Open "driver={Microsoft Access Driver (*.mdb)};dbq=" & server.mappath("/mdb-database/meditazioni.mdb")
Dim rsMedit1
Set rsMedit1 = Server.CreateObject("ADODB.Recordset")
rsMedit1.Open "select top 1 * from meditazioni order by id desc", connMedit1
medit1 = rsMedit1("meditazione")
titoloMedit1 = rsMedit1("titolo")
dataMedit1 = rsMedit1("data")
autoreMedit1 = rsMedit1("autore")
clickMedit1=rsMedit1("click")
RSMedit1.Close
Set RSMedit1=Nothing
connMedit1.Close
Set connMedit1=Nothing
Set pdf=CreateJsObject("FPDF")
pdf.CreatePDF()
pdf.SetPath("fpdf/")
pdf.SetFont "Arial","I",10
pdf.Open()
pdf.Cell 80,100," "&titoloMedit1&" ",0
pdf.Text 10,15," "&medit1&" ",0
pdf.Cell 80,100," "&dataMedit1&" ",0
pdf.Close()
pdf.Output()
%>