Windows server 2012 R2 AD域密码过期邮件提醒

最近接领导指示，说要做一个域密码提醒的服务，这样会更人性化些，员工也就不必等过期了来找管理员重置。但是但是本人不懂脚本，就干脆从网上找了些链接做为参考，这里感谢此链接的作者 https://www.yeboyzq.com/windowsserver/632.html

以下是最终的过程

Import-Module Activedirectory

$alladuser=get-aduser -searchbase "ou=,ou=,dc=*,dc=com" -Filter 'PasswordNeverExpires -eq "false" -and enabled -eq "true"' |ForEach{$_.SamAccountName}

$userlist = @()

$itmag = "@.com"

function sendmail($mailaddr,$body) #定义发送邮件的方法
{
$msg=New-Object System.Net.Mail.MailMessage
$msg.To.Add($mailaddr)
#$msg.Bcc.Add($itmag)
$msg.From = New-Object System.Net.Mail.MailAddress("@.com", "@.