Oh herzlichen Dank!!!
Wenn ich noch einmal lästig sein darf - wenn jetzt keine .txt gefunden wird, wo baue ich dann eine Fehlermeldung ein?
thx
Oh herzlichen Dank!!!
Wenn ich noch einmal lästig sein darf - wenn jetzt keine .txt gefunden wird, wo baue ich dann eine Fehlermeldung ein?
thx
Danke GerhardSchr funktioniert wunderbar dein Code.
Eine Frage hätte ich nur noch.. Wenn ich vor dem Löschen eine Abfrage mit JA/NEIN einbaue, kommt diese Frage 5-6 Mal bis er es wirklich löscht.
Hier der Code:
Func tree ($file)
If StringInStr (FileGetAttrib ($file), "D") Then
$files = _FileListToArray ($file, "*", 0)
If IsArray ($files) Then
For $folder = 1 To UBound ($files) -1
tree ($file & "\" & $files[$folder])
Next
EndIf
Else
Switch MsgBox(3, 'Wählen Sie!', "Wollen Sie alle .TXT Dateien löschen?" & @LF & "" & @LF & "JA = .TXT Dateien werden gelöscht" & @LF & "" & @LF &"NEIN = Tool wird nicht weiter fortgesetzt!")
Case 6 ; JA
If StringRegExp ($file, "\.txt$", 0) Then
FileDelete ($file)
EndIf
Case 7 ; NEIN
Exit
Case 2 ; CANCEL
EndSwitch
EndIf
EndFunc
Alles anzeigen
Servus zusammen,
eines vor weg, ich fange gerade an mit AutoIt zu programmieren und würde Hilfe bei folgendem Tool benötigen:
Ich möchte ein Verzeichnis (in diesem Fall ein Netzlaufwerk) auf alle Dateien mit der Endung .txt durchsuchen (inkl. allen Unterordnern). Und diese anschließen löschen lassen.
Wäre nett wenn mir hierbei jemand helfen könnte.
Danke,
lg