PowerShell 替换 Office365 用户主邮件地址

死siua11

#首先我得获取一个名单，这个名单一部分是现有AD里面的，还有一部分是通过Excel发给我的　　

　　
$result=@()
　　
$users=get-aduser -Filter {proxyaddresses -like "*old.com.au*"} -Properties proxyaddresses -SearchBase "ou=old,ou=melbourne,dc=test,dc=com,dc=au"
　　
foreach( $user in $users){
　　
foreach ($address in $user.proxyAddresses)
　　
{
　　
   if($address -like "*@old.com.au*"){
　　

　　
   $rappaddress=$address.Substring(5)
　　
   break;
　　

　　
   }
　　

　　
}
　　
$temp=[pscustomobject]@{"Full Name"=$user.Name;"Current Email"=$rappaddress}
　　
$result+=$temp
　　
}
　　
#$result
　　
$a=import-csv C:\temp\newuserList.csv | select "Full Name", "Current Email"
　　
$oo=$result+$a
　　

　　

　　
#获取名单以后，对于名单当前的用户 我希望获取他们的主邮件地址，于是写了个function
　　

　　
function Get-PrimarySMTP(){
　　
    [CmdletBinding()]
　　

　　
    Param
　　
    (
　　
        # Param1 help description
　　
        [Parameter(Mandatory=$true,
　　
                   ValueFromPipelineByPropertyName=$true,
　　
                   Position=0)]
　　
        [string[]]
　　
        $users
　　
    )
　　
$pp=$null
　　
$pp=@{'name'=$null;'primarysmtp'=$null}
　　
$obj=New-Object -TypeName psobject -Property $pp
　　

　　
$result=@()
　　
foreach($user in $users){
　　
$info=get-aduser -Filter {name -eq $user} -Properties proxyaddresses
　　
$primarySMTPAddress = ""
　　
foreach ($address in $info.proxyAddresses)
　　
{
　　
    if (($address.Length -gt 5) -and ($address.SubString(0,5) -ceq 'SMTP:') )
　　
    {
　　
        $primarySMTPAddress = $address.SubString(5)
　　

　　
        break
　　
    }
　　
}
　　
$objtemp=$obj | select *
　　
$objtemp.name=$info.Name
　　
$objtemp.primarysmtp=$primarySMTPAddress
　　
$result+=$objtemp
　　
}
　　
$result
　　
}
　　

　　
#执行看看 当前用户的主SMTP地址
　　
Get-PrimarySMTP -users $users
　　

　　

　　
#对于每一个用户的每一个地址进行循环，如果是大写的那就变成小写，如果小写的刚好是我需要的那个，那就改成大写
　　

　　
$users=$oo | sort "full Name"|select -ExpandProperty "Full Name"
　　

　　
foreach($user in $users){
　　
$info=get-aduser -Filter {name -eq $user} -Properties proxyaddresses
　　
$filter="smtp:"+$info.GivenName+"."+$info.Surname+"@new.com"
　　
$new=@()
　　
foreach($address in $info.proxyaddresses){
　　
$temp=$address
　　
if($address -clike "SMTP*"){
　　
$temp=$address.ToLower()
　　
}
　　
if($address -like $filter){
　　
$temp=$address.Substring(0,4).toupper()+$address.Substring(4).tolower()
　　
}
　　
$new+=$temp
　　
}
　　
write-host "---------------------------" -ForegroundColor Cyan
　　
$new
　　
set-aduser $info.SamAccountName -Replace @{proxyaddresses=$new} -confirm
　　
}
　　

　　
#然后同步一下DC
　　
repadmin /syncall syddc01 dc=omnicom,dc=com,dc=au /d /e /a
　　

　　
#再看看新的的SMTP主地址
　　
Get-PrimarySMTP -users $users
　　

　　
#同步到O365
　　
import-module dirsync
　　
Start-OnlineCoexistenceSync
　　

　　
#通过Azure AD 模块查询O365的邮箱看看是否已经更新了
　　
$users | get-mailbox | select name, primarysmtpaddress