Что нового

Как удалить файлы?

lemonia

Новичок
Сообщения
126
Репутация
0
Версия AutoIt: 3.3.12.0

Описание:
Есть папка с поддиректориями (больше 200). в каждой из них файл с одним и тем же именем и другие файлы.
Как удалить из поддириктрий эти другие файлы, а те одинаковые, имя которого одинаково и известно, чтобы остались в подпапках?
Примечания:
Работаю в Windows XP.
 

Tempo

AutoIT Гуру
Сообщения
616
Репутация
205
Код:
#include <File.au3>

Local $sFolder = FileSelectFolder("Выберите корневую папку", @ScriptDir)
If @error Then Exit

Local $sFileName = "Test.txt" ;Имя файла для исключения

Local $aFileList = _FileListToArrayRec($sFolder, "*|" & $sFileName, $FLTAR_FILES, $FLTAR_RECUR, $FLTAR_NOSORT, $FLTAR_FULLPATH)
For $i = 1 To $aFileList[0]
	FileRecycle($aFileList[$i]) ;Перемещает в корзину
	;FileDelete($aFileList[$i]) ;Удаляет
Next
 
Верх