Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Any Work around for Set Printer to Name command
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de rapports & Rapports
Divers
Thread ID:
00932252
Message ID:
00932323
Vues:
33
On which line below does your code fail? What is the error message? If Kick1 and Receipt are compiled into an APP or EXE file, remove the "PROGS\" from the DO commands. I would never hardcode paths [relative or absolute] in a PRG anyway. Better to use a SET PATH in your environment so VFP can find these files during development.

>
IF Messagebox("Print to Docket Receipt?",4+32+512,"Customer Receipt")= 6
>	SET CONSOLE off
>	SET TALK off
>	IF Messagebox("Does customer paid or made a deposit?",4+32+512,"Receipt")= 6
>		DO PROGS\KICK1
>		DO PROGS\RECEIPT
>		DO PROGS\RECEIPT
>	ELSE
>		DO PROGS\RECEIPT
>		DO PROGS\RECEIPT
>	Endif
>ENDIF
>*// MY RECEIPT PRG.
>     SET DEVICE TO PRINT
>     SET PRINTER TO NAME "STAR"
>     @prow()+1,(40-len(rtrim(mSTORE_NAME)))/2 Say rtrim(mSTORE_NAME)
>     @prow()+1,(40-len(rtrim(mADDRESS1)))/2 Say rtrim(mADDRESS1)
>     @prow()+1,(40-len(rtrim(mADDRESS2)))/2 Say rtrim(mADDRESS2)
>     ...
>     *other codes
>     SET PRINT TO
>
>THIS CODE Fails on Windows 2000 Prof with SP4? Any Ideas? Why like that.. why.. Why...
>
>
>Anyone who have better code, or technique in usin the set device to print,
>set print to LPT1 like a DOS behaviour?
>
>Thanks...
Mark McCasland
Midlothian, TX USA
Précédent
Suivant
Répondre
Fil
Voir

Click here to load this message in the networking platform