Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  | Правила  

Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » периодическое удаление папок

Ответить
Настройки темы
периодическое удаление папок

Новый участник


Сообщения: 6
Благодарности: 0

Профиль | Отправить PM | Цитировать


Есть видеосервер, на котором видео каждый день записывается в новую папку. Через н-дней нужно удалять самую старую из них. Как это осуществить на AutoIt ?

Отправлено: 15:48, 23-06-2010

 

Аватара для beve

Старожил


Сообщения: 307
Благодарности: 137

Профиль | Отправить PM | Цитировать


Цитата silence:
нужно удалять самую старую из них. Как это осуществить на AutoIt ? »
Вот быстрый пример кода:
Код: Выделить весь код
#include <array.au3>
#Include <File.au3>
Global $sYear=3000 ;берем нереальный год, если в директории есть хоть одна папка, то при первой же проверке, этот год будет сменен на реальный.
Global $sMon=12
Global $sDay=31
Global $OldFolder=""

$sRoot = @DesktopDir
$aDIR = _FileListToArray($sRoot, '*', 2)

if isarray($aDIR) then
For $i=1 to $aDIR[0]
    $aCreateTime =  FileGetTime($sRoot & "\"&$aDIR[$i])
    if $sYear>$aCreateTime[0] then 
        $sYear=$aCreateTime[0] 
        $OldFolder=$aDIR[$i]
        ContinueLoop
    endif
    
    if $sMon>$aCreateTime[1] then 
    $sMon=$aCreateTime[1] 
        $OldFolder=$aDIR[$i]
        ContinueLoop
    endif
    
    if $sDay>$aCreateTime[2] then 
    $sDay=$aCreateTime[2] 
        $OldFolder=$aDIR[$i]
        ContinueLoop
    endif
Next
Endif

If FileExists($sRoot&"\"&$OldFolder) Then
    MsgBox(4096, "Директория: "&$sRoot, "Эту папку следует удалить, как созданную раньше всех других в этой директории: "&$sRoot&"\"&$OldFolder)
;DirRemove($sRoot&"\"&$OldFolder, 1) ;Осторожно!!! данная функция удалит всю папку из файлами (название папки отображается в msgbox)
endif
Данный скрипт дан только для наглядности, его нужно усложнить, добавив различные проверки на ошибки - это уже ваша задача.
Цитата silence:
Через н-дней »
Для запуска этого скрипта, можете дописать код типа планировщика, который в указанную вами дату будет делать "чистку", запуская на обработку код, который выше или использовать сторонний какой продукт (имеется ввиду планировщик) для запуска скрипта.
P.S. В переменной $sRoot храниться путь к папке, в которой находятся ваши подпапки с видеофайлами.

-------
Не в кількості знань полягає освіта, а в повному розумінні і вмілому використанні того, що знаєш.


Отправлено: 17:52, 23-06-2010 | #2



Для отключения данного рекламного блока вам необходимо зарегистрироваться или войти с учетной записью социальной сети.

Если же вы забыли свой пароль на форуме, то воспользуйтесь данной ссылкой для восстановления пароля.



Компьютерный форум OSzone.net » Программирование, базы данных и автоматизация действий » AutoIt » периодическое удаление папок

Участник сейчас на форуме Участник сейчас на форуме Участник вне форума Участник вне форума Автор темы Автор темы Шапка темы Сообщение прикреплено

Похожие темы
Название темы Автор Информация о форуме Ответов Последнее сообщение
CMD/BAT - [решено] удаление содержимого папок daswer Скриптовые языки администрирования Windows 6 21-08-2013 16:19
Удаление перенаправленых папок Vitto Microsoft Windows NT/2000/2003 6 16-10-2009 21:51
CMD/BAT - [решено] Удаление папок по критериям jentoso Скриптовые языки администрирования Windows 16 17-06-2009 11:38
Установка - удаление системных папок spellozz Microsoft Windows Vista 4 02-07-2008 22:04
[решено] Удаление файлов и папок ArGoth Автоматическая установка Windows 2000/XP/2003 1 26-05-2008 18:03




 
Переход