Kontingente über Powershell vergeben - Wie?

# function to add disk quota entry
function New-DiskQuotaEntry {
    param(
        [parameter(mandatory=$true)][string]$account,
        [parameter(mandatory=$true)][string]$driveletter,
        [parameter(mandatory=$false)][uint64]$warninglimit = [uint64]::MaxValue,
        [parameter(mandatory=$false)][uint64]$limit = [uint64]::MaxValue
    )
    # get logical disk object 
    $disk = Get-CimInstance Win32_LogicalDisk -Filter "DeviceId = '$($driveletter -replace '^([a-z]):?$','$1:')'"  
    if(!$disk){
        throw "Logical Disk '$driveletter' does no exist."  
    }
    # get Win32_Account instance of the principal
    $principal = Get-CimInstance win32_Account -Filter "Name = '$account'"  
    if(!$principal){
        throw "Account '$account' does no exist."  
    }
    # create new quota entry CIM instance
    New-CimInstance -ClassName Win32_DiskQuota -Property @{Limit=[uint64]$limit;WarningLimit=[uint64]$warninglimit;QuotaVolume=[ref]$disk;User=[ref]$principal}
}

# function to remove disk quota entry
function Remove-DiskQuotaEntry {
    param(
        [parameter(mandatory=$true)][string]$account,
        [parameter(mandatory=$true)][string]$driveletter
    )
    # get logical disk object 
    $disk = Get-CimInstance Win32_LogicalDisk -Filter "DeviceId = '$($driveletter -replace '^([a-z]):?$','$1:')'"  
    if(!$disk){
        throw "Logical Disk '$driveletter' does no exist."  
    }
    # get Win32_Account instance of the principal
    $principal = Get-CimInstance win32_Account -Filter "Name = '$account'"  
    if(!$principal){
        throw "Account '$account' does no exist."  
    }
    $instance = Get-CimInstance Win32_DiskQuota | ?{$_.QuotaVolume.DeviceId -eq $disk.DeviceID -and $_.User.Name -eq $principal.Name}
    if ($instance){
	$instance | Remove-CimInstance
    }else{
        write-warning "Specified entry not found."  
    }
}

# change disk quota entry settings
function Set-DiskQuotaEntry {
    param(
        [parameter(mandatory=$true)][string]$account,
        [parameter(mandatory=$true)][string]$driveletter,
        [parameter(mandatory=$false)][uint64]$warninglimit = [uint64]::MaxValue,
        [parameter(mandatory=$false)][uint64]$limit = [uint64]::MaxValue
    )
    # get logical disk object 
    $disk = Get-CimInstance Win32_LogicalDisk -Filter "DeviceId = '$($driveletter -replace '^([a-z]):?$','$1:')'"  
    if(!$disk){
        throw "Logical Disk '$driveletter' does no exist."  
    }
    # get Win32_Account instance of the principal
    $principal = Get-CimInstance win32_Account -Filter "Name = '$account'"  
    if(!$principal){
        throw "Account '$account' does no exist."  
    }
    # get disk quota entry
    $instance = Get-CimInstance Win32_DiskQuota | ?{$_.QuotaVolume.DeviceId -eq $disk.DeviceID -and $_.User.Name -eq $principal.Name}
    if ($instance){
        # change CIM instance limits
	    $instance | Set-CimInstance -Property @{Limit=[uint64]$limit;WarningLimit=[uint64]$warninglimit} -PassThru
    }else{
        write-warning "Specified entry not found."    
    }
}

# add new entry
New-DiskQuotaEntry -account "BenutzerA" -driveletter C: -limit 10GB -warninglimit 9GB  

# change existing entry
Set-DiskQuotaEntry -account "BenutzerA" -driveletter C: -limit 5GB -warninglimit 4GB  

# remove existing entry
Remove-DiskQuotaEntry -account "BenutzerA" -driveletter C: