I forum Ricerca FAQ
Fai una domanda
Ultimo messaggio
Luca1317
Luca1317
l'1 maggio 2006 alle 01:13
23 messaggi dal 01 maggio 2006
Ho un problema con la classe fpdf...mi restituisce tutti i ercord che ho nel database ma sempre il primo (me lo ripete tante volte quanti record ho):

<%@language=vbscript%>
<!--#include file="print/fpdf.asp"-->
<!--#include file="Connection\conn.asp"-->
<%




//E creo il recordset
Set Rec = Server.CreateObject ("ADODB.Recordset")
//Scrivo la mia query sql
sql = "SELECT * FROM tab order by ID DESC"
Rec.Open sql, Conn, 3, 3



Dim i,pdf

  valore1= Rec("valore1")
  

Set pdf=CreateJsObject("FPDF")
pdf.CreatePDF()
pdf.SetPath("stampa/fpdf/")

pdf.Open()

pdf.AddPage()
pdf.SetDisplayMode("fullpage")
pdf.SetFont "Times","",12

While Not rec.EOF

  pdf.Cell 40,10,valore1
  
Rec.MoveNext
Wend

pdf.Close()
pdf.Output()

Rec.Close
set Rec = Nothing
conn.Close 
set conn = Nothing

%>
RispondiQuoting
ermes_1
ermes_1
l'1 maggio 2006 alle 03:16
4 messaggi dal 30 aprile 2006
Ciao,
nel ciclo while fai stampare sempre lo stesso valore.
Sostituisci con :


While Not rec.EOF

pdf.Cell 40,10,Rec("valore1")

Rec.MoveNext
Wend


Saluti.
RispondiQuoting
Luca1317
Luca1317
l'1 maggio 2006 alle 12:28
23 messaggi dal 01 maggio 2006
hai perfettamente ragione!!!

grazie
RispondiQuoting
Luca1317
Luca1317
l'1 maggio 2006 alle 12:58
23 messaggi dal 01 maggio 2006
Apprifitto del 3d su fpdf per chiedere se c'è una soluzione al baco dell'allineamento...

in pratica
pdf.Cell 15,5,rec("valore"),1,"L"
pdf.Cell 15,5,rec("valore"),1,"C"
pdf.Cell 15,5,rec("valore"),1,"R"

li allinea sempre a sinistra
mentre col multicell si comporta bene

se non sbaglio un ragazzo francese risolse la cosa sostituendo qlcosa in qlche script dentro la classe fpdf.
RispondiQuoting

Torna al forum | Feed RSS

ASPItalia.com non è responsabile per il contenuto dei messaggi presenti su questo servizio, non avendo nessun controllo sui messaggi postati nei propri forum, che rappresentano l'espressione del pensiero degli autori.