Weiterlesen »]]> Ich wünsche allen Leserinnen und Lesern meines Blogs ein gesundes und erfolgreiches Jahr 2009!! Ich möchte das Jahr mit einem Powershell (1.0) Skript einläuten, welches ich vor kurzem erstellt habe. Da es sich mit um eines meiner ersten “richtigen” Skripte für die Windows Powershell handelt und ich denke, dass die Problemstellung, die dem Ganzen zu Grunde liegt, sicher auch für andere Administratoren interessant sein könnte, möchte ich Euch meine geistigen Ergüsse nicht vorenthalten und freue mich natürlich auch über Anregungen, was man an der einen oder anderen Stelle noch optimieren könnte.

Ich stand kürzlich in unserem Unternehmen vor dem Problem, dass ich auf einem windowsbasierten Serversystem aus bestimmten Ordnern unter einem Wurzelverzeichnis alle Dateien mit einem gewissen Alter, sowie alle leeren Unterordner löschen wollte. Klingt an und für sich so erst einmal nicht schwierig. Das Einfachste wäre sicher gewesen, mit der Windows Suchfunktion alle meinem Kriterium entsprechenden Dateien herausfischen zu lassen, und diese dann über den Explorer zu löschen. Halbwegs Praktikabel, wenn man auf das Löschen leerer Ordner verzichten kann und es sich um eine einmalige Sache handelt. Damit wollte ich mich aber nicht zufrieden geben; die leeren Verzeichnisse sollten ebenfalls eliminiert und der Vorgang jede Nacht automatisch gestartet werden. Es musste also ein Skript her, welches via Taskplaner jede Nacht ausgeführt wird. Doch in welcher Form? VBS, eine einfache Batchdatei mit DOS-Befehlen oder die neue Powershell? Ich habe mich für die Powershell (1.0) entschieden, da ich von den scheinbar endlosen Möglichkeiten dieses Werkzeugs begeistert bin.

Und so sieht das Ganze dann codemäßig aus (den Download findet ihr am Ende des Artikels):

# DeleteShareFolderContent.ps1
# Daniel Hahn - Dezember 2008

# -----------------------------------------------------

Write-Host
Write-Host
Write-Host "Skript zum selektiven Leeren von Tauschordnern"
Write-Host "=============================================="
Write-Host
Write-Host

# Hier das Wurzelverzeichnis angeben
$strRootFolder = "Drive:Folder"

# Logfile anlegen und Kopfzeilen schreiben
$strTimestamp = Get-Date -Format "dd.MM.yyyy - HH:mm"
$strTimestampFile = Get-Date -Format "yyyy-MM-dd-HHmm"
$strLogfileName = "Tausch leeren " + $strTimestampFile + ".log"
$strLogfile = $Env:Temp + "\" + $strLogfileName
"Vorgang gestartet: $strTimestamp" >> $strLogfile
"" >> $strLogfile

# -----------------------------------------------------
function CheckFiles
{
param([object] $objRootFolder)
$strRootFolder = $objRootFolder.Path
$strRootFolderName = $objRootFolder.Name
$colFiles = $objRootFolder.Files
$DirContent = $null
$DirContent = Get-ChildItem $strRootFolder

foreach($objFile in $colFiles)
{
$strFile = $strRootFolder + "\" + $objFile.Name
$dtFile = $objFile.DateCreated
$dtSys = Get-Date -Format "dd.MM.yyyy HH:mm:ss"
$iDif = (New-TimeSpan -Start $dtFile -End $dtSys).TotalDays

if($iDif -gt 7)
{
$FSO.DeleteFile($strFile, $true)
Write-Host "Datei " -NoNewline
Write-Host $strFile -ForegroundColor "magenta" -NoNewline
Write-Host " gelöscht"
"Nach Frist gelöscht: $strFile" >> $strLogfile
$script:iDeletedCount++
}
$script:iFileCount++
}

if(($DirContent -eq $null) -and ($strRootFolderName -notlike "*04*Tausch"))
{
$FSO.DeleteFolder($strRootFolder)
Write-Host "Leeres Verzeichnis " -NoNewline
Write-Host $strRootFolder -ForegroundColor "magenta" -NoNewline
Write-Host " gelöscht"
"Leeres Verzeichnis gelöscht: $strRootFolder" >> $strLogfile
$script:iFolderDeletedCount++
}
}

# -----------------------------------------------------
function FindSubFolders
{
param([object] $objRootFolder)
$colRootSubFolders = $objRootFolder.SubFolders

foreach($objRootSubFolder in $colRootSubFolders)
{
FindSubFolders $objRootSubFolder
CheckFiles $objRootSubFolder
$script:iFolderCount++
}
}

# -----------------------------------------------------
function FindShareFolders
{
param([object] $objRootFolder)
$colRootSubFolders = $objRootFolder.SubFolders

foreach($objRootSubFolder in $colRootSubFolders)
{
$strRootSubFolder = $objRootSubFolder.Name

if($strRootSubFolder -like "*Tausch")
{
CheckFiles $objRootSubFolder
FindSubFolders $objRootSubFolder

$script:iFolderCount++
}
}
}

# -----------------------------------------------------
function WaitKey
{
$strPrompt = "Beliebige Taste zum Verlassen drücken ... "
Write-Host
Write-Host $strPrompt -NoNewline
$key = [Console]::ReadKey($true)
Write-Host
}

# -----------------------------------------------------
# main

$iFolderDeletedCount = 0
$iDeletedCount = 0
$iFolderCount = 0
$iFileCount = 0

Write-Host "Temporäres Logfile:" $strLogfile
Write-Host
Write-Host "Beginne mit Durchsuchen der Tauschordner in "
Write-Host $strRootFolder -ForegroundColor "Cyan" -NoNewline
Write-Host

$FSO = New-Object -COM Scripting.FileSystemObject

if(-not $FSO.FolderExists($strRootFolder))
{
Write-Host "Fehler: Wurzelverzeichnis existiert nicht!" -ForegroundColor "Red"
Write-Host
Write-Host "Ausführung wird abgebrochen"
WaitKey
exit
}

$objRootFolder = $FSO.GetFolder($strRootFolder)
FindShareFolders $objRootFolder

Write-Host
Write-Host "Insgesamt" $iFileCount "Datei(en) in" $iFolderCount "Ordnern gefunden." -ForegroundColor "magenta"
Write-Host $iDeletedCount "Datei(en) gelöscht" -ForegroundColor "magenta"
Write-Host $iFolderDeletedCount "leere(r) Ordner gelöscht" -ForegroundColor "magenta"

$strTimestamp = Get-Date -Format "dd.MM.yyyy - HH:mm"
"" >> $strLogfile
"$iDeletedCount Datei(en) gelöscht" >> $strLogfile
"$iFolderDeletedCount Ordner gelöscht" >> $strLogfile
"" >> $strLogfile
"Skript beendet: $strTimestamp" >> $strLogfile

WaitKey

# -----------------------------------------------------

Das Skript ist vielleicht an der einen oder anderen Stelle nicht perfekt, erfüllt aber seinen Zweck. (Ich habe versucht, möglichst selbsterklärende Variablen- und Funktionsnamen zu verwenden, sowie die Verständlichkeit durch Kommentare zu verbessern)

[download#1]