# Mesurer le temps au début du script $startTime = Get-Date Write-Host "Mise à jour des chemins des vidéos du serveur pour la lecture vidéo dans l'application..." Write-Host "Cela peut durer quelques minutes..." Write-Host "Les dossiers qui apparaîtront en rouge, il faudra modifier le nom du dossier sur le serveur." # Chemin du dossier racine à parcourir $searchPath = "B:\" # Chemin du fichier CSV existant $csvPath = ".\Index.csv" # Vérifier si le fichier CSV existe et le supprimer s'il existe if (Test-Path $csvPath) { Remove-Item $csvPath -Force } # Liste des dossiers à exclure du scan $exclusions = @('SCAM', 'Mise à Jours serveur', 'Logiciels', 'log') # Liste des extensions vidéo à inclure dans le CSV $videoExtensions = @('.mp4', '.mov', '.avi', '.mkv', '.wmv', '.flv', '.webm', '.m4v') # Créer une chaîne de caractères contenant les noms, les chemins et les durées de tous les fichiers $fileString = "`"Fichier`";`"Chemin`";`"Indexduree`"`n" $shell = New-Object -ComObject Shell.Application foreach ($file in (Get-ChildItem $searchPath -Recurse | Where-Object { ! $_.PSIsContainer -and $_.Extension -in $videoExtensions -and $_.DirectoryName.Split('\')[-1] -notin $exclusions })) { $dossierParent = $shell.NameSpace((Get-Item $file.FullName).DirectoryName) $fichierVideo = $dossierParent.ParseName((Get-Item $file.FullName).Name) $dureePropriete = $dossierParent.GetDetailsOf($fichierVideo, 27) # Récupérer la durée du fichier $fileString += "`"$($file.BaseName)`";`"$($file.FullName)`";`"$dureePropriete`"`n" } # Écrire la chaîne de caractères dans le fichier CSV en remplaçant son contenu existant $fileString | Out-File $csvPath -Encoding default -Force # Compter le nombre de fichiers ajoutés $newFiles = $files.Count # Afficher le nombre de fichiers ajoutés Write-Host "$newFiles fichiers ont été ajoutés à $csvPath." # Mesurer le temps à la fin du script $endTime = Get-Date # Calculer la durée totale de l'exécution $executionTime = $endTime - $startTime # Afficher la durée totale Write-Host "Le script a pris $executionTime pour s'exécuter."