# Chemin vers le fichier CSV d'entrée
$cheminFichierCSV = "C:\Users\glion\Desktop\LOG et SCAM\index.csv"

# Charger le contenu du fichier CSV en UTF-8
$contenuCSV = Import-Csv $cheminFichierCSV -Delimiter ";" -Encoding UTF8

# Créer une instance de Shell.Application
$shell = New-Object -ComObject Shell.Application

# Utiliser une liste générique pour stocker les nouvelles données
$nouveauContenuCSV = [System.Collections.Generic.List[object]]::new()

foreach ($ligne in $contenuCSV) {
    $cheminFichier = $ligne.Chemin
    $dureePropriete = ""

    if (Test-Path $cheminFichier) {
        $dossier = $shell.Namespace((Get-Item $cheminFichier).DirectoryName)
        $fichier = $dossier.ParseName((Get-Item $cheminFichier).Name)
        $dureePropriete = $dossier.GetDetailsOf($fichier, 27)
    }

    $nouvelleLigne = [PSCustomObject]@{
        Fichier = (Split-Path $cheminFichier -Leaf)
        Chemin = $ligne.Chemin
        Duree = $dureePropriete
    }

    $nouveauContenuCSV.Add($nouvelleLigne)
}

# Chemin vers le fichier CSV de sortie
$cheminFichierCSVSortie = "C:\Users\glion\Desktop\LOG et SCAM\indexduree.csv"

# Écrire les nouvelles données dans le fichier CSV de sortie en UTF-8
$nouveauContenuCSV | Export-Csv -Path $cheminFichierCSVSortie -Delimiter ";" -NoTypeInformation -Encoding UTF8