Автор Тема: Поиск по маске и удаление не нужных файлов  (Прочитано 347 раз)

0 Пользователей и 1 Гость просматривают эту тему.

Оффлайн SLameN [?]

  • Новичок
  • *
  • Сообщений: 2
  • Репутация: 0
    • Награды
  • Версия AutoIt: 3.3.14.0
Версия AutoIt: 3.5.4

Описание:
Привет! Помогите написать следующее:

Имеется папка, путь и название у нее не будет меняться. Внутри папки много файлов с таким названием - "name-2018-05-11-23-59.zip"

Необходимо удалять файлы по такому принципу:
Удалить все, кроме -
1. когда в названии присутствует 5 или 25 день в любом месяце, пример - "name-2018-06-05-15-59.zip" - его оставить не удалять
2. файлы за текущий месяц (согласно названию)


Примечания:
У меня даже просто не получается найти файлы по маске
Код: AutoIt [Выделить]
$sPath = 'D:\Base\'
$sMask = '_msi_keyfile*'

$aSearch = _FileSearch($sPath, $sMask, 1)

    For $i = 1 To $aSearch[0]
        FileDelete($aSearch[$i])
   Next
MsgBox(4096, "", "Ба-бах!!")
 


Русское сообщество AutoIt

Поиск по маске и удаление не нужных файлов
« Отправлен: Июль 11, 2018, 16:45:11 »

Помечен как лучший ответ пользователем SLameN Отправлен Июль 12, 2018, 10:57:47

Онлайн InnI [?]

  • AutoIt Гуру
  • *****
  • Сообщений: 3887
  • Репутация: 1023
    • Награды
  • Версия AutoIt: 3.3.14.0
Сделал вывод файлов в консоль SciTE. Если всё правильно, то раскомментируйте нужный режим удаления самостоятельно ;)
И не забудьте сделать резервную копию
Код: AutoIt [Выделить]
#include <File.au3>

$sPath = "D:\Base\"

$aFiles = _FileListToArray($sPath, "*.zip", $FLTA_FILES)
If @error Then Exit MsgBox(0, "Error", "Ошибка поиска файлов: " & @error)

For $i = 0 To $aFiles[0]
  $aFind = StringRegExp($aFiles[$i], ".*?-\d{4}-(\d\d)-(\d\d)-\d\d-\d\d.zip", 3)
  If @error Then ContinueLoop
  If $aFind[0] = @MON Or $aFind[1] = "05" Or $aFind[1] = "25" Then ContinueLoop
  ConsoleWrite($sPath & $aFiles[$i] & @CRLF)
  ; FileRecycle($sPath & $aFiles[$i]) ; удаление в корзину
  ; FileDelete($sPath & $aFiles[$i]) ; полное удаление
Next


Русское сообщество AutoIt

Re: Поиск по маске и удаление не нужных файлов
« Ответ #1 Отправлен: Июль 11, 2018, 18:20:59 »

 

Похожие темы

  Тема / Автор Ответов Последний ответ
28 Ответов
11870 Просмотров
Последний ответ Июль 01, 2010, 17:36:50
от arr1val
0 Ответов
1368 Просмотров
Последний ответ Июль 28, 2012, 00:13:50
от madmasles
8 Ответов
3115 Просмотров
Последний ответ Март 15, 2013, 16:32:47
от gregaz
5 Ответов
2614 Просмотров
Последний ответ Май 31, 2013, 18:23:19
от InnI
11 Ответов
5014 Просмотров
Последний ответ Июнь 03, 2013, 16:05:28
от Trans
3 Ответов
2919 Просмотров
Последний ответ Июнь 17, 2014, 13:22:42
от Продвинутый карибас
6 Ответов
2963 Просмотров
Последний ответ Октябрь 14, 2015, 15:03:47
от NinjaScript
13 Ответов
2199 Просмотров
Последний ответ Май 12, 2016, 20:40:58
от AZJIO
7 Ответов
2151 Просмотров
Последний ответ Июнь 28, 2016, 15:53:38
от MnM
3 Ответов
176 Просмотров
Последний ответ Август 12, 2018, 18:27:54
от Alofa