Hi Alessio,

The following code determines the number of pages in the report and sends the report to the printer:

Private pnPages
Local lcFile
pnPages = 0
lcFile = Sys(3)+".Tmp"
Report Form myReport to File (m.lcFile) Noconsole
Erase (m.lcFile)
pnPages = _PAGENO
Report Form myReport to Printer Noconsole

Within the report use pnPages to refer to the total. In the October issue of FoxPro Advisor there's an article that covers this topic more in depth.

Christof

>I want to know how many pages are in a report to write at the top of at the bottom of each page ' page (_pageno) of (number of pages)
>How can I do ?
>Thanks
>Alessio