Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Print Dialog with Number of Copies
Message
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Miscellaneous
Thread ID:
00508337
Message ID:
00508386
Views:
37
Thanks.

>To do what you want, I had to do the following:
>lcFile = sys(3)  && legal filename
>lnCopies = ThisForm.spnCopies.Value && spinner value
>select * from myreport.frx into table lcFile + ".frx"
>repl expr with strtran(expr, 'COPIES=1', 'COPIES=' + str(lnCopies))
>use
>repo form (lcFile) to printer noconsole
>erase lcFile + ".frx"
>erase lcFile + ".frt"
Chuck Henry
Previous
Reply
Map
View

Click here to load this message in the networking platform