E-Mail Addresse zu Kontakt hinzufügen

Es kommt vor, dass man einem Exchange-Kontakt eine E-Mail Adresse hinzufügen muss. Dieses Skripte habe ich in meiner Sammlung gefunden. Es stammt ursprünglich NICHT von mir, ich habe es lediglich etwas modifiziert.

Function Add-EmailAddressToContact {

    param($Identity, $EmailAddress)

    begin {
        $mb = Get-MailContact $Identity
        if($mb.EmailAddressPolicyEnabled) {
            Set-MailContact $Identity -EmailAddressPolicyEnabled $false
            $policy += 1
        }
        $addresses = $mb.EmailAddresses += $EmailAddress
    }

    process {
        Set-MailContact $Identity -EmailAddresses $addresses
    }

    end {
        if($policy){
			Set-MailContact $Identity -EmailAddressPolicyEnabled $true
		}
    }
}