rolling checkpoints? :D

RollingCheckpoints.ps1

#$VerbosePreference = "Continue"
$SnapShotVM = @("KBNI-TS1", "KBNI-DC1", "KBNI-WWW1")
$LogFile = "C:\Logs\RollingCheckpoints.txt"
$LogDir = New-Item -Type Directory -Path (Split-Path -Path $LogFile)

Foreach($VM in $SnapShotVM) {
    $m = Measure-Command { Get-VM $VM | Get-VMSnapshot | Sort-Object -Descending | Select -Skip 24 | Remove-VMSnapshot -Verbose | Out-Host }
    $log = [string]::Format("Removing old snapshots for ${VM} took {0:N2} seconds", $m.TotalSeconds)
    $log | Out-Host
    $log | Out-File -Append -FilePath $LogFile

    $m = Measure-Command { Get-VM $VM | Checkpoint-VM -SnapshotName "$(Get-Date) - Automatic Snapshot" -Verbose | Out-Host }
    $log = [string]::Format("Creating new snapshot for ${VM} took {0:N2} seconds", $m.TotalSeconds)
    $log | Out-Host
    $log | Out-File -Append -FilePath $LogFile
}

This is stupid. D: