- Lister tous les fichiers d'un dossier (et ses sous-dossiers)
- Enlever la lecture seule des fichiers d'un dossier et des sous-répertoires
- Attrib4allb3 - changer les attributs de tous fichiers d'1 dossier en entier (avec sous-dossiers)
- Trouver le nom du plus gros fichier dans 1 dossier
- Visual Basic / VB.NET : Exploredossier : afficher les fichiers dans un dossier, et éventuelle
A voir également:
- Compter des fichiers dans un dossier en WSH
- PHP : Compter le nombre de fichiers dans un dossier - CodeS SourceS - Guide
- Compter le nombre de fichiers d'un dossier et declencher une alerte ( fenêtre, m ✓ - Forum - Visual Basic 6
- Compte le nb de fichier d'un dossier ✓ - Forum - Visual Basic
- Compter nombre fichier ds dossier ✓ - Forum - PHP
- Lister tous les fichiers d'un dossier (et ses sous-dossiers) - Conseils pratiques - C# / .NET
6 réponses
cs_JMO
- Messages postés
- 1854
- Date d'inscription
- jeudi 23 mai 2002
- Statut
- Membre
- Dernière intervention
- 24 juin 2018
Bonsoir,
Dim Path
Path = "D:\Mes scripts vbs"
MsgBox ShowFolderList(Path),vbmessage,"Fichiers contenus dans le répertoire " & Path
Function ShowFolderList(strPath)
Dim fso, Dossiers, fic, fichiers, strListe, nbre
Set fso = CreateObject("Scripting.FileSystemObject")
Set Dossiers = fso.GetFolder(strPath)
Set fic = Dossiers.Files
'pour chaque fichier de mon objet files de mon objet fso...:)
For Each fichiers in fic
'le nom du fichier
nbre = nbre + 1
'strListe = strListe & vbcrlf & vbcrlf & fichiers.Name & " Date (jjmmaa) : " & fichiers.DateLastModified & " Taille (octet) : " & fichiers.Size
Next
ShowFolderList = nbre
'ShowFolderList = strListe
End Function
Set fso = Nothing
Dim Path
Path = "D:\Mes scripts vbs"
MsgBox ShowFolderList(Path),vbmessage,"Fichiers contenus dans le répertoire " & Path
Function ShowFolderList(strPath)
Dim fso, Dossiers, fic, fichiers, strListe, nbre
Set fso = CreateObject("Scripting.FileSystemObject")
Set Dossiers = fso.GetFolder(strPath)
Set fic = Dossiers.Files
'pour chaque fichier de mon objet files de mon objet fso...:)
For Each fichiers in fic
'le nom du fichier
nbre = nbre + 1
'strListe = strListe & vbcrlf & vbcrlf & fichiers.Name & " Date (jjmmaa) : " & fichiers.DateLastModified & " Taille (octet) : " & fichiers.Size
Next
ShowFolderList = nbre
'ShowFolderList = strListe
End Function
Set fso = Nothing
redzzo
- Messages postés
- 4
- Date d'inscription
- mercredi 30 mars 2005
- Statut
- Membre
- Dernière intervention
- 6 décembre 2005
LOL
Rien qu'en fleurtant sur des site ci et la j'ai reussis a reunir assez d infos pour me repondre tout seul comme quoi qd on cherche on trouve
MErci
Rien qu'en fleurtant sur des site ci et la j'ai reussis a reunir assez d infos pour me repondre tout seul comme quoi qd on cherche on trouve
MErci
cs_JMO
- Messages postés
- 1854
- Date d'inscription
- jeudi 23 mai 2002
- Statut
- Membre
- Dernière intervention
- 24 juin 2018
Bonjour,
renvoie le nombre de fichier d'un répertoire
jean-marc
msgbox CreateObject("Scripting.FileSystemObject").GetFolder("D:\TEST").Files.Count
renvoie le nombre de fichier d'un répertoire
jean-marc
redzzo
- Messages postés
- 4
- Date d'inscription
- mercredi 30 mars 2005
- Statut
- Membre
- Dernière intervention
- 6 décembre 2005
Merci beaucoup ca fonctionne a merveille.
LE WSH ressemble beaucoups au VB mais il y a t il des choses qui fait la difference entre les 2 ?
genre maniere de traitement sur quel composant s appuie WSH ect ...
Encore une fois merci pour tout !
LE WSH ressemble beaucoups au VB mais il y a t il des choses qui fait la difference entre les 2 ?
genre maniere de traitement sur quel composant s appuie WSH ect ...
Encore une fois merci pour tout !
redzzo
- Messages postés
- 4
- Date d'inscription
- mercredi 30 mars 2005
- Statut
- Membre
- Dernière intervention
- 6 décembre 2005
Je vais preciser ma demande en fait ...
Est-ce avec WSH on peut lancer un fichier .exe par exemple ?? si oui quel syntaxe il faudrai que je previligie car en vb c'est tres delicat ...
Est-ce avec WSH on peut lancer un fichier .exe par exemple ?? si oui quel syntaxe il faudrai que je previligie car en vb c'est tres delicat ...
timadone
- Messages postés
- 3
- Date d'inscription
- mercredi 16 mai 2007
- Statut
- Membre
- Dernière intervention
- 13 septembre 2010
5 ans après... au cas ou, en utilisant ce code, comment peut on compter le nombre de fichiers dans un dossiers et déclencher une alerte ( fenêtre ou mail ou bip sonore) uniquement quand le nombre de fichiers dépasse 10 fichiers par exemple?
Merci
Merci