-----提供AD\Exchange\Lync\Sharepoint\CRM\SC\O365等微軟產(chǎn)品實(shí)施及外包，QQ:185426445.電話18666943750

創(chuàng)新互聯(lián)建站自2013年起，先為黑河等服務(wù)建站，黑河等地企業(yè)，進(jìn)行企業(yè)商務(wù)咨詢服務(wù)。為黑河企業(yè)網(wǎng)站制作PC+手機(jī)+微官網(wǎng)三網(wǎng)同步一站式服務(wù)解決您的所有建站問(wèn)題。

需求：根據(jù)要求對(duì)集團(tuán)AD域及下屬3個(gè)子域的所有AD賬號(hào)進(jìn)行統(tǒng)計(jì)，查詢所有鎖定的賬號(hào)，解鎖，并每天早上發(fā)送郵件到指向郵箱。

Import-Module activedirectory
$yuntcloud_Lockeduser = Search-ADAccount -LockedOut -SearchBase "dc=yuntcloud,dc=com" -server dc01 | select name, samaccountname
$aaa_Lockeduser = Search-ADAccount -LockedOut -SearchBase "dc=aaa,dc=yuntcloud,dc=com" -server aaaDC1 | select name, samaccountname
$bbb_Lockeduser = Search-ADAccount -LockedOut -SearchBase "dc=bbb,dc=yuntcloud,dc=com" -server bbbdc1 | select name, samaccountname
$ccc_Lockeduser = Search-ADAccount -LockedOut -SearchBase "dc=ccc,dc=yuntcloud,dc=com" -server cccDC1 | select name, samaccountname
#send email
$UserName = "test01@yuntcloud.com" #定義管理員賬戶名稱
$Password = ConvertTo-SecureString "Djds123" -AsPlainText –Force
$cred = New-Object System.Management.Automation.PSCredential($UserName, $Password)
$nFrom = "test01@yuntcloud.com"
$nTo = "zhouping@yuntcloud.com"
$lockeduser = @()
#Unlock yuntcloud Locked user
if ([string]::IsNullOrEmpty($($yuntcloud_Lockeduser|%{$_.name})))
{
 Write-Host "yuntcloud no locked user"
 Start-Sleep 5
 Send-MailMessage -From $nFrom -To $nTo -Subject "yuntcloud no locked user" -Body "yuntcloud no locked user" -Credential $cred -SmtpServer "mail.yuntcloud.com" -Encoding ([System.Text.Encoding]::UTF8)
}
else
{
 Write-Host "yuntcloud Locked user"
 foreach ($i in $yuntcloud_Lockeduser)
 {
  Write-Host $i.name
  $lockeduser += $i
 }
 Start-Sleep 5
 Search-ADAccount -LockedOut -SearchBase "dc=yuntcloud,dc=com" -server dc01 | Unlock-ADAccount
 Write-Host "yuntcloud all locked account were unlocked"
 $lockeduser | Export-Csv -Path c:\yuntcloud_lockeduser.csv -NoTypeInformation -Encoding utf8
 Send-MailMessage -From $nfrom -To $nto -Subject "yuntcloud locked user" -Body "yuntcloud locked user" -Attachments "c:\yuntcloud_lockeduser.csv" -Credential $cred -SmtpServer mail.yuntcloud.com -Encoding ([System.Text.Encoding]::UTF8)
 Start-Sleep 3
}
#Unlock aaa.yuntcloud.com Locked user
$lockeduser = @()
if ([string]::IsNullOrEmpty($($aaa_Lockeduser|%{$_.name})))
{
 Write-Host "aaa no locked user"
 Start-Sleep 5
 Send-MailMessage -From $nfrom -To $nto -Subject "aaa no locked user" -Body "aaa no locked user" -Credential $cred -SmtpServer mail.yuntcloud.com -Encoding ([System.Text.Encoding]::UTF8)
}
else
{
 Write-Host "aaa Locked user"
 foreach ($i in $aaa_Lockeduser)
 {
  Write-Host $i.name
  $lockeduser += $i
 }
 Start-Sleep 5
 Search-ADAccount -LockedOut -SearchBase "dc=aaa,dc=yuntcloud,dc=com" -server aaaDC1 | Unlock-ADAccount
 Write-Host "aaa all locked account were unlocked"
 $lockeduser | Export-Csv -Path c:\aaa_lockeduser.csv -NoTypeInformation -Encoding utf8
 Send-MailMessage -From $nfrom -To $nto -Subject "aaa locked user" -Body "aaa locked user" -Attachments "c:\aaa_lockeduser.csv" -Credential $cred -SmtpServer mail.yuntcloud.com -Encoding ([System.Text.Encoding]::UTF8)
 Start-Sleep 3
}
#Unlock bbb.yuntcloud.com Locked user
$lockeduser = @()
if ([string]::IsNullOrEmpty($($bbb_Lockeduser|%{$_.name})))
{
 Write-Host "bbb no locked user"
 Start-Sleep 5
 Send-MailMessage -From $nfrom -To $nto -Subject "bbb no locked user" -Body "bbb no locked user" -Credential $cred -SmtpServer mail.yuntcloud.com -Encoding ([System.Text.Encoding]::UTF8)
}
else
{
 Write-Host "bbb Locked user"
 foreach ($i in $bbb_Lockeduser)
 {
  Write-Host $i.name
  $lockeduser += $i
 }
 Start-Sleep 5
 Search-ADAccount -LockedOut -SearchBase "dc=bbb,dc=yuntcloud,dc=com" -server bbbdc1 | Unlock-ADAccount
 Write-Host "bbb all locked account were unlocked"
 $lockeduser | Export-Csv -Path c:\bbb_lockeduser.csv -NoTypeInformation -Encoding utf8
 Send-MailMessage -From $nfrom -To $nto -Subject "bbb locked user" -Body "bbb locked user" -Attachments "c:\bbb_lockeduser.csv" -Credential $cred -SmtpServer mail.yuntcloud.com -Encoding ([System.Text.Encoding]::UTF8)
 Start-Sleep 3
}
#Unlock ccc.yuntcloud.com Locked user
$lockeduser = @()
if ([string]::IsNullOrEmpty($($ccc_Lockeduser|%{$_.name})))
{
 Write-Host "ccc no locked user"
 Start-Sleep 5
 Send-MailMessage -From $nfrom -To $nto -Subject "ccc no locked user" -Body "ccc no locked user" -Credential $cred -SmtpServer mail.yuntcloud.com -Encoding ([System.Text.Encoding]::UTF8)
}
else
{
 Write-Host "ccc Locked user"
 foreach ($i in $ccc_Lockeduser)
 {
  Write-Host $i.name
  $lockeduser += $i
 }
 Start-Sleep 5
 Search-ADAccount -LockedOut -SearchBase "dc=ccc,dc=yuntcloud,dc=com" -server cccDC1 | Unlock-ADAccount
 Write-Host "ccc all locked account were unlocked"
 $lockeduser | Export-Csv -Path c:\ccc_lockeduser.csv -NoTypeInformation -Encoding utf8
 Send-MailMessage -From $nfrom -To $nto -Subject "ccc locked user" -Body "ccc locked user" -Attachments "c:\ccc_lockeduser.csv" -Credential $cred -SmtpServer mail.yuntcloud.com -Encoding ([System.Text.Encoding]::UTF8)
 Start-Sleep 3
}