Information générale
Catégorie:
Gestionnaire de rapports & Rapports
Hi Benn
At first i wish you a happy new year.
The code you send me works partially.
It first print all the records and then asks to reverse paper.
then it prints the rest of the pages.
I played around with the code but no luck.
any ideas?
regards
mike.
>Hi Mike
>
>Here is an idea. I havn't testet is.
>
>*-- Find total no. of pages
>REPORT FORMAT "Report.frx" TO FILE Temp.Txt NOCONSOLE
>nTotalPages = _PAGENO
>
>FOR nPartno = 1 TO 2
> *-- Print odd or even pages
> IF nPartno = 1
> nStartPage = 1
> ELSE
> nStartPage = 2
> ENDIF
>
> FOR nOddEven = nStartPage TO nTotalPages SKIP 2
> REPORT FORMAT "Report.frx" TO PRINTER RANGE nOddEven,nOddEven
> ENDFOR nOddEven
>
> MessageBox("Turn papers now",64,"Hello")
>ENDFOR nPartno
>
>
>>Hi to all
>>Is there any way for a report to print the odd (1,3,5, etc..)
>>pages first and when finished to prompt the user to ''reverse'' the paper stack and print the even (2,4,6, etc..) pages ?
>>Thaks in advance
>>Regards
>>Mike
Précédent
Répondre
Voir le fil de ce thread
Voir le fil de ce thread à partir de ce message seulement
Voir tous les messages de ce thread
Voir tous les messages de ce thread à partir de ce message seulement