rianeiromiron
Programmer
I need users of an application to "see" the invoice number they are going to print, that is, they must "see" the number printed in the paper invoice and then type it so the invoice number used is the correct one. Under Win98 or WinMe I used to type a file containing several blank lines so the carriage would advance say 5 times (this way the number was visible), and then, I typed another another file containing 5 reverse line feed commands. The code is like this
TYPE_=11
MYCOMMAND='ADVANCE.BAT'
=WinExec(MYCOMMAND,TYPE_)
=messagebox('Look invoice number')
MYCOMMAND='RETURNCR.BAT'
=WinExec(MYCOMMAND,TYPE_)
ADVANCE.BAT has the following command
type LINES>prn:
And the contents of LINES is just 5 LF commands
RETURNCR.BAT has the following command
type retro>prn:
And the contents of RETRO is 5 reverse line commands
When I "winEXECUTE" the command, the printer just won't advance.
Any ideas on how to work this around?
Thank you all for your help
TYPE_=11
MYCOMMAND='ADVANCE.BAT'
=WinExec(MYCOMMAND,TYPE_)
=messagebox('Look invoice number')
MYCOMMAND='RETURNCR.BAT'
=WinExec(MYCOMMAND,TYPE_)
ADVANCE.BAT has the following command
type LINES>prn:
And the contents of LINES is just 5 LF commands
RETURNCR.BAT has the following command
type retro>prn:
And the contents of RETRO is 5 reverse line commands
When I "winEXECUTE" the command, the printer just won't advance.
Any ideas on how to work this around?
Thank you all for your help