forum.opennet.ru - "Скрипт для удаления старых файлов." (3)

форумы

помощь

поиск

регистрация

майллист

ВХОД

слежка

"Скрипт для удаления старых файлов."

Форумы Информационная безопасность (Public)
Вариант для распечатки		Пред. тема \| След. тема
Изначальное сообщение		[Проследить за развитием треда]

"Скрипт для удаления старых файлов."
Сообщение от Alexander (??) on 16-Май-07, 13:37
Люди, помогите пожалуйста с таким вопросом. Есть некая сетевая папка, в ней создаются файлы видеоархива. Хотелось бы увидеть скрипт (Для планировщика, винд2003) чтоб все файлы и папки старше 14 дней удалялись из этой сетевой папки. Заранее спасибо!
Высказать мнение \| Ответить \| Правка \| Наверх \| Cообщить модератору

Оглавление

Скрипт для удаления старых файлов., allez, 12:51 , 17-Май-07, (1)

Скрипт для удаления старых файлов., Alexander, 16:01 , 17-Май-07, (2)

Скрипт для удаления старых файлов., allez, 14:57 , 18-Май-07, (3)

Сообщения по теме [Сортировка по времени, UBB]

1. "Скрипт для удаления старых файлов."

Сообщение от allez (ok) on 17-Май-07, 12:51

>Люди, помогите пожалуйста с таким вопросом. Есть некая сетевая папка, в ней
>создаются файлы видеоархива. Хотелось бы увидеть скрипт (Для планировщика, винд2003) чтоб
>все файлы и папки старше 14 дней удалялись из этой сетевой
>папки.
>Заранее спасибо!

Вот вам заготовка на VB:

Sub DeleteOldFiles(strDir As String)
    Dim strFile As String
    ChDir strDir
    strFile = Dir(".")
    Do While strFile <> ""
        If DateDiff("d", Now, FileDateTime(strFile)) <= -14 Then Kill strFile
        strFile = Dir()
    Loop
End Sub

Этот код удаляет только обычные файлы. Доработку до полнофункционального варианта
оставляю вам в качестве домашнего задания. ;-)

Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

2. "Скрипт для удаления старых файлов."

Сообщение от Alexander (??) on 17-Май-07, 16:01

Спасибо. бум пробовать

Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

3. "Скрипт для удаления старых файлов."

Сообщение от allez (ok) on 18-Май-07, 14:57

>
>Спасибо. бум пробовать
Да не за что. Но лично я предпочитаю использовать для облегчения жизни
под Windows такие вещи, как UnxUtils (http://unxutils.sourceforge.net/)
или AutoIt (http://www.autoitscript.com/).

Высказать мнение | Ответить | Правка | Наверх | Cообщить модератору

Архив | Удалить

Индекс форумов | Темы | Пред. тема | След. тема

Оцените тред (1=ужас, 5=супер)? [ 1 | 2 | 3 | 4 | 5 ] [Рекомендовать для помещения в FAQ]

Партнёры:

Хостинг:

Закладки на сайте
Проследить за страницей

Created 1996-2025 by Maxim Chirkov
Добавить, Поддержать, Вебмастеру

1. "Скрипт для удаления старых файлов."
Сообщение от allez (ok) on 17-Май-07, 12:51
>Люди, помогите пожалуйста с таким вопросом. Есть некая сетевая папка, в ней >создаются файлы видеоархива. Хотелось бы увидеть скрипт (Для планировщика, винд2003) чтоб >все файлы и папки старше 14 дней удалялись из этой сетевой >папки. >Заранее спасибо! Вот вам заготовка на VB: Sub DeleteOldFiles(strDir As String) Dim strFile As String ChDir strDir strFile = Dir(".") Do While strFile <> "" If DateDiff("d", Now, FileDateTime(strFile)) <= -14 Then Kill strFile strFile = Dir() Loop End Sub Этот код удаляет только обычные файлы. Доработку до полнофункционального варианта оставляю вам в качестве домашнего задания. ;-)
Высказать мнение \| Ответить \| Правка \| Наверх \| Cообщить модератору


	2. "Скрипт для удаления старых файлов."
	Сообщение от Alexander (??) on 17-Май-07, 16:01
	Спасибо. бум пробовать
	Высказать мнение \| Ответить \| Правка \| Наверх \| Cообщить модератору


	3. "Скрипт для удаления старых файлов."
	Сообщение от allez (ok) on 18-Май-07, 14:57
	> >Спасибо. бум пробовать Да не за что. Но лично я предпочитаю использовать для облегчения жизни под Windows такие вещи, как UnxUtils (http://unxutils.sourceforge.net/) или AutoIt (http://www.autoitscript.com/).
	Высказать мнение \| Ответить \| Правка \| Наверх \| Cообщить модератору

Архив \| Удалить	Индекс форумов \| Темы \| Пред. тема \| След. тема
Оцените тред (1=ужас, 5=супер)? [ 1 \| 2 \| 3 \| 4 \| 5 ] [Рекомендовать для помещения в FAQ]