Ordner älter 24 h löschen

Nun du hast folgende Teilaufgaben vor dir:

1. Eine Liste aller Ordner erstellen: _FileListToArray würde hierfür gehen aber auch mit den zugrunde liegenden Funktion FileFindFirst/NextFile könnte man dies machen.
2. Die Liste in einer Schleife durchlaufen
3. Für jeden Ordner den Erstellzeitpunkt ermitteln: FileGetTime
4. Die Differenz zu jetzt bestimmen: Entweder manuell über die einzelnen Zeitbestandteile oder mit Hilfe der Funktion _DateDiff - dort müsstest du dir aber noch den Zeitstring aus FileGetTime entsprechend formatieren.
5. Falls die Differenz ein bestimmte Maß überschreitet - Ordner löschen.

Ja Run() in Verbindung mit @Comspec.

Versuche :

Local $run='cd "' & $packuppath & '" FORFILES * /D -5 /C "cmd /c IF @isdir == TRUE echo  @path >> test.txt"'

Zitat von schlawiner

habe ich probiert, funktioniert leider nicht.

Ein Problem bei deiner Besetzung der Variable $run bestand darin, dass die einfachen und doppelten Hochkommata schon zu Beginn falsch gesetzt waren (den Rest habe ich, offen gesagt nicht geprüft)

Bei :

$run='cd " & $packuppath & "FORFILES * /D -5 /C "cmd /c IF @isdir == TRUE echo  @path >> test.txt"'

wird nicht der Wert von $packuppath eingefügt, sondern nur der Variablenname als Text. Du kannst ja mal ein ConsoleWrite($run & @CRLF) dahintersetzen.

Diesen Teil habe ich geändert.

Ein anderer, zugegebenermaßen etwas rustikaler Ansatz :

Vorgabe : Du möchtest jede Stunde eine Verzeichnisstruktur in einen, von der Stunde der Ausführung abhängigen Backupordner kopieren. Backupordner die älter als 24 Stunden sind, sollen gelöscht werden.

Das ist im Prinzip eine 24 Stunden Rotation.

1. Prüfe im Skript das Makro @HOUR (lt. Hilfe : Stundenwert der Uhrzeit im 24-Stunden-Format. Wertebereich: 00 bis 23)
2. Prüfe ob ein Ordner, z.B. ..\backup00 oder ..\backup23 (d.h. ..\backup & @HOUR) bereits existiert - falls nicht anlegen.
3. Existiert der jeweilige (Stunden-)Ordner bereits und ist nicht leer, dann den Inhalt löschen und anschließend das neue Backup dort hineinkopieren.

So kannst Du Dir das Löschen von Ordnern, die älter als 24 sind, sparen. Ein Backup zu einer betreffenden Stunde der Vortages wird durch ein aktuelles ersetzt.

Zitat von schlawiner

also so wie ich das sehe liegt das ganze an dem Bereich :

"cmd /c IF @isdir == TRUE echo @path >> test.txt"

Es mag durchaus sein, dass dieser Teil auch zu einem Problem führt.

Trotzdem ist die Anordnung von einfachen und doppelten Hochkommata in deiner Variable $run nicht korrekt, siehe :

Local $packuppath = 'c:\zielverzeichnis' ; *** nur zum Test, damit $packuppath einen Wert hat
Local $run='cd " & $packuppath & "FORFILES * /D -5 /C "cmd /c IF @isdir == TRUE echo  @path >> test.txt"'
ConsoleWrite($run & @CRLF)

Die Ausgabe mittels ConsoleWrite ergibt :

cd " & $packuppath & "FORFILES * /D -5 /C "cmd /c IF @isdir == TRUE echo  @path >> test.txt"

Wie Du siehst, wird hier nicht der Wert von $packuppath eingefügt, sondern der Variablenname als Text.

Ich habe mal einen Ordnerpfad erstellt: C:\Users\AlinaPC33\Desktop\Ordner\1\2
Der Ordner "2" ist älter "1 Tag" und wird mit nachfolgendem Script gelöscht.
Bitte beachte die Erklärungen im Script bezüglich Pfadanpassen.

Ist es das was Du suchst?

Ist evtl. noch zu kürzen aber erst einmal arbeitet es bei mir zumindest einwandfrei.

Hier mal ein Autoit Script, welches ich nutze.

#include <Array.au3>
#include <File.au3>
#include <Date.au3>


$path = "c:\Backup\"

Dim $avArray[6]

$avArray[0] = "Pfad1"
$avArray[1] = "Pfad2"
$avArray[2] = "Pfad3"
$avArray[3] = "Pfad4"
$avArray[4] = "Pfad5"
$avArray[5] = "Pfad6"

For $i = 0 To 5

	;MsgBox(0,"",$path & $avArray[$i] & "\")
	Local $aFileList = _FileListToArray($path & $avArray[$i] & "\", Default, Default, True)
        If @error = 1 Then
                MsgBox($MB_SYSTEMMODAL, "", "Path was invalid.", 1)
                Exit
        EndIf
        If @error = 4 Then
                MsgBox($MB_SYSTEMMODAL, "", "No file(s) were found.", 1)
                Exit
        EndIf
	;_ArrayDisplay($aFileList, "$aFileList")

	For $file = 1 To UBound($aFileList) -1
		;MsgBox(0,"",$aFileList[$file])

		; Get the Date/Time for the Created property of the file
		$arrFileTime = FileGetTime($aFileList[$file], 1, 0)

		; Format the Date/Time to calculate the difference
		$strFileTime = $arrFileTime[0] & "/" & $arrFileTime[1] & "/" & $arrFileTime[2] & " " & $arrFileTime[3] & ":" & $arrFileTime[4] & ":" & $arrFileTime[5]

		; Get the "Now" time to calculate the difference
		$strNowCalc = _NowCalc()

		; Calculate the difference in Days ("D")
		$strDateDiff = _DateDiff("D", $strFileTime, $strNowCalc)

		; Display the Difference in Days
		If $strDateDiff > 4 Then
			;ConsoleWrite("Difference from '" & $strFileTime & "' and '" & $strNowCalc & "' ( in Days ) = " & $strDateDiff & @CRLF)
			FileDelete( $aFileList[$file])
		EndIf


	Next

Next

Gruß gmmg