Code Snippetget-adpermission "All Address Lists" | Where {($_.User -like 'NTAuthority\Authenticated Users') -and ($_.IsInherited -eq $false)} |Remove-ADPermissionremove-addresslist "All Contacts"remove-addresslist "All Groups"remove-addresslist "All Rooms"remove-addresslist "All Users"remove-addresslist "Public Folders"$galContainer = "CN=All Global Address Lists,CN=Address Lists Container,CN=Confused Amused,CN=Microsoft Exchange,CN=Services,CN=Configuration,DC=ptown,DC=local"Get-ADPermission $galContainer -user "authenticated users"$container = "CN=Offline Address Lists,CN=Address Lists Container,CN=Confused Amused,CN=Microsoft Exchange,CN=Services,CN=Configuration,DC=ptown,DC=local"remove-adpermission $container -user "NT AUTHORITY\Authenticated Users" -ExtendedRights 'ms-Exch-Download-OAB'$oabcontainer = "CN=Offline Address Lists,CN=Address Lists Container,CN=Confused Amused,CN=Microsoft Exchange,CN=Services,CN=Configuration,DC=ptown,DC=local"Get-ADPermission $oabContainer -user "authenticated users"New-DistributionGroup -Name "All Hosted Groups SG"-OrganizationalUnit "ptown.local/Companies" -SamAccountName"AllHostedGroupsSG" -Alias "AllHostedGroupsSG" -Type "Security"Add-ADPermission -Identity "CN=Address Lists Container,CN=Confused Amused,CN=Microsoft Exchange,CN=Services,CN=Configuration,DC=ptown,DC=local" -User "All Hosted Groups SG" -AccessRights GenericRead -DenyAdd-ADPermission -Identity "CN=Address Lists Container,CN=Confused Amused,CN=Microsoft Exchange,CN=Services,CN=Configuration,DC=ptown,DC=local" -User "All Hosted Groups SG" -AccessRights ReadProperty -Properties "Open Address List" -Deny
There is an amazing pack of free network admin tools. click here to download it




