Clear-Host function Get-ScriptDirectory { $Invocation = (Get-Variable MyInvocation -Scope 1).Value $ScriptFolderPath = Split-Path $Invocation.MyCommand.Path return $ScriptFolderPath } $MyLine = [string] $NomFichierACreer = [string] $VBShellObj = new-object -comobject wscript.shell [void][System.Reflection.Assembly]::LoadWithPartialName('Microsoft.VisualBasic') $NomEspaceRecherche = [Microsoft.VisualBasic.Interaction]::InputBox("Entrez une partie du nom du quota recherché", "Quota recerche", "") $NomEspaceRecherche.ToLower() $fsrmremote = New-Object -com Fsrm.FsrmQuotaManager #$fsrmremote | GM $colItems = $fsrmremote.EnumQuotas("") #$colItems | GM $NomFichierACreer = "ExportQuotasFiltres.txt" $EmplacementFichier = Get-ScriptDirectory $EmplacementFichier = "$EmplacementFichier\$NomFichierACreer" #Création du fichier vierge $MonFichier = New-Item -type file $EmplacementFichier -Force write-host "Recherche de $NomEspaceRecherche" $NombreQuotasTrouves = 0 foreach ($objItem in $colItems) { #write-host "Path: " $objItem.Path $QuotaPath = $objItem.Path $QuotaPath = $QuotaPath.ToLower() $QuotaLimit = $objItem.QuotaLimit $QuotaLimit = $QuotaLimit / 1024 /1024 $Trouve = $QuotaPath.contains($NomEspaceRecherche) if ($Trouve -eq $TRUE){ $NombreQuotasTrouves++ write-host "Path: " $objItem.Path $MyLine = "$QuotaPath;$QuotaLimit" add-content $MonFichier $MyLine # $RetourYesNo = $VBShellObj.popup("Editer $QuotaPath ? ",0,"Editer ce quota ?",4) # # #Si on est ok pour editer ce quota # if ($RetourYesNo -eq 6){ # write-host "QuotaUsed : " ($objItem.QuotaUsed/1024/1024) "Mb" # write-host "QuotaLimit: " ($objItem.QuotaLimit /1024/1024) "Mb" # # } } }