Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Printer Environment = .F. (About 250 reports)
Message
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de rapports & Rapports
Versions des environnements
Visual FoxPro:
VFP 9
Divers
Thread ID:
01057796
Message ID:
01057878
Vues:
13
Rudolfo,
here is the quick and dirty code I´m using:
SET DEFAULT TO c:\myRepDir
=ADIR(adr,"*.frx")
FOR i=1 TO ALEN(adr,1)
 ?adr(i,1)
 USE (adr(i,1))
 DELETE FOR Inlist(objtype, 25, 26)
 PACK
ENDFOR
=ADIR(adr,"*.lbx")
FOR i=1 TO ALEN(adr,1)
 ?adr(i,1)
 USE (adr(i,1))
 DELETE FOR Inlist(objtype, 25, 26)
 PACK
ENDFOR
USE
Cheers
G
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform