bonjour

Je voudrai supprimer les fichiers d'un répertoire dont le nom commence par
"pres"

j'ai essayé le code suivant sans résultat

Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
For Each Fichier In FSO.GetFolder(strDirCOPIE).Files
    t1=  Fichier.Name
   if left(t1,4) ="pres*" then
 
       fichier.delete
   end if 
    next
merci pour vos réponses