New DL with Manager Permission

$DLName = read-host -prompt "Enter DL Name"

$ManagedBy = read-host -prompt "Enter DL Manager"

new-DistributionGroup -Name $DLName -Type 'Distribution' -OrganizationalUnit 'corporate.domain.com/Domain Users/Distribution Groups' -SamAccountName $DLName -managedby $ManagedBy

Do

{ $error.clear()

Get-distributiongroup $DLName | Add-ADPermission -user $ManagedBy -AccessRights "WriteProperty" -ExtendedRights "Self-Membership" |

Add-ADPermission -user $ManagedBy -AccessRights "WriteProperty" -Properties Member -InheritanceType None

start-sleep 6

} while ($error -ne $null)