<# .SYNOPSIS .NOTES Version: 1.0 Author: Hubert CORNET Creation Date: Purpose/Change: Initial script development .LINK https://www.tips-of-mine.fr .EXEMPLE .DESCRIPTION .PARAMETER .INPUTS .OUTPUTS .log> #> #---------------------------------------------------------[Initialisations]-------------------------------------------------------- Param ( # Nom du serveur [string]$UpdateServer = 'SWADMAPPP01', # Port TCP WSUS, par défaut 8530 [int]$Port = 8530, [bool]$Secure = $False # Set this to TRUE if you use HTTPS to access WSUS service. ) # Définir l'action d'erreur pour continuer silencieusement $ErrorActionPreference = "SilentlyContinue" # Bibliothèques de fonctions requises #----------------------------------------------------------[Declarations]---------------------------------------------------------- # Version Script $sScriptVersion = "1.0" #Log File Info $sLogPath = "C:\Tmp" $sLogName = ".log" $sLogFile = Join-Path -Path $sLogPath -ChildPath $sLogName #-----------------------------------------------------------[Functions]------------------------------------------------------------ #------------------------------------------------------------[Script]-------------------------------------------------------------- cls # Variable pour l'envoi de mail # Adresse du serveur SMTP $smtp = "relaissmtp.fr.dgs.group" # Destinataire 1 $to1 = "vianney.lavoillotte-ext@saint-maclou.com" # Destinataire 1 $to2 = "production@saint-maclou.com" # Adresse de l'émeteur, définit par le nom du serveur $from = $UpdateServer + "<" + $UpdateServer + "@saint-maclou.com>" $MsgBody = "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "Rapport des machines du serveur WSUS :" + $UpdateServer + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody= $MsgBody + "

Rapport des machines du serveur WSUS : " + $UpdateServer + "

" $intLineCounter = 0 # To count computers. Remove-Item -force PcStatusReport.txt # This is a small log file to keep track of the last run results. It needs to be removed before start reading the list. If (-Not (Import-Module UpdateServices -PassThru)) { Add-Type -Path "$Env:ProgramFiles\Update Services\Api\Microsoft.UpdateServices.Administration.dll" -PassThru } $Wsus = [Microsoft.UpdateServices.Administration.AdminProxy]::GetUpdateServer($UpdateServer,$Secure,$Port) # With this we get connected to the WSUS server. $CTScope = New-Object Microsoft.UpdateServices.Administration.ComputerTargetScope #This will the our scope, it includes all computers registered in the WSUS server. # Now, lets write the HTML table headers. $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" # This is the main part: Here we will sort the list of computers by name, and get details for each one of them. $wsus.GetComputerTargets($CTScope) | Sort -Property FullDomainName | ForEach { $objSummary = $_.GetUpdateInstallationSummary() # This is an intermediate object that contains the details. $Down = $objSummary.DownloadedCount # This is the amount of updates that has been downloaded already. $Fail = $objSummary.FailedCount # This is the count for the failed updates. $Pend = $objSummary.InstalledPendingRebootCount # This is the number of updates that need to reboot to complete installation. $NotI = $objSummary.NotInstalledCount # These are the needed updates for this computer. $Unkn = $objSummary.UnknownCount # These are the updates that are waiting for detection on the first search. $Total = $Down + $Fail + $Pend + $NotI + $Unkn # Total amount of updates for this computer. $intLineCounter = $intLineCounter + 1 # Increase the table line counter. $IntStr = [Convert]::ToString($intLineCounter) # convert it to string to put it on the HTML code. if ($Total -eq 0) {$Estado="OK"; $bgcolor="LightGreen"} elseif ($Pend -ne 0) {$Estado="Reboot needed"; $bgcolor="LightSalmon"} elseif ($Down -ne 0) {$Estado="Ready to install"; $bgcolor="Cyan"} elseif ($NotI -ne 0) {$Estado="Pending"; $bgcolor="Yellow"} elseif ($Fail -ne 0) {$Estado="Error"; $bgcolor="IndianRed"} elseif ($Unkn -ne 0) {$Estado="Not reported yet"; $bgcolor="Silver"} else {$Estado=""; $bgcolor="White"} Write-Verbose ($IntStr + " : " + $_.FullDomainName) -Verbose # Show task progress on screen. $LastContact = $_.LastReportedStatusTime # This is the last time when the computer reported to the wsus. $days = [Math]::Ceiling((New-TimeSpan -Start $LastContact).TotalDays) # This is the number of days since last time. if ($days -gt 14) {$Color="Red"} # Computer is away for too long. elseif ($days -gt 7) {$Color="Orange"} # Computer may be in trouble. elseif ($days -gt 2) {$Color="Yellow"} # Computer may be off. else {$Color="White"} # Computer is ok. # Reformat days to a more human-readable form. if ($days -eq 0) {$Dias="Today"} elseif ($days -eq 1) {$Dias="Yesterday"} else {$Dias="Since " + $days + " days."} if ($LastContact -eq [DateTime]::MinValue) {$Dias="Never"; $Color="Silver"} # Now write the table row with all the info. $MsgBody = $MsgBody + " " $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" $_.FullDomainName >> PcStatusReport.txt # And append a new line on the log file. } $MsgBody = $MsgBody + "
IndexStatusComputer NameIP AddressLast ContactTotal updatesAwaiting rebootReady to installDownload pendingFailedUnknown State
" + $IntStr +" " + $Estado + " " + $_.FullDomainName+ " " + $_.IPAddress + " " + $Dias +"" + $Total + "" + $Pend + "" + $Down + "" + $NotI + "" + $Fail + "" + $Unkn + "

" # Finish the HTML table. if ($intLineCounter -eq 0) { Write-Verbose ("You must run this script from as administrator to read WSUS database.") -Verbose # Display a warning if not run with admin privileges. $MsgBody = $MsgBody + " You must run this script from as administrator to read WSUS database.
" } else { $MsgBody = $MsgBody + "
" } #This is a footnote for the report readers. $MsgBody = $MsgBody + "

Note:

The updates are applied in a sequential three-steps process: Search, Download and Install.
Each computer has to go through these three stages to be updated.
    " $MsgBody = $MsgBody + "
  • Before the first time a search is run, it is unknown whether the computer will need some updating, thats why in this case all updates appear in Unknown State.
    • " $MsgBody = $MsgBody + "
  • Once the search is complete, the updates appear as Download pending, which are the updates that the computer specifically needs.
    • " $MsgBody = $MsgBody + "
  • When the computer has downloaded pending updates, these are counted as Ready to install.
    • " $MsgBody = $MsgBody + "
  • At the end of the installation stage you can get one of these results:
      • " $MsgBody = $MsgBody + "
    • OK: All necessary updates were installed correctly.
      • " $MsgBody = $MsgBody + "
    • ERROR: One or more required updates were not installed correctly.
      • " $MsgBody = $MsgBody + "
    • Reboot needed: The installation ended the first part, but you must restart the computer to complete the second part.
      • " $MsgBody = $MsgBody + "

" $MsgBody = $MsgBody + "If a computer is not connected to the server for more than 14 days is highlighted with color red.
" $MsgBody = $MsgBody + "If a computer is not connected to the server from 7 to 14 days is highlighted with color orange.
" $MsgBody = $MsgBody + "If a computer is not connected to the server from 2 to 6 days is highlighted with color yellow.
" $MsgBody = $MsgBody + "
" $MsgBody = $MsgBody + "
" + [System.DateTime]::Now + "
" # This is a timestamp at the end of the message, taking into account the SMTP delivery delay. $IntStr = [Convert]::ToString($intLineCounter) # convert the line counter to string $subject = $IntStr + " ordinateurs enregistres sur le serveur WSUS " + $UpdateServer # This will be the subject of the message. # Closing Body and HTML tags $MsgBody = $MsgBody + "" $MsgBody = $MsgBody + "" # Now send the email message and thats all. send-MailMessage -SmtpServer $smtp -To $to1, $to2 -From $from -Subject $subject -Body $MsgBody -BodyAsHtml -Priority high