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
Cette action est irreversible, confirmez la suppression du commentaire ?
Signaler le commentaire
Veuillez sélectionner un problème
Nudité
Violence
Harcèlement
Fraude
Vente illégale
Discours haineux
Terrorisme
Autre
X
Bonsoir, bis:
Pour faire ce que tu veux, ceci devrait aller:
Kill "pathrépertoire*.*" rmdir "pathrépertoire"
A condition qu'il n'y ait pas un, des, sous-répertoire(s)...
-- ECRIRE http://irolog.free.fr/ecrire/index.htm
LOGICIELS http://irolog.free.fr
SITE http://irolog.free.fr/joe/index.htm
FAQ VB http://faq.vb.free.fr
PRINCIPE D'UTILISATION DES NEWSGROUPS MICROSOFT http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm ********************************************************
"Dan" a écrit dans le message de news: 4329da9e$0$304$
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)
Bonsoir, bis:
Pour faire ce que tu veux, ceci devrait aller:
Kill "pathrépertoire*.*"
rmdir "pathrépertoire"
A condition qu'il n'y ait pas un, des, sous-répertoire(s)...
--
ECRIRE
http://irolog.free.fr/ecrire/index.htm
LOGICIELS
http://irolog.free.fr
SITE
http://irolog.free.fr/joe/index.htm
FAQ VB
http://faq.vb.free.fr
PRINCIPE D'UTILISATION DES NEWSGROUPS MICROSOFT
http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm
********************************************************
"Dan" <antispam@mediacd.fr> a écrit dans le message de news:
4329da9e$0$304$7a628cd7@news.club-internet.fr...
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
A condition qu'il n'y ait pas un, des, sous-répertoire(s)...
-- ECRIRE http://irolog.free.fr/ecrire/index.htm
LOGICIELS http://irolog.free.fr
SITE http://irolog.free.fr/joe/index.htm
FAQ VB http://faq.vb.free.fr
PRINCIPE D'UTILISATION DES NEWSGROUPS MICROSOFT http://support.microsoft.com/directory/worldwide/fr/newsgroup/regles.htm ********************************************************
"Dan" a écrit dans le message de news: 4329da9e$0$304$
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
