И ещё раз про чистку мусора в папках Exchange Server 2013

Начало:

1. Exchange Server 2013 – чистим мусор. Дополнение.
2. Ещё раз про чистку мусора в папках Exchange Server 2013

Ещё раз дополнил скрипт: теперь он чистить папку c:\windows\temp (Её размер, как оказалось, может со временем достигать несколько гигабайт)

$daysholdlogs = 30
  
$MailServer="http://cas.domain.ru/PowerShell/"; 
$MailServerSession = New-PSSession -ConfigurationName Microsoft.Exchange -ConnectionUri $MailServer -Authentication Kerberos
$MailServers = Invoke-Command -Session $MailServerSession -ScriptBlock {Get-ExchangeServer | Select-Object -ExpandProperty FQDN}
 
Remove-PSSession $MailServerSession

$cmd = {
 
   param ($daysholdlogs)
 
   Import-Module WebAdministration
 
   Get-WebSite | % { 
  $logdir = "$([System.Environment]::ExpandEnvironmentVariables($_.logFile.directory))\W3SVC$($_.Id)"
  ([wmi]"root\cimv2:win32_directory.name='$logdir'").compress() | Out-Null
  dir $logdir
  } |
       ? {$_.LastWriteTime -lt $(Get-Date).Adddays(-$daysholdlogs) } | Remove-Item -Force
 
   $httperr_path=(Get-ItemProperty -Path HKLM:\System\CurrentControlSet\Services\HTTP\Parameters).ErrorLoggingDir
 
   if (-not $httperr_path) {
 $httperr_path = "%systemroot%\System32\LogFiles"
   }
 
   $httperr_path = "$([System.Environment]::ExpandEnvironmentVariables($httperr_path))\HTTPERR"
   dir $httperr_path | ? {$_.LastWriteTime -lt $(Get-Date).Adddays(-$daysholdlogs) } | Remove-Item -Force
   $exchange_log_path = "$([System.Environment]::ExpandEnvironmentVariables($env:exchangeinstallpath))\Logging"
   dir -Recurse -File $exchange_log_path | ? {$_.LastWriteTime -lt $(Get-Date).Adddays(-$daysholdlogs) } | Remove-Item -Force
 
   Remove-Item "c:\windows\temp" -Recurse -Force -ErrorAction SilentlyContinue
} # End $cmd
Invoke-Command -Computername $MailServers -ScriptBlock $cmd  -ArgumentList $daysholdlogs

Реклама