Récupération du nom des fichier d'un rep en vbscript
Signaler
thekinder
chatonpersan
- Messages postés
- 6
- Date d'inscription
- lundi 19 août 2002
- Statut
- Membre
- Dernière intervention
- 15 novembre 2004
chatonpersan
- Messages postés
- 1
- Date d'inscription
- lundi 10 mars 2003
- Statut
- Membre
- Dernière intervention
- 4 juillet 2003
A voir également:
- Récupération du nom des fichier d'un rep en vbscript
- Récupérer le nom du fichier avec lequel l'appli doit s'ouvrir.lorsqu'on double clique depuis l'explo - Codes sources - Visual Basic / VB.NET (Fichier / Disque)
- Compression gzip avec récuperation du nom de fichier - Codes sources - C# / .NET (Fichiers / Disque)
- Récupérer le nom du fichier à partir d'un URL ✓ - Forum - VB.NET
- Récupérer le nom du fichier sélectionné dans l'explorer ✓ - Forum - VB.NET
- Recuperer un nom de fichier avec les espaces ✓ - Forum - Visual Basic 6
4 réponses
thekinder
- Messages postés
- 6
- Date d'inscription
- lundi 19 août 2002
- Statut
- Membre
- Dernière intervention
- 15 novembre 2004
Désolé je me suis trompé de section mais si quelqu'un connait pas de probleme !!
Thekinder
Légion Cavalerie : http://legioncavalerie.free.fr
Le Cent Garde : http://lecentgarde.free.fr
Site sur Patrick de Gayardon et le para : http://degayardon.free.fr
Thekinder
Légion Cavalerie : http://legioncavalerie.free.fr
Le Cent Garde : http://lecentgarde.free.fr
Site sur Patrick de Gayardon et le para : http://degayardon.free.fr
cs_JMO
- Messages postés
- 1854
- Date d'inscription
- jeudi 23 mai 2002
- Statut
- Membre
- Dernière intervention
- 24 juin 2018
Bonjour,
Ci-dessous un code en VBS où j'affiche à l'écran la liste des fichiers d'un répertoire saisi en variable.
Dim Path
Path = InputBox("Saisir le répertoire souhaité: exemple: c:\Mes Documents","Liste de fichier dans un répertoire")
MsgBox ShowFolderList(Path),vbmessage,"Fichiers contenus dans le répertoire " & Path
Function ShowFolderList(strPath)
Dim fso, Dossiers, fic, fichiers, strListe
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
strListe = strListe & vbcrlf & vbcrlf & fichiers.Name & " Date (jjmmaa) : " & fichiers.DateLastModified & " Taille (octet) : " & fichiers.Size
Next
ShowFolderList = strListe
End Function
Ci-dessous un code en VBS où j'affiche à l'écran la liste des fichiers d'un répertoire saisi en variable.
Dim Path
Path = InputBox("Saisir le répertoire souhaité: exemple: c:\Mes Documents","Liste de fichier dans un répertoire")
MsgBox ShowFolderList(Path),vbmessage,"Fichiers contenus dans le répertoire " & Path
Function ShowFolderList(strPath)
Dim fso, Dossiers, fic, fichiers, strListe
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
strListe = strListe & vbcrlf & vbcrlf & fichiers.Name & " Date (jjmmaa) : " & fichiers.DateLastModified & " Taille (octet) : " & fichiers.Size
Next
ShowFolderList = strListe
End Function
thekinder
- Messages postés
- 6
- Date d'inscription
- lundi 19 août 2002
- Statut
- Membre
- Dernière intervention
- 15 novembre 2004
Merci beaucoup, je pense que ca va pouvoir m'aider.
Je vais le tester lundi et je te tient au courant.
Merci encore et @+
Thekinder
Légion Cavalerie : http://legioncavalerie.free.fr
Le Cent Garde : http://lecentgarde.free.fr
Site sur Patrick de Gayardon et le para : http://degayardon.free.fr
Je vais le tester lundi et je te tient au courant.
Merci encore et @+
Thekinder
Légion Cavalerie : http://legioncavalerie.free.fr
Le Cent Garde : http://lecentgarde.free.fr
Site sur Patrick de Gayardon et le para : http://degayardon.free.fr
chatonpersan
- Messages postés
- 1
- Date d'inscription
- lundi 10 mars 2003
- Statut
- Membre
- Dernière intervention
- 4 juillet 2003
dee
Bonjour,
y-a t'il quelqu'un qui peut compléter ce code afin de rechercher par type de fichiers et aussi dans les sous dossiers?
Merci d'avance
dee
Bonjour,
y-a t'il quelqu'un qui peut compléter ce code afin de rechercher par type de fichiers et aussi dans les sous dossiers?
Merci d'avance
dee