Plateforme Level Extreme
Abonnement
Profil corporatif
Produits & Services
Support
Légal
English
Remove all pictures at once
Message
 
 
À
20/07/2009 02:00:22
Information générale
Forum:
Visual FoxPro
Catégorie:
Gestionnaire de projet
Versions des environnements
Visual FoxPro:
VFP 9 SP2
OS:
Windows XP
Network:
Windows 2003 Server
Database:
Visual FoxPro
Divers
Thread ID:
01413309
Message ID:
01413358
Vues:
49
>Hi Naomi,
>
>Next to Hilmar's suggestion, you can also use the Project.Files collection, e.g.
>
>
>* Display Type, Name
>Local loFile
>FOR EACH loFile IN _vfp.ActiveProject.Files
>	IF LOWER(JUSTEXT(m.loFile.Name)) == 'bmp'
>		? m.loFile.Type, m.loFile.Name
>	ENDIF
>ENDFOR
>
>* Remove BMPs
>Local lnFile
>FOR lnFile = _vfp.ActiveProject.Files.Count TO 1 STEP -1
>	IF LOWER(JUSTEXT(_vfp.ActiveProject.Files(m.lnFile).Name)) == 'bmp'
>		_vfp.ActiveProject.Files(m.lnFile).Remove() && optional lpDeleteFlag
>	ENDIF
>ENDFOR
>
>
>
>
>hth
>-Stefan

Thanks a lot, I was thinking along these lines.
If it's not broken, fix it until it is.


My Blog
Précédent
Répondre
Fil
Voir

Click here to load this message in the networking platform