Hello Marc

if you don't have a memo field in your report it's easy just do the math ;
how many records fit on the first page and how many fit on every page after that and whats the total number of records being printed

here is some sample code from one of my apps print routine

PNTotalP = 0 && total pages
ln_total = 0 && local total during adding
ll_again = .T.
DO CASE
&& I sql'ed the table for the report and _tally returns the number of records
&& my report holds 6 records on the first page and 8 on the rest
	CASE _TALLY <= 6 
		PNTotalP = 1
		ll_again = .F.
	CASE _TALLY >6
		PNTotalP = 1
		ln_total = _TALLY - 6  && This will give us the remaining records to count.

		DO WHILE ll_again && More than 7 records exist on the order.
			IF ln_total > 8
				PNTotalP = PNTotalP + 1
				ln_total = ln_total - 8
			ENDIF
			IF ln_total < 8  AND ln_total > 0 && If less that 7 records exist on the order.
				PNTotalP = PNTotalP+1
				ll_again  = .F.
			ENDIF
		ENDDO
ENDCASE

I hope you can figure this out it will cut your printing time in half versus printing a report twice

>I put this code on a field and it does'nt work.
>"Page : " + alltrim(STR(_pageno)) + " of " + alltrim(STR(_pbpage))
>
>ex:
>Page 1 = Page 1 of 1
>Page 2 = Page 2 of 1
>Page 3 = Page 3 of 1
>...