Level Extreme platform
Subscription
Corporate profile
Products & Services
Support
Legal
Français
Load Printer Driver Error
Message
From
11/04/2005 09:15:14
 
General information
Forum:
Visual FoxPro
Category:
Other
Environment versions
Visual FoxPro:
VFP 6
OS:
Windows 2000
Network:
Windows 2000 Server
Database:
Visual FoxPro
Miscellaneous
Thread ID:
01002873
Message ID:
01003327
Views:
25
Thank you for the information. We are currently blanking out the TAG and TAG2 fields. We are also modifying the EXPR field, replacing various values. The code we are using is overkill, but it is in place to fix a prior error.
IF '***DUPLEX' $ Expr
REPLACE Expr WITH STRTRAN(Expr, "***DUPLEX", "*DUPLEX")
ENDIF
IF '***DEVICE' $ Expr
REPLACE Expr WITH STRTRAN(Expr, "***DEVICE", "*DEVICE")
ENDIF

IF '***DRIVER' $ Expr
REPLACE Expr WITH STRTRAN(Expr, "***DRIVER", "*DRIVER")
ENDIF

IF '***OUTPUT' $ Expr
REPLACE Expr WITH STRTRAN(Expr, "***OUTPUT", "*OUTPUT")
ENDIF

IF '***DEFAULT' $ Expr
REPLACE Expr WITH STRTRAN(Expr, "***DEFAULT", "*DEFAULT")
ENDIF

IF '***PRINTQUALITY' $ Expr
REPLACE Expr WITH STRTRAN(Expr, "***PRINTQUALITY", "*PRINTQUALITY")
ENDIF

IF '***YRESOLUTION' $ Expr
REPLACE Expr WITH STRTRAN(Expr, "***YRESOLUTION", "*YRESOLUTION")
ENDIF

IF '***TTOPTION' $ Expr
REPLACE Expr WITH STRTRAN(Expr, "***TTOPTION", "*TTOPTION")
ENDIF

IF '**DUPLEX' $ Expr
REPLACE Expr WITH STRTRAN(Expr, "**DUPLEX", "*DUPLEX")
ENDIF

IF '**DEVICE' $ Expr
REPLACE Expr WITH STRTRAN(Expr, "**DEVICE", "*DEVICE")
ENDIF

IF '**DRIVER' $ Expr
REPLACE Expr WITH STRTRAN(Expr, "**DRIVER", "*DRIVER")
ENDIF

IF '**OUTPUT' $ Expr
REPLACE Expr WITH STRTRAN(Expr, "**OUTPUT", "*OUTPUT")
ENDIF

IF '**DEFAULT' $ Expr
REPLACE Expr WITH STRTRAN(Expr, "**DEFAULT", "*DEFAULT")
ENDIF

IF '**PRINTQUALITY' $ Expr
REPLACE Expr WITH STRTRAN(Expr, "**PRINTQUALITY", "*PRINTQUALITY")
ENDIF

IF '**YRESOLUTION' $ Expr
REPLACE Expr WITH STRTRAN(Expr, "**YRESOLUTION", "*YRESOLUTION")
ENDIF

IF '**TTOPTION' $ Expr
REPLACE Expr WITH STRTRAN(Expr, "**TTOPTION", "*TTOPTION")
ENDIF

IF '*DEVICE' $ Expr
ELSE
REPLACE Expr WITH STRTRAN(Expr, "DEVICE", "*DEVICE")
ENDIF

IF '*DRIVER' $ Expr
ELSE
REPLACE Expr WITH STRTRAN(Expr, "DRIVER", "*DRIVER")
ENDIF

IF '*OUTPUT' $ Expr
ELSE
REPLACE Expr WITH STRTRAN(Expr, "OUTPUT", "*OUTPUT")
ENDIF

IF '*DEFAULT' $ Expr
ELSE
REPLACE Expr WITH STRTRAN(Expr, "DEFAULT", "*DEFAULT")
ENDIF

IF '*PRINTQUALITY' $ Expr
ELSE
REPLACE Expr WITH STRTRAN(Expr, "PRINTQUALITY", "*PRINTQUALITY")
ENDIF

IF '*YRESOLUTION' $ Expr
ELSE
REPLACE Expr WITH STRTRAN(Expr, "YRESOLUTION", "*YRESOLUTION")
ENDIF

IF '*TTOPTION' $ Expr
ELSE
REPLACE Expr WITH STRTRAN(Expr, "TTOPTION", "*TTOPTION")
ENDIF

IF '*DUPLEX' $ Expr
ELSE
REPLACE Expr WITH STRTRAN(Expr, "DUPLEX", "*DUPLEX")
ENDIF
Previous
Next
Reply
Map
View

Click here to load this message in the networking platform