Partager via


Comment : créer une liste des répertoires

Mise à jour : novembre 2007

L'exemple de code suivant montre comment utiliser les classes d'E/S pour créer une liste de tous les fichiers avec une extension « .exe » dans un répertoire.

Exemple

Option Explicit On 
Option Strict On
Imports System
Imports System.IO
Class DirectoryLister
    Public Shared Sub Main(ByVal args As String())
        Dim path As String = Environment.CurrentDirectory
        If (args.Length > 0) Then
            If File.Exists(args(0)) Then
                path = args(0)
            Else
                Console.WriteLine("{0} not found; using current directory:", _
                    args(0))
            End If
        End If
        Dim dir As New DirectoryInfo(path)
        Dim f As FileInfo
        For Each f In dir.GetFiles("*.exe")
            Dim name As [String] = f. Name
            Dim size As Long = f.Length
            Dim creationTime As DateTime = f.CreationTime
            Console.WriteLine("{0,-12:N0} {1,-20:g} {2}", size, creationTime, name)
        Next f
    End Sub
End Class
using System;
using System.IO;

class DirectoryLister
{
    public static void Main(String[] args)
    {
        string path = Environment.CurrentDirectory;
        if (args.Length > 0)
        {
            if (Directory.Exists(args[0]))
            {
                path = args[0];
            }
            else
            {
                Console.WriteLine("{0} not found; using current  directory:",
                    args[0]);
            }
        }
        DirectoryInfo dir = new DirectoryInfo(path);
        foreach (FileInfo f in dir.GetFiles("*.exe")) 
        {
            String name = f. Name;
            long size = f.Length;
            DateTime creationTime = f.CreationTime;
            Console.WriteLine("{0,-12:N0} {1,-20:g} {2}", size, 
                creationTime, name);
        }
    }

Programmation fiable

Dans cet exemple, DirectoryInfo correspond au répertoire actif, indiqué par (".") et le code répertorie tous les fichiers du répertoire actif ayant une extension .exe, ainsi que leurs taille, date de création et nom. En supposant qu'il s'agisse de fichiers .exe situés dans le sous-répertoire \Bin du répertoire C:\MyDir, la sortie de ce code peut ressembler à ceci :

953          7/20/2000 10:42 AM   C:\MyDir\Bin\paramatt.exe
664          7/27/2000 3:11 PM    C:\MyDir\Bin\tst.exe
403          8/8/2000 10:25 AM    C:\MyDir\Bin\dirlist.exe

Si vous souhaitez obtenir une liste de fichiers d'un autre répertoire, tel que votre répertoire racine C:\, passez l'argument "C:\" dans le fichier exécutable généré par la compilation de ce code, par exemple "testApplication.exe C:\".

Remarque :

Les utilisateurs de Visual Basic peuvent choisir d'utiliser les méthodes et propriétés fournies par l'objet My.Computer.FileSystem pour les E/S de fichiers. Pour plus d'informations, consultez My.Computer.FileSystem, objet.

Voir aussi

Tâches

Comment : lire et écrire dans un fichier de données créé récemment

Comment : ouvrir un fichier journal et y ajouter des éléments

Comment : lire du texte dans un fichier

Comment : écrire du texte dans un fichier

Comment : lire les caractères d'une chaîne

Comment : écrire des caractères dans une chaîne

Concepts

E/S de fichier de base

Référence

DirectoryInfo

CreationTime

FullName

FileInfo.Length

DirectoryInfo.GetFiles