estrarre dati da db per FPDF- errore

[donaz]

Salve a tutti
Voglio produrre diverse pagine di un documento in PDF utilizzato FPDF. Alcuni dati presenti nel documento sono estratti da un db.
Lo script è così strutturato:

'Eseguo una select della tabella

sql = "SELECT * FROM dicio where numrichiesta=" & numrichiesta
Set rs = Server.CreateObject("ADODB.Recordset")
rs.Open sql, conn ,3,3

'avvio il ciclo per prendere i dati

do while not rs.EOF

codfiscdeb = rs("codfisc")
codfissogrl = rs("codfissogrl")
denomrl = rs("denomrl")
comunerl = rs("comunerl")
provrl = rs("provrl")
indrl = rs("indrl")
caprl = rs("caprl")
fonterl = rs("fonterl")
anno = rs("anno")
modello = rs("modello")
quadro = rs("quadro")

'Creo il PDF


Set pdf=CreateJsObject("FPDF")
pdf.CreatePDF()
pdf.SetPath("fpdf/")
pdf.SetFont "Times","",10
pdf.Open()
pdf.AddPage()
pdf.Cell 0,5,"aaaaaaaaaa.",0,1,"C"
pdf.SetFont "Times","",8
pdf.Cell 0,5,"bbbbbbbb",0,1,"C"
pdf.Cell 0,5,"cccccccc",0,1,"C"
pdf.SetFont "Times","",10
pdf.Cell 0,5," ",0,1,"C"
pdf.Cell 0,5," ",0,1,"C"
pdf.Cell 0,5,"Fattura n. /A.P.T. - A.G.P.",0,1
pdf.Cell 0,5," ",0,1
pdf.Cell 150,5,"Egr.Sig. - Spett.le ",0,1,"R"
pdf.Cell 150,5, + denomrl,0,1,"R"
pdf.Cell 150,5,"___________________",0,1,"R"
pdf.Cell 150,5,"___________________",0,1,"R"
pdf.Cell 150,5,"___________________",0,1,"R"
pdf.Cell 150,5,"___________________",0,1,"R"
pdf.Cell 0,5,"Documento di consegna",0,1,"C"
pdf.Close()



rs.MoveNext
Loop

rs.Close
set rs = Nothing
conn.Close
set conn = Nothing


Così come è lo script va in timeout per eccessivo tempo di esecuzione provando ad interrompere il ciclo così da fermalo sulla prima tornata il risultato è questo:

3 0 obj
<</Type /Page
/Parent 1 0 R
/Resources 2 0 R
/Contents 4 0 R>>
endobj
4 0 obj
<</Length 832>>
stream
2 J
0.57 w
BT /F1 10.00 Tf ET
BT 208.35 803.45 Td (aaaaaaaaaaaaa) Tj ET
BT /F1 8.00 Tf ET
BT 227.54 789.88 Td (bbbbbbbbbbbb) Tj ET
BT 234.31 775.71 Td (cccccccccccc) Tj ET
BT /F1 10.00 Tf ET
BT 296.39 760.93 Td ( ) Tj ET
BT 296.39 746.76 Td ( ) Tj ET
BT 31.19 732.59 Td (Fattura n. /A.P.T. - A.G.P.) Tj ET
BT 31.19 718.41 Td ( ) Tj ET
BT 376.82 704.24 Td (Egr.Sig. - Spett.le ) Tj ET
BT 107.70 690.07 Td (ISTITUTO ) Tj ET
BT 355.71 675.89 Td (___________________) Tj ET
BT 355.71 661.72 Td (___________________) Tj ET
BT 355.71 647.55 Td (___________________) Tj ET
BT 355.71 633.37 Td (___________________) Tj ET
BT 213.07 619.20 Td (documento di consegna

pdf.Output()


Di fatto ci sono due problemi quello che non riesce ad eseguire l'attività entro un certo tempo e poi quello che non visualizza il pdf ma una pagina con i dati interpretati del pdf (credo!).

Come posso risolvere questi problemi?

Grazie

[heroes3]

devi impostare il content type della pagina a application/pdf
e devi necessariamente aumentare il tempo di esecuzione della pagina tramite comando
timeout = 500 ad esempio (è in secondi se non ricordo male)

[donaz]

Se ho capito bene quello che mi dici devo aggiungere questo in testa alla pagina:

<meta http-equiv="Content-Type" content="application/pdf; charset=windows-1252">

E' giusto?

[donaz]

Ho provato e la risposta è NO. Infatti non con quella istruzione inserita la pagina non viene eseguita.

Qual'è il formalismo corretto?

[donaz]

Scusate ma a piccoli passi forse si riesce a vedere la luce.
Ho trovato una vecchia discussione sul tema in questione e lì c'è appunto il riferimento al content Type. Ho inserito questa modifica allo script però ora mi viene la pagina bianca.
......
%>

<%Response.ContentType="application/pdf"%>
<%
Set pdf=CreateJsObject("FPDF")
pdf.CreatePDF()
pdf.SetPath("fpdf/")
pdf.SetFont "Times","",10
pdf.Open()
pdf.AddPage()
.....


Perchè?

[donaz]

Risolto anche questo piccolo problema avevo per errore remmato il case all'interno del quale produce il pdf. Ora però ho questo problema lancio lo script e resta fermo in elaborazione per un bel pò di tempo senza arrivare alla conclusione.
Ho elevato il timeout fino a 900 è troppo oppure sta eseguendo un loop infinito?

Di fatto la barra di progresso resta a meta.

[donaz]

Risolto anche questo.

Ora ho da lavorare sui valori che prendo dal db perchè non mi stanno nello spazio disegnato nel pdf.

grazie

[calsdn]

Cosa era che non andava ... che mandava in time-out? Ora sono curioso.

ciao