[LOGICIEL] logiciel pour trouver mes dossiers vides ?

[djgregb]

voila je m explique

j utilise itunes pour gerer ma biblioteque de mp3 mais j ai mis l option laisser gerer itunes l organisation des mp3 et celui ci créer un dossiers pour y mettre les mp3 mais il suffit que je change les tag du mp3 pour qu il les deplace de repertoires.

c est plutot bien sauf que le repertoire d origine n est pas effacé donc je me retrouve avec plein de repertoires vides .

alors j aimerai trouver une solution pour rechercher ces repertoires vides et les effacer.

merci de m'aider

[snooky]

Démarrer / Rechercher

[djgregb]

Démarrer / Rechercher

ben ça me dis pas ceux qui sont vides .

[snooky]

Ils ont bien un nom ces dossiers ?

recherche itunes surton pc , tu trouveras tes dossiers .

[djgregb]

je sais où sont mes dossiers mais le probleme c est pour trouver dans mon repertoire itunes mes dossiers vides .

j ai 3746 dossiers donc je me sens pas de les verifier un par un .

lol

[snooky]

Un modo va déplacer ton post dans Apple , tu auras sans doute plus de réponses ...

[djgregb]

pourquoi sous apple puisque j utilise windows xp ?

enfin c est pas grave je vai continuer de chercher ce logiciels magique qui doit bien exister quelque part

[snooky]

iTunes est à la base un logiciel Mac , porté sous Windows .

[astero-H]

Pas la peine de chercher le logiciel magique, la Golgoth Software Korporation vous l'apporte sur votre forum préféré

Repertoire = "C:\TON_REPERTOIRE"

Set fso = CreateObject ("Scripting.FileSystemObject")

fso.CreateTextFile "c:\empty_folders.log", true

set logfile = fso.GetFile("c:\empty_folders.log")
set logstream = logfile.OpenAsTextStream (2, -2)


Folderlist Repertoire

logstream.Close 


Sub Folderlist (Repertoire)

  set f = fso.GetFolder (Repertoire)
  set files = f.Files
  set sf = f.SubFolders


  If ((files.Count = 0) And (sf.Count = 0)) then

     logstream.Write f.Path & vbcrlf

  Else

     For each f1 in sf

         Folderlist f1.path

     next

  End If

End Sub

Tu n'as qu'a copier ça dans ton bloc notes, changer la première ligne avec le nom de ton rep itunes et sauvegarder sous kelkechose.vbs

Ensuite tu double-cliques dessus et magie t'auras un fichier C:\empty_folders.log avec la liste de tes dossiers vides.

[djgregb]

super merci beaucoup

[dfi.informatique]

Petite modif perso du script :

=> Pour que le log se crée dans le répertoire où se trouve le script VBS

=> remarque : toujours utiliser une variable quand du texte est utilisé +ieurs fois, y'a qu'une modif a faire en cas de mise à jour!

Repertoire = "C:\TON_REPERTOIRE"

FichierLog = ".\empty_folders.log"

Set fso = CreateObject ("Scripting.FileSystemObject")

fso.CreateTextFile FichierLog, true

set logfile = fso.GetFile(FichierLog)

sinon,

(suite dans le forum programmation )

[classe-a]

Bonjour,

Je rencontre un petit problème légèrement similaire, le dispose dans un répertoire de très nombreux dossiers (+s centaines). Je recherche un petit soft qui se placerait dans le barre d'outil et qui par l'insertion d'un numéro (celui se rapportant au dossier) permettrait d'atteindre directement ce dossier.

D'avance merci

[dfi.informatique]

Salut,

1/ Tu fais Démarer / Exécuter

2/ Tu colles le texte "C:\Dossier\sous-dossier\...\sous-dossier" puis tu tapes XXX"

3/ Tu valides par [OK]

Et hop, ton sous-dossier N° XXX s'ouvre