$SchoolList = Import-Csv -Path "C:\Powershell\CSV\MailboxDatabaseswithUPN.csv"
Get-QADUser -Sizelimit 0 `
            -Title teacher , staff `
            -IncludedProperties Name, dn, samaccountname `
            -CreatedAfter (Get-Date).AddDays(-1) |
ForEach-Object{
$DN = $_.DN
$dn1 = $DN -replace "CN=.*,OU=foo2,OU=",""
$School = $dn1 -replace ",OU=foo,DC=domain,DC=co,DC=uk",""
$User = $_.Name

$SchoolList |
ForEach-Object {
if ($School -eq $_.School){
$Server = $_.ExchangeServer            
$StorageGroup = $_.StorageGroup            
$MailboxDatabase = $_.MailboxDatabase
$Database = $Server + "\" + $StorageGroup + "\" + $MailboxDatabase

Enable-Mailbox -Identity $User `
               -Alias $User `
               -Database $Database
 
Start-Sleep -Seconds 10
            
$mailbox = Get-Mailbox -Identity $User            
$newaddress = $User + "@" + $School + ".domain.co.uk"           
$mailbox.EmailAddresses += $newaddress

Set-Mailbox -Identity $mailbox.alias `
            -EmailAddresses $mailbox.EmailAddresses                      
Set-Mailbox -Identity $mailbox.alias `
            -PrimarySmtpAddress $newaddress -EmailAddressPolicyEnabled $false
}
} 
} | Select-Object -Property Name, School |
Out-File "C:\Scripts\YesterdaysCreate.txt"

# Users Changed X Days Ago

$Global:Date = Get-Date -Format d

Get-QADUser -Sizelimit 0 `
            -Title teacher , staff `
            -LastChangedOn (Get-Date).AddDays(-1) `
            -IncludedProperties Name, dn, whenchanged, samaccountname |
ForEach-Object{
$DN = $_.DN
$dn1 = $DN -replace "CN=.*,OU=foo1,OU=",""
$School = $dn1 -replace ",OU=foo,DC=domain,DC=sch,DC=uk",""
$User = $_.Name

Start-Sleep -Seconds 10
            
$mailbox = Get-Mailbox -Identity $User            
$newaddress = $User + "@" + $School + ".domain.co.uk"           
$mailbox.EmailAddresses += $newaddress

Set-Mailbox -Identity $mailbox.alias `
            -EmailAddresses $mailbox.EmailAddresses                      
Set-Mailbox -Identity $mailbox.alias `
            -PrimarySmtpAddress $newaddress -EmailAddressPolicyEnabled $false
} | Select-Object -Property  Name , School |
Out-File "C:\Scripts\YesterdaysRenames.txt"

$File = "C:\Scripts\YesterdaysCreate.txt"
$File1 = "C:\Scripts\YesterdaysRenames.txt"
$smtpServer = "smtpserver"

$msg = New-Object Net.Mail.MailMessage
$att = New-Object Net.Mail.Attachment($File , $File1)
$smtp = New-Object Net.Mail.SmtpClient($smtpServer)

$msg.From = "user@domain.co.uk"
$msg.To.Add("user@domain.co.uk")
$msg.Subject = "Latest Teacher And Staff Updates From ADP."
$msg.Body = "Attatched are the list of Teachers and Staff from Yesterday, Please Setup the E-Mail Accounts As Required."
$msg.Attachments.Add($att)