StaleComputers.ps1

Import-Module ActiveDirectory



$layout = "<style>"
$layout = $layout + "BODY{background-color:White;}"
$layout = $layout + "TABLE{border-width: 1px;border-style: solid;border-color: black;border-collapse: collapse;}"
$layout = $layout + "TH{border-width: 1px;padding: 5px;border-style: solid;border-color: black;background-color:LightGrey}"
$layout = $layout + "TD{border-width: 1px;padding: 5px;border-style: solid;border-color: black;background-color:ForalWhite}"
$layout = $layout + "</style>"
$d = [DateTime]::Today.AddDays(-30) 
$stale = Get-ADComputer -Filter  'PasswordLastSet -le $d' -SearchBase "OU=EnerBank Computers,DC=EnerBank,DC=local" -properties PasswordLastSet 
$liststale = $stale | Sort Name | ConvertTo-HTML -Head $layout Name, DistinguishedName, PasswordLastSet -Body "<H2>The Following Machines Have Not Contacted the Domain in the Past 30 Days:</H2>"
$countstale = $stale | group-object computer | ConvertTo-HTML -Head $layout Count -Body "<H2>Total Stale Machine Count</H2>" 
                
  $messageParameters = @{                        
                Subject = "Stale Computer Report from $env:ComputerName.$env:USERDNSDOMAIN - $((Get-Date).ToShortDateString())"                    
                Body = $countstale, $liststale |
                Out-String                    
                From = "thart@enerbankusa.com"                        
                To = "thart@enerbankusa.com"                        
                SmtpServer = "mail1.enerbank.local"                        
            }                        
            Send-MailMessage @messageParameters -BodyAsHtml
            #Send-MailMessage -To $ToEmailAddress -Subject $emailSubject -SmtpServer $SMTPServer -From $FromEmailAddress -BodyAsHtml -Body $emailBody