Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Printer Problems
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Divers
Thread ID:
00114018
Message ID:
00122596
Vues:
18
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.
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform