Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Printing ASCII file
Message
 
To
All
General information
Forum:
Visual FoxPro
Category:
Coding, syntax & commands
Title:
Printing ASCII file
Miscellaneous
Thread ID:
00681753
Message ID:
00681753
Views:
43
Hi folks,

I create an ASCII text log file which I want printing out to the default printer (which in my case is a network printer). I've tried using both the rawprint library and also the copyfile() api but can't seem to get either to work. Do I need to send control chars as well ?
Here is the rawprint test prg I'm using...

cfiletoprt = GETFILE()

Set Classlib To rawprint
vprdev=CreateObject("PrintDev")

vprdev.cprintername = SET("PRINTER", 3)
vprdev.cfilename = cfiletoprt
If vprdev.oOpen()
if !vprdev.oPrintFile()
MessageBox("Error sending to printer")
endif
vprdev.oClose()
Else
MessageBox("OpenPrinter() Error: "+str(oPrnDev.nOpenError))
Endif

Release vprdev
Set Classlib to

Not sure what I'm missing. Would be grateful if anyone point me in the right direction.

Regards

Kal
Next
Reply
Map
View

Click here to load this message in the networking platform