Удаление файлов старше N дней на FTP-сервере

$Dir="***"
$ftp = "*******"
$user = "***"
$pass = "****"
$Days = "-5"
$CurrentDate = Get-Date
$OldDate = $CurrentDate.AddDays($Days)
 
$webclient = New-Object System.Net.WebClient
$webclient.Credentials = New-Object System.Net.NetworkCredential($user,$pass)
foreach($item in (dir $Dir "*")){
"Upload  item..."
$uri = New-Object System.Uri($ftp+$item.Name)
$webclient.UploadFile($uri, $item.FullName)

function Synch($DeistanationPath,$User,$Password,$DeleteFileFromDeistanation,$DeleteFileFromDeistanationDays)
{
 #Delete Files from ftp
 if ($DeleteFileFromDeistanation -eq $true)
 {  
  $FilesList = @()
  $ftp = [System.Net.FtpWebRequest]::Create($DeistanationPath)
  $ftp = [System.Net.FtpWebRequest]$ftp
  $ftp.Credentials = new-object System.Net.NetworkCredential($User,$Password)
  $ftp.UseBinary = $true
  $ftp.UsePassive = $true
  $ftp.Method = [System.Net.WebRequestMethods+Ftp]::ListDirectory
  $FTPResponse = $ftp.GetResponse()
  $ResponseStream = $FTPResponse.GetResponseStream()
  $FTPReader = New-Object System.IO.Streamreader -ArgumentList $ResponseStream
  while ($FTPReader.EndOfStream -ne $true)
  {
   try
   {
    $FileName = $FTPReader.ReadLine()
    $FilesList+=$FileName
   }
   catch
   {
    #Write-Debug $_
   }
  }
  $FTPReader.Close()
  #Получаем даты по каждому файлу и формируем новый список
  $FilesToDeleteList = @()
  foreach ($file in $FilesList)
  {
   $ftp = [System.Net.FtpWebRequest]::Create($DeistanationPath+$file)
   $ftp = [System.Net.FtpWebRequest]$ftp
   $ftp.Credentials = new-object System.Net.NetworkCredential($User,$Password)
   $ftp.UseBinary = $true
   $ftp.UsePassive = $true
   $ftp.Method = [System.Net.WebRequestMethods+Ftp]::GetDateTimestamp
   try
   {
    $FTPResponse = $ftp.GetResponse()
   }
   catch
   {
    continue
   }
   if ($FTPResponse.LastModified -lt [System.DateTime]::Now.AddDays((-1)*$DeleteFileFromDeistanationDays))
   {
    $FilesToDeleteList+=$file
   }
   $FTPResponse.Close()
   #$FTPResponse.Dispose()
  }
  #Производим удаление файлов
  foreach ($file in $FilesToDeleteList)
  {
   $ftp = [System.Net.FtpWebRequest]::Create($DeistanationPath+$file)
   $ftp = [System.Net.FtpWebRequest]$ftp
   $ftp.Credentials = new-object System.Net.NetworkCredential($User,$Password)
   $ftp.UseBinary = $true
   $ftp.UsePassive = $true
   $ftp.Method = [System.Net.WebRequestMethods+Ftp]::DeleteFile
   $FTPResponse = $ftp.GetResponse()
   $FTPResponse.Close()
   $FTPResponse.Dispose()
  }
 }
}
 
Synch "ftp://***/"  "user" "password" $true 2  $true 2