Alors, à partir d'un répertoire particulier D:\DossierSource\
J'ai pleins de répertoires dont je ne peux connaitre les nom à l'avance.
Dans chacun de ces répertoires, j'ai une arborescence prédéfinie,
D:\DossierSource\*\arborescenceQueJeConnais\
à cet endroit là, j'ai une série de répertoires dont je ne connais pas le nom, et dans chacun de ces répertoires, je dois appliquer ma transformation à tous les tif.
Je propose un truc de ce gout là :
racine= "D:\DossierSource\"
Set FSO = WScript.CreateObject("Scripting.FileSystemObject" )
Set repertoireRacine=FSO.GetFolder(racine)
Set WshShell = WScript.CreateObject("WScript.Shell" )
for each subFolder in repertoireRacine.SubFolders ' D:\DossierSource\*
if not fso.folderExists("SubFolder\arborescenceQueJeConnais\" ) then next 'Selon les dossier, cette arborescence n'existe pas et il n'y a rien à faire dans ce cas là.
for each subFolder2 in SubFolder\arborescenceQueJeConnais\
'WshShell.run "mogrify -monochrome -density 300x300 subFolder2\*.tif" next
next
|
Je ne suis pas forcement super à l'aise avec le syntaxe vbs, il interprète bien les mélanges variable\constanteTexte ? Il me semble que oui, même si ca me fait bizarre en comparaison à d'autres langages où les syntaxes sont plutôt de style variable."constante".variable ...
---------------
Mon topic de vente - Mon feed-back