Skript, millega saab public folderitesse õiguseid lisada - PowerShell

Esialgu saab antud asjaga ainult õiguseid lisada. Kui jõuan, kirjutan juurde ka õiguste eemaldamise variandi.

#Skript, millega saab lisada public folderitesse õiguseid
#Chris Sinihelm, AK41, 2010
#List public folderitest + kuupäev
$i = Read-Host "Kas sa tahad listi public folderitest? Jah/Ei"
if ($i -eq 'Jah'){
    Get-Date >  publicfolders.txt
    Get-PublicFolder -Recurse | Format-List Name >>  publicfolders.txt
    Write-Host "List public folderitest on loodud faili publicfolders.txt"
}else{
#Kui tead juba, kuhu õiguseid tahad
    $kaustanimi = read-host "Sisesta public folderi nimi kujul \peakaust\folder nimi"}
#Mis õigused antud kausta hetkel on
#$w = Get-PublicFolderClientPermission "$kaustanimi" | format-list
#Write-Host "Hetkel on antud kausta järgnevad õigused: " 
#$w
#Kellele õiguseid tahetakse
$kasutajaalias = read-host "Sisesta tunnuse ALIAS, kellele õiguseid muudetakse: "
#Mis õiguseid tahetakse
$oigused = read-host "Vali õigused, mis lisatakse: 
* None - FolderVisible
* Owner - CreateItems, ReadItems, CreateSubfolders, FolderOwner, Folder Contact, FolderVisible, EditOwnedItems, EditAllItems, DeleteOwnedItems, DeleteAllItems
* PublishingEditor - CreateItems, ReadItems, CreateSubfolders, FolderVisible, EditOwnedItems, EditAllItems, DeleteOwnedItems, DeleteAllItems
* Editor - CreateItems, ReadItems, FolderVisible, EditOwnedItems, EditAllItems, DeleteOwnedItems, DeleteAllItems
* PublishingAuthor - CreateItems, ReadItems, CreateSubfolders, FolderVisible, EditOwnedItems, DeleteOwnedItems
* Author - CreateItems, ReadItems, FolderVisible, EditOwnedItems, DeleteOwnedItems
* NonEditingAuthor - CreateItems, ReadItems, FolderVisible
* Reviewer - ReadItems, FolderVisible
* Contributor - CreateItems, FolderVisible"
#Õiguste lisamine
try
{
    Add-PublicFolderClientPermission -Identity "$kaustanimi" -User "$kasutajaalias" -AccessRights $oigused;
    #Kuvatakse kellele ja mis õigused on antud.
    Write-Host "Järgnevale kasutajale: " 
    $kasutajaalias 
    Write-Host "Anti järgnevad õigused: "
    $oigused 
    Write-Host "Sellisesse kausta:"
    $kaustanimi
}
Catch
{
    write-host "Midagi läks viltu (Error:"  $_.Exception.Message ")"
    write-host
}
finally 
{ }