DLActivityScripts/DLWeeklyInactivityReport-Public.ps1 at master · ascivv/DLActivityScripts · GitHub

1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
30
31
32
33
34
35
36
37
38
39
40
41
42
43
44
45
46
47
48
49
50
51
52
53
54
55
56
57
58
59
60
61
62
63
64
65

<#
	.NOTES
	===========================================================================
	 Updated on:   	8/31/2018
	 Created by:    /u/ascIVV
	===========================================================================

	.
        Exchange Online Powershell is required for message trace.
		https://docs.microsoft.com/en-us/powershell/exchange/exchange-online/connect-to-exchange-online-powershell/connect-to-exchange-online-powershell?view=exchange-ps

	.DESCRIPTION
		Generate a basic report of unused Distrobution Lists in your O365 tenant. Save the results and then compare four weeks of results with the DLMonthlyInactivty report.


#>


#Connection info
$Username = "admin@email.com"
$PasswordPath = "c:\path\to\mysecure\password.txt"

#Set the constants
$Date = get-date -format MMddyyyy
$ReportsFolder = "\\fileshare\reportsfolder\"

#Read the password from the file and convert to SecureString
$SecurePassword = Get-Content $PasswordPath | ConvertTo-SecureString

#Build a Credential Object from the password file and the $username constant
$Credential = New-Object System.Management.Automation.PSCredential -ArgumentList $Username, $SecurePassword

#Open a session to O365
$ExOSession = New-PSSession -ConfigurationName Microsoft.Exchange -ConnectionUri https://outlook.office365.com/powershell-liveid/ -Credential $Credential -Authentication  Basic -AllowRedirection
import-PSSession $ExOSession -AllowClobber

#This will run a message activity report on all distribution lists for the past week and output the inactive lists.
#Get all Distribution Lists.
$DistroLists = Get-DistributionGroup -ResultSize Unlimited

#Run message trace on each Distribution List to see if it recieved mail in the past x days.
$DistroListsInUse = $DistroLists | select -ExpandProperty primarysmtpaddress  | Foreach-Object { Get-MessageTrace -RecipientAddress $_ -Status expanded -startdate (Get-Date).AddDays(-8) -EndDate (Get-Date) -pagesize 1| select -first 1}

#Check to see if the message trace shows recieved mail vs. not returning anything and output active status respectivly.
$Results =  Compare-Object -ReferenceObject $DistroListsinUse.RecipientAddress -DifferenceObject $DistroLists.primarySMTPaddress -PassThru

#Set export file name
$DLActivityReport = ("$ReportsFolder"+"Inactive"+"$Date"+".txt")

#Export the findings to a file
$Results | Out-File $DLActivityReport

#Send an email with the findings
$From = "admin@email.com"
$To = @("email1@email.com , email2@email.com")
$Subject = "Weekly Distribution List Inactivity Report"
$Body = "This is a confirmation the Weekly DL Inactivity Report script has completed successfully. See the attached file for distribution lists that have not been emailed this week. This file has also been saved in the file share so it can be accessed by the Monthly DL Inactivity Report script."
$SMTPServer = "smtp.office365.com"
$SMTPPort = "587"

Send-MailMessage -From $From -to $To -Subject $Subject -Body $Body -SmtpServer $SMTPServer -port $SMTPPort -UseSsl -Credential $Credential -Attachments $DLActivityReport

#Close the session to O365
Remove-PSSession $ExOSession