Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Strange Printer Behaviour
Message
 
À
16/09/2008 08:37:13
Raza Malik
Universal Accounting Software
Edgewater, New Jersey, États-Unis
Information générale
Forum:
Visual FoxPro
Catégorie:
Autre
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Vista
Network:
Windows 2008 Server
Database:
MS SQL Server
Divers
Thread ID:
01347880
Message ID:
01351294
Vues:
15
I have seen something similar. When modifying reports it sometimes sets the report to your default printer as a Specific printer unless you deliberately set to default. This seems to override SET PRINTER.
I use the following, downloaded from UT some time ago to clear all printer settings to default, just remember to reset any specific report printers after use

Local oFile, cEmptyStr, nReportCount
#Define cEmptyStr Space(0) &&Sets cEmptyStr value
nReportCount = 0
Clear
Modi Project ? Noshow Nowait &&Prompts the Project File name

*!* Loops into the Project Collection Object
For Each oFile In _vfp.ActiveProject.Files

If oFile.Type = 'R' &&Checks for Report File Type
Wait Window 'Clearing Fields in: ' +;
oFile.Name Timeout 1
Use (oFile.Name)
Go Top
Locate For ObjType = 1 And ObjCode = 53

If Found()
Replace Tag With cEmptyStr,; &&Clears the Tag, Tag2, Expr Fields
Tag2 With cEmptyStr
*,;
* Expr With cEmptyStr &&Remark this line to keep values in EXPR field
nReportCount = nReportCount + 1
Use
Endif

Endif

Endfor
*!* Displays Process Summary
Wait Window Alltrim(Str(nReportCount)) +;
' Report(s) Modified in Project ' +;
_Vfp.ActiveProject.Name
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform