OVH Cloud OVH Cloud

Rmdir impossible

2 réponses
Avatar
Dan
Bonjour a tous.
Je veux programmer la suppression d'un repertoir,pour cela je supprime tous
les fichiers de ce repertoir
puis je supprime le repertoir mais il m'indique que ce repertoir n'est
pas vide,il doit subsister un fichier caché qu'en pensez vous ?
voici mon code:
Form5.filFichier1 est une filelistebox

Form5.filFichier1.Path = Répertoire
'Form5.filFichier1.Pattern = "*.jpg; *.mpg; *.avi"
For i = 0 To Form5.filFichier1.ListCount - 1
Kill (Répertoire & "/" & Form5.filFichier1.List(i))
Next i

RmDir (Répertoire)

2 réponses

Avatar
Francois Muller
Bonjour

"Dan" a écrit dans le message de news:
432a9b26$0$307$
Bonjour a tous.
Je veux programmer la suppression d'un repertoir,pour cela je supprime
tous
les fichiers de ce repertoir
puis je supprime le repertoir mais il m'indique que ce repertoir n'est
pas vide,il doit subsister un fichier caché qu'en pensez vous ?



Qu'il serait bien de se débarrasser de l'utilisation des fonctions VB "old
fashioned" ;-)

F.
Avatar
Fabien Bezagu
J'arrête pas de le dire aussi !!

D'autant plus que la méthode Delete de la classe Directory, avec son flag
recursive, doit fonctionner parfaitement dans cette situation...Et en une
ligne...

"Francois Muller" a écrit dans le message de
news:
Bonjour

"Dan" a écrit dans le message de news:
432a9b26$0$307$
Bonjour a tous.
Je veux programmer la suppression d'un repertoir,pour cela je supprime
tous
les fichiers de ce repertoir
puis je supprime le repertoir mais il m'indique que ce repertoir
n'est
pas vide,il doit subsister un fichier caché qu'en pensez vous ?



Qu'il serait bien de se débarrasser de l'utilisation des fonctions VB "old
fashioned" ;-)

F.