Предупреждение пользователей об истечении пароля и действия учётной записи

Всем привет!
Столкнулись как-то с ситуацией, когда 1 января у многих пользователей истёк срок действия учётной записи и они были заблокированы. Соответственно не смогли работать, шквал телефонных звонков, начиная с утра 1-го числа. Было принято решение заранее предупреждать пользователей об истечении пароля и действия учётной записи по почте. С копией списка предупреждённых пользователей администратору.
Скрипты реализации под катом.

Для начала надо установить ActiveRoles Management Shell for Active Directory.

Скрипт истечении пароля

Скрипт предупреждает об истечении пароля обычных пользователей за 7 дней, за 3 дня и в день истечения. Топ-менеджеров предупреждает за 5 дней и до истечения.

Add-PSSnapin Quest.ActiveRoles.ADManagement    function send-eMail($to, $PasswordAge, $Days) { 	if ($PasswordAge -eq 0) { 		$subject = "Действие вашего пароля истекает сегодня." 	} else { 		$subject = "Действие вашего пароля истекает через $PasswordAge $Days." 	} 	write-host $to $PasswordAge 	$Enc = [Text.Encoding]::UTF8 	 	Send-MailMessage -to $to ` 			 -from "IT<it@domain.com>" ` 			 -subject "Внимание! $subject" `  		 -body "<span style='font: 11pt serif;'>Добрый день.<br/> 				$subject<br /> 				Рекомендуем изменить пароль, так как после истечения срока действия пароля Вы не сможете получить доступ к информационным ресурсам компании.<br /> 				Инструкция по смене пароля находится на портале в разделе «<a href='http://portal/Pages/Instructions.aspx'>Инструкции</a>».<br />" ` 			 -priority High ` 			 -dno onFailure ` 			 -smtpServer MAILSERVER ` 			 -BodyAsHtm ` 			 -Encoding $Enc }  function send-eMail-log($log, $to, $subject) { 	$Enc = [Text.Encoding]::UTF8 	$body = "<span style='font: 10pt tahoma;'>$log</span>" 	Send-MailMessage -to $to ` 			 -from "IT<it@domain.com>" ` 			 -subject $subject `  		 -body $body ` 			 -smtpServer MAILSERVER ` 			 -BodyAsHtm ` 			 -Encoding $Enc }  function get-dayCut($PasswordAge) { 	$Days = "дн" 	if ($PasswordAge -le 20 -and $PasswordAge -ge 5) { 		$Days = "дней" 	} 	if ($PasswordAge -le 4 -and $PasswordAge -ge 2) { 		$Days = "дня" 	} 	if ($PasswordAge -eq 1 -or $PasswordAge -eq 21) { 		$Days = "день" 	} 	return $Days } # У нас 45 дней: $PasswordAgeMax = (Get-QADObject (Get-QADRootDSE).defaultNamingContextDN).MaximumPasswordAge.days  write-host "Пароль истекает: "$PasswordAgeMax; $log = "" $logBoss = ""  # -- 7, 3 и 0 дней --------------------------------------------------------------------------------------------- Get-QADUser -SizeLimit 0 |  	Where-Object {$_.AccountIsDisabled -eq $False} | 		Where-Object {$_.PasswordNeverExpires -eq $False} | 			% { 				$PasswordAge = $PasswordAgeMax - ($_.passwordage.days) - 1 				$PasswordAge = [int]$PasswordAge   					 				if ($_.parentContainer -ne "domain/General/User") { 					if ($PasswordAge -eq 7 -or $PasswordAge -eq 3 -or $PasswordAge -eq 0) { 						$Days = get-dayCut $PasswordAge 						$addParam = $_.Title + ", " + $_.Department 						if (($_.mail).Length -gt 0) { 							send-eMail $_.mail $PasswordAge $Days		 							$addParam = $addParam + ", " + $_.mail 						}  						if ($PasswordAge -le 1) { 							$log = $log + "<span style='color:red;'>" + $_.DisplayName + ", " + $PasswordAge + " (" + $addParam + ")</span><br />" 						} else { 							$log = $log + $_.DisplayName + ", " + $PasswordAge + " (" + $addParam + ")<br />" 						} 					} 				} else { 					$Days = get-dayCut $PasswordAge; 					write-host $_.DisplayName": "$PasswordAge; 					if ($PasswordAge -le 5 -and $PasswordAge -ge 0) { 						send-eMail $_.mail $PasswordAge $Days 					} 					if ($PasswordAge -le 0) { 						$logBoss = $logBoss + $_.DisplayName + ", пароль уже истек (" + $_.mail + ", " + $_.telephoneNumber + ")<br />" 					} elseif ($PasswordAge -le 5 -and $PasswordAge -gt 0) { 						$logBoss = $logBoss + $_.DisplayName + ", пароль истекает через " + $PasswordAge + " " + $Days + " (" + $_.mail + ", " + $_.telephoneNumber + ")<br />" 					} 				} 			}  if ($log.Length -gt 0) { 	send-eMail-log $log "IT<it@domain.com>" "Журнал истечения пароля" }   if ($logBoss.Length -gt 0) { 	"admin1", "admin2", "admin3" | 		% {send-eMail-log $logBoss "$_@domain.com" "Журнал истечения пароля у директоров"} }  

Скрипт истечения действия учётной записи

Скрипт предупреждает пользователей об истечении действия учётной записи за 30, 20, 14, 7, 5 дней.

Add-PSSnapin Quest.ActiveRoles.ADManagement  function send-eMail($to,$lsDayCount) { 	write-host $to $lsDayCount; 	$Enc = [Text.Encoding]::UTF8 	Send-MailMessage -to $to ` 			 -from "IT<it@domain.com>" ` 			 -subject "Внимание! Ваша учетная запись истекает через $lsDayCount дней" `  			-body "<span style='font: 12pt serif;'>Добрый день.<br/> 				Срок действия вашей учетной записи истекает через $lsDayCount дней.</span>" ` 			 -priority High ` 			 -dno onFailure ` 			 -smtpServer MAILSERVER ` 			 -BodyAsHtm ` 			 -Encoding $Enc }  function send-eMail-log($log, $to, $subject) { 	$Enc = [Text.Encoding]::UTF8 	$body = "<span style='font: 10pt tahoma;'>" + $log + "</span>" 	#-Cc "admin1@domain.com" ` 	Send-MailMessage -to $to ` 			 -from "it@domain.com" ` 			 -subject $subject `  		-body $body ` 			 -smtpServer MAILSERVER ` 			 -BodyAsHtm ` 			 -Encoding $Enc }  function check-null($lsPar, $lbComma) { 	$lsTmp = $lsPar; 	if ($lsPar.Length -gt 0) { 		if ($lbComma) { 			$lsTmp = $lsPar + ", "; 		} 	} else { 		$lsTmp = ""; 	} 	return $lsTmp; }  # -- 5, 7, 14, 20, 30 дней ------------------------------------------------------------------------------------- $targetdate5  = ((get-date).AddDays(5)).ToShortDateString(); $targetdate7  = ((get-date).AddDays(7)).ToShortDateString(); $targetdate14 = ((get-date).AddDays(14)).ToShortDateString(); $targetdate20 = ((get-date).AddDays(20)).ToShortDateString(); $targetdate30 = ((get-date).AddDays(30)).ToShortDateString();  $gLog = ""; $gLog5 = ""; $gLog7 = ""; $gLog14 = ""; $gLog20 = ""; $gLog30 = "";  write-host $targetdate5 $targetdate7 $targetdate14 $targetdate20 $targetdate30;  Get-QADUser -SizeLimit 0 |  	Where-Object {$_.AccountExpires -ne $null} | 		Where-Object {$_.AccountIsDisabled -eq $False} | 			% { 				$gObjUser = $_; 				$gsUserOpt = ""; 				 				5,7,14,20,30 | % { 					$targetdate  = ((get-date).AddDays($_)).ToShortDateString(); 					 					if (($gObjUser.AccountExpires).ToShortDateString() -eq $targetdate) { 						write-host $gObjUser.DisplayName"`t"($gObjUser.AccountExpires).ToShortDateString(); 						if (($gObjUser.mail).Length -gt 0) { 							send-eMail $gObjUser.mail $_; 						} 						$gsUserOpt = (check-null $gObjUser.Title $TRUE) +  									 (check-null $gObjUser.Department $TRUE) +  									 (check-null $gObjUser.mail $TRUE) +  									 (check-null $gObjUser.telephoneNumber $FALSE); 						if ($gsUserOpt.Length -gt 0) { 							if ($gsUserOpt.substring($gsUserOpt.length - 2, 2) -eq ", ") { 								$gsUserOpt = $gsUserOpt.substring(0, $gsUserOpt.length - 2); 							} 							$gsUserOpt = " (" + $gsUserOpt +")"; 						} 						$gsUserOpt = $gObjUser.DisplayName + $gsUserOpt +"<br />"; 						switch ($_) { 							5  {$gLog5  = $gLog5  + $gsUserOpt; break} 							7  {$gLog7  = $gLog7  + $gsUserOpt; break} 							14 {$gLog14 = $gLog14 + $gsUserOpt; break} 							20 {$gLog20 = $gLog20 + $gsUserOpt; break} 							30 {$gLog30 = $gLog30 + $gsUserOpt; break} 						} 					} 				} 			}   if ($gLog5.Length -gt 0)  { 	$gLog = "<strong>5 дней, истекает $targetdate5</strong><br />" + $gLog5 + "<br />"}  if ($gLog7.Length -gt 0)  { 	$gLog = $gLog + "<strong>7 дней, истекает $targetdate7</strong><br />" + $gLog7 + "<br />"}  if ($gLog14.Length -gt 0) { 	$gLog = $gLog + "<strong>14 дней, истекает $targetdate14</strong><br />" + $gLog14 + "<br />"}  if ($gLog20.Length -gt 0) { 	$gLog = $gLog + "<strong>20 дней, истекает $targetdate20</strong><br />" + $gLog20 + "<br />"}  if ($gLog30.Length -gt 0) { 	$gLog = $gLog + "<strong>30 дней, истекает $targetdate30</strong><br />" + $gLog30 + "<br />"}  			 if ($gLog.Length -gt 0) { 	"admin1", "admin2", "admin3" | 		% {send-eMail-log $gLog "$_@domain.com" "Журнал истечения учетной записи"} }  

Предупреждайте пользователей заранее. Комментарии приветствуются.