Un generatore di report RTF

7 pagine in totale: <<Indietro 1 2 3 4 5 6 [7]

Usare il generatore

Per utilizzare il generatore è sufficiente includere il codice ASP dello stesso, quindi richiamare le singole funzioni. Un esempio di generazione di un report molto semplice è il seguente:

<%
Dim fileTag
Dim fileReport
' apro una connessione ad un database e creo un recordset
' ---- OMISSIS
' inizializzo il report
fileTag = Server.MapPath("Tag.Lst")
Set fileReport = IniziaReport( Server.MapPath("report.rtf"), fileTag )
ImpostaLandscape fileReport, fileTag
InserisciTabellaStili fileReport, fileTag
IniziaStile fileReport, fileTag, "Titolo1"
ScriviLineaACapo fileReport, fileTag, "Report di verifica"
ChiudiStile fileReport, fileTag
IniziaStile  fileReport, fileTag, "Normale"
' imposto le tabulazioni
ImpostaTabulazione fileReport, fileTag, 20
ImpostaTabulazione fileReport, fileTag, 40
ImpostaTabulazione fileReport, fileTag, 60
ImpostaTabulazione fileReport, fileTag, 80
IniziaLinea fileReport, fileTag
' visualizzo i titoli
InserisiciTab fileReport, fileTag
ScriviLinea fileReport, fileTag, "colonna 1"
InserisiciTab fileReport, fileTag
ScriviLinea fileReport, fileTag, "colonna 2"
InserisiciTab fileReport, fileTag
ScriviLinea fileReport, fileTag, "colonna 3"
InserisiciTab fileReport, fileTag
ScriviLinea fileReport, fileTag, "colonna 4"
FinisciLinea fileReport, fileTag
ScriviLineaACapo fileReport, fileTag, ""
' ciclo e stampo tutti i dati
Do While Not recordset.Eof
  IniziaLinea fileReport, fileTag
  InserisiciTab fileReport, fileTag
  ScriviLinea fileReport, fileTag, recordset.Fields("primo")
 
  InserisiciTab fileReport, fileTag
  ScriviLinea fileReport, fileTag, recordset.Fields("secondo")
 
  InserisiciTab fileReport, fileTag
  ScriviLinea fileReport, fileTag, recordset.Fields("terzo")
 
  InserisiciTab fileReport, fileTag
  ScriviLinea fileReport, fileTag, recordset.Fields("quarto")
 
  FinisciLinea fileReport, fileTag
  recordset.MoveNext
 
Loop
' eventuali totali etc.
%>

Ovviamente perchè funzioni occorre che il codice presentato sia incluso nel file o scritto in un qualunque file ASP tra i tag

<SCRIPT LANGUAGE=JSCRIPT> </SCRIPT>
e poi tale file sia incluso tramite un semplice
<!--include ?-->
.

7 pagine in totale: <<Indietro 1 2 3 4 5 6 [7]

Contenuti dell'articolo

Commenti
Dai un voto a questo articolo, ci aiuterà a migliorare il nostro sito (1 è il voto minimo, 5 il massimo).

Per procedere al rating dell'articolo devi essere autenticato.

Aggiungi un nuovo commento »»»
Per inserire un commento, devi registrarti alla nostra community.


TUTORIALS
TOP TEN ARTICOLI
NOTIFICHE

Iscriviti alla nostra newsletter nuoviarticoli per ricevere e-mail le notifiche!

Indirizzo e-mail:
PROVIDER ASP.NET 2.0

Seleziona il database per avere il web.config pronto per Membership, Roles e Profile API.



IN EVIDENZA
MISC