Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Printer Problems
Message
General information
Forum:
Visual FoxPro
Category:
Other
Miscellaneous
Thread ID:
00114018
Message ID:
00122596
Views:
19
Hi ,
Try This Code. No Printer Driver just pure API direct stuff.

SET LIBRARY TO c:\vfp\FOXTOOLS.FLL Additive

OPENCOMM = REGFN("OPENCOMM","CII","I",'USER.EXE')
WRITECOMM = REGFN('WRITECOMM','ICI','I','USER.EXE')
CLOSECOMM = REGFN('CLOSECOMM','I','I','USER.EXE')
LNPORT = CALLFN(OPENCOMM,"LPT1:",100,100) && open comm port
LCDSTRING="Helllllo NEWMAN"
=CALLFN(WRITECOMM,LNPORT,LCDSTRING,LEN(LCDSTRING)) && send string to modem
=CALLFN(CLOSECOMM,LNPORT)

RELEASE LIBRARY c:\vfp\FOXTOOLS.FLL

Regards Fred.
Fred Besterwitch, MCP

The harder you work. The luckier you get.
Previous
Reply
Map
View

Click here to load this message in the networking platform