#Бэкапим Exchange. Полный делелается и отрезаются логи.
#------------------задаем переменные-----------------------------
add-psSnapIn Windows.ServerBackup
#Куда будем складывать бэкапы
$TargetFolder = "\\SRV100\backup$\SRV101"
 
#Полный путь до папки или файла, для бэкапа. разделитель запятая.
$FilesToBackup ='C:\Program Files\Microsoft\Exchange Server\V14\Mailbox\Mailbox Database'
 
#Сколько  дней храним бэкапы (к примеру, после 4-х суток файлы из папки,
#куда сливаются бэкапы - будут удалены)
$DayToStore ="30"
 
#Почтовый сервер
$IPMailServer="172.0.0.2"
#От кого отправляем
$SenderEmail="WB_SRV101@InAdmin.ru"
#Кому отправляем
$RecipientEmail="Backup_report@InAdmin.ru"
 
#---------------------------------------------------------
CLS
 
#Получаем дату в формате 2009.06.15
$Date=Get-Date -uformat %Y.%m.%d
#день недели 1,2...7
$week_day=get-date -uformat %u
 
#Функция  удаляющая старые данные
Function RemoveOldBackup ( $Dir, $DaysToRemove  )
    {
    #Записываем дату до которой  будем удалять
    $LastWrite = (Get-date).AddDays(-$DaysToRemove)
 
    #выбираем только папки и смотрим на дату
    Get-ChildItem $Dir | ForEach {
        If (( $_.Attributes -eq "Directory") -and ($_.LastWriteTime -le $LastWrite))
                {
                #удаляем старые
                $RemoveDir = "$dir\"+$_.Name
                Remove-Item -Recurse -Force $RemoveDir
                write-output $_.Name "Папка удалена. ("$_.LastWriteTime") "
                }
 
            }
     } 
 
#Функция отправки почты
function Send-mail ($subj = "VM" ,$body = "Text", $AttachPath = "0")
    {
    $SMTPClient = new-object System.Net.Mail.SMTPClient
    $Msg = new-object System.Net.Mail.MailMessage
 
    #Проверка, есть ли вложение
    if ($AttachPath -ne "0")
        {
        $Attach = new-object System.Net.Mail.Attachment($AttachPath)
        $Msg.Attachments.add($Attach)
        }
    $Msg.To.Add($RecipientEmail)
    $Msg.from=$SenderEmail
    $Msg.Subject = $subj
    $Msg.Body= $body
    $SMTPClient.Host=$IPMailServer
    $SMTPClient.Send($Msg)
    if ($AttachPath -ne "0")
        {
        $Attach.Dispose()
        }
    } 
 
#Выбираем и создаем папки
#Папка с текущей датой
$TodayFolder="$TargetFolder\$date"
 
#Создаем папку с текущей датой
if ((Test-Path -path $TodayFolder) -ne $True)
    {
    New-Item $TodayFolder -type directory
    }       
 
#Запускаем запись лога
#Для того, что б потом посмотреть  лог, он будет отправлен по почте.
start-transcript "$TodayFolder\Backuplog.txt"
 
#Удаляем старые данные с сервера
write-output "### Очистка от старых резерв.копий"
 
#Удаляем уже ненужные данные.
RemoveOldBackup -Dir $TargetFolder -DaysToRemove $DayToStore
 
#Стартуем бэкап
write-output "### Начинаем резервное копирование данных"
write-output "`t### Запускаем полный бэкап"
#Создаем политику
$BPolicy = New-WBPolicy
#Добавляем нужные папки, где лежат базы и логи Exchange
$FolderBackup = new-WBFileSpec "$FilesToBackup\"
Add-wbFileSpec -policy $BPolicy $FolderBackup
#задаем путь куда делаем бэкап
Add-WBBackupTarget -Policy $BPolicy -Target (New-WBBackupTarget -network $TodayFolder)
#Ставим тип VSS полный, что бы логи обрезались.
Set-WBVssBackupOptions -Policy $BPolicy -VssFullBackup
#Запускаем работу
Start-WBBackup -Policy $BPolicy 
 
write-output "### Резервное копирование данных закончено"
 
#останавливаем запись лога
Stop-Transcript
 
#Отправим отчет о проделанной работе
#$MessageBody = get-content "$TodayFolder\Backuplog.txt"
Send-mail -subj "Backup Report (SRV101 - Ex2010- MB)" -body "Job Report.`nDB: Mailbox Database" -AttachPath "$TodayFolder\Backuplog.txt"