Remove files above 3

#Zapytaj o ścieżkę do folderu
[void][Reflection.Assembly]::LoadWithPartialName('Microsoft.VisualBasic')
$title = 'Usuń nadmiar plików ponad 3 zaczynając od najstarszych:'
$msg   = 'Wprowadź ścieżkę do folderu:'
$folderPath = [Microsoft.VisualBasic.Interaction]::InputBox($msg, $title)

# Alternatywnie można tą ścieżkę na sztywno zdefiniować np:
# $folderPath = "c:\tmp"
# i skasować lub wykomentować linie od 1 do 5

#Kontrakt walidacyjny
#Sprawdź czy folder istnieje, i czy nie jest pustym stringiem
if ([string]::IsNullOrEmpty($folderPath))
{
    Write-Host "Nie wprowadziłeś ścieżki"
}
else
{
    if (Test-Path $folderPath)
    {
        Write-Host "Folder" $folderPath "istnieje"
    }
    else
    {
        Write-Host "Folder nie itnieje pod tą ścieżką"
    }
}

#Policz pliki
$filesCount = ( Get-ChildItem $folderPath | Measure-Object ).Count
Write-Host "Znaleziono $filesCount plik/pliki/plików"

#Skasuj nadmiar powyżej 3 plików zaczynajac od najstarszych
if ($filesCount -gt 3)
{
    Write-Host "Kasuje" ($filesCount -3) "plik/pliki/plików"

    $sortedFiles = Get-ChildItem -Path $folderPath | Sort-Object -Property CreationTime -Descending

    $sortedFiles | Select-Object -Skip 3 | Remove-Item -Force
}
else
{
    Write-Host "Mniej niż 3 pliki w folderze"
}