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:
00508381
Views:
26
This message has been marked as the solution to the initial question of the thread.
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"
Mark McCasland
Midlothian, TX USA
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform