Hallo Zusammen,
Ich möchte ein Verzeichnis durchsuchen und alles darin löschen, das Verzeichnis aber behalten.
Dafür habe ich mir folgendes Skript geschrieben. Leider wird der Temp-Ordner nicht geleert. Falls sich jemand fragt, warum so umständlich? Das Skript soll später auch auf Ordner angewendet werden die ich nicht komplett löschen und neu anlegen kann.
Aktuell habe ich das Problem, dass der DirRemove Befehl nicht zu funktionieren scheint.
Wenn ich den Rückgabewert von $clean auslese, bekomme ich immer 0 (Fehler, 1=erfolgreich) zurück.
Kann mir jemand sagen, wo der Fehler liegt?
Final möchte ich eine Löschfunktion schreiben und diese nur noch mit dem zu leerenden Verzeichnis zusammen aufrufen, falls das geht...
AutoIt
;~ Durchsucht das Verzeichnis und löscht alles darin.
Local $search = FileFindFirstFile("C:\temp\*.*")
; Prüfen, ob die Suche erfolgreich war
If $search = -1 Then
MsgBox(0, "Fehler", "Es wurden keine Dateien/Verzeichnisse gefunden.")
EndIf
While 1
Local $file = FileFindNextFile($search)
If @error Then ExitLoop
$clean=DirRemove("C:\temp\"&$file,1)
WEnd
; Handle für Suche schliessen
FileClose($search)