powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Windows [игнор отключен] [закрыт для гостей] / Программное удаление устаревших файлов
50 сообщений из 50, показаны все 2 страниц
Программное удаление устаревших файлов
    #33917827
Фотография kkv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
К именам файлов бэкапов (SQL Server) приписываю дату создания, например: db_backup_full_20060815.bak. Нужно программно удялять файлы бэкапов с датой, которая старше текущей на заданное в процедуре количество дней. Сейчас я это делаю с помощью команды del, но очень некрасивым способом :

Код: plaintext
1.
2.
3.
set @cmd = 'del ' + @backup_dir + @dbname + '_backup_full_' 
   + convert(varchar, getdate() - @retaindays,  112 ) + '*' + '.bak'
set @sql = 'master..xp_cmdshell ' + '''' + @cmd + ''''
exec(@sql)

где @retaindays - заданное количество дней, после которых архивные копии можно удалять. Естественно, что таким способом я могу удалить только те файлы , которые строго соответствуют условию [текущая дата] - [заданное количество дней]. Если же бэкап по каким-то причинам не прошел (например, из-за ошибок сети), то на следующий день запущенная процедура нужных файлов для удаления уже не увидит (не найдет по дате, зашитой в имя файла), что, естественно, может повлечь за собой переполнение диска устаревшими архивами. Следовательно, нужно как-то реализовать такой нехитрый алгоритм.

Код: plaintext
1.
если [дата создания файла] <= [заданной даты]
то <удалить ВСЕ файлы старше заданной даты]

С уважением, kkv
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33917882
Biz©
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
kkvК именам файлов бэкапов (SQL Server) приписываю дату создания, например: db_backup_full_20060815.bak. Нужно программно удялять файлы бэкапов с датой, которая старше текущей на заданное в процедуре количество дней. Сейчас я это делаю с помощью команды del, но очень некрасивым способом :

Код: plaintext
1.
2.
3.
set @cmd = 'del ' + @backup_dir + @dbname + '_backup_full_' 
   + convert(varchar, getdate() - @retaindays,  112 ) + '*' + '.bak'
set @sql = 'master..xp_cmdshell ' + '''' + @cmd + ''''
exec(@sql)

где @retaindays - заданное количество дней, после которых архивные копии можно удалять. Естественно, что таким способом я могу удалить только те файлы , которые строго соответствуют условию [текущая дата] - [заданное количество дней]. Если же бэкап по каким-то причинам не прошел (например, из-за ошибок сети), то на следующий день запущенная процедура нужных файлов для удаления уже не увидит (не найдет по дате, зашитой в имя файла), что, естественно, может повлечь за собой переполнение диска устаревшими архивами. Следовательно, нужно как-то реализовать такой нехитрый алгоритм.

Код: plaintext
1.
если [дата создания файла] <= [заданной даты]
то <удалить ВСЕ файлы старше заданной даты]

С уважением, kkv
а чо, в сиквел-сервере нет штатной процедуры для этого ? апупеть ...
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33917890
sanek842
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
или можно на wsh скрипт написать
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33917975
Фотография ScareCrow
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
сиквелу можно указать - сколько хранить быкапы..


Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33917978
GeT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вот таким скриптом можно удалять файлы старше 2 недель:
автор
set fso=Wscript.CreateObject("Scripting.FileSystemObject")

dir="c:\tmp\"
set f = fso.GetFolder(dir)
Set fc = f.Files
For Each f1 in fc
d= f1.DateCreated
diff=DateDiff("d",d,Now)
if diff>14 Then
WScript.Echo "DELETE! " & f1.name
fso.DeleteFile(dir & "\" & f1.name)
end if
Next

Соответственно меняя 14 на что-то другое, выставляешь нужное количество дней. Только проверь сначала на чем-то не очень важном :)
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918009
GeT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Забыл сказать. Если тебе запрос на удаление не нужен (а я думаю что не нужен), то удали строчку:
WScript.Echo "DELETE! " & f1.name
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918108
Фотография kkv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Biz©а чо, в сиквел-сервере нет штатной процедуры для этого ? апупеть ...В SQL Server есть штатное средство бэкапирования, здесь же стоит задача управлять файлами на уровне операционной системы.

ScareCrowсиквелу можно указать - сколько хранить быкапы.. Можно. Только при этом все файлы будут накладываться друг на друга и перезатираться будут не самые ранние, а сразу все бэкапы из одного устройства . Там просто указывается опция WITH INIT (с перезаписью) и RETAINDAYS (через какое количество дней это можно сделать).

С уважением, kkv
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918112
Фотография kkv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GeT, спасибо, буду пробовать.

С уважением, kkv
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918131
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
kkv Biz©[quot ScareCrow]сиквелу можно указать - сколько хранить быкапы..
Можно. Только при этом все файлы будут накладываться друг на друга и перезатираться будут не самые ранние, а сразу все бэкапы из одного устройства . Там просто указывается опция WITH INIT (с перезаписью) и RETAINDAYS (через какое количество дней это можно сделать).
Сам придумал или тебе кто то это сказал?
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918163
Фотография kkv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Anatoly Podgoretsky kkv Biz©[quot ScareCrow]сиквелу можно указать - сколько хранить быкапы..
Можно. Только при этом все файлы будут накладываться друг на друга и перезатираться будут не самые ранние, а сразу все бэкапы из одного устройства . Там просто указывается опция WITH INIT (с перезаписью) и RETAINDAYS (через какое количество дней это можно сделать).
Сам придумал или тебе кто то это сказал?
И BOL читал, и на практике проверял. Так что полегче насчет "придумал".
автор INIT

Specifies that all backup sets should be overwritten , but preserves the media header. If INIT is specified, any existing backup set data on that device is overwritten.

The backup media is not overwritten if any one of the following conditions is met:

All backup sets on the media have not yet expired. For more information, see the EXPIREDATE and RETAINDAYS options.

The backup set name given in the BACKUP statement, if provided, does not match the name on the backup media. For more information, see the NAME clause.
Use the SKIP option to override these checks. For more information about interactions when using SKIP, NOSKIP, INIT, and NOINIT, see the Remarks section.

Note If the backup media is password protected, SQL Server does not write to the media unless the media password is supplied. This check is not overridden by the SKIP option. Password-protected media may be overwritten only by reformatting it. For more information, see the FORMAT option.
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918227
Фотография kkv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
В догонку. Это вполне стандартная задача перезатирать старые бэкапы, но при этом внутри устройства бэкапа нельзя удалить отдельный бэкап . Поэтому и разрабатываются подобные административные процедуры. Кстати, порыскал по форуму и нашел практически свою задачу - backup и время хранения .

С уважением, kkv
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918243
Фотография JohnS
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
GeTВот таким скриптом можно удалять файлы старше 2 недель:
автор
set fso=Wscript.CreateObject("Scripting.FileSystemObject")

dir="c:\tmp\"
set f = fso.GetFolder(dir)
Set fc = f.Files
For Each f1 in fc
d= f1.DateCreated
diff=DateDiff("d",d,Now)
if diff>14 Then
WScript.Echo "DELETE! " & f1.name
fso.DeleteFile(dir & "\" & f1.name)
end if
Next

Соответственно меняя 14 на что-то другое, выставляешь нужное количество дней. Только проверь сначала на чем-то не очень важном :)

+5 . Давно хотел такое сделать . А то для винды это непреодолимая проблема , чистить TMP :-)
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918276
Фотография Green2
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
2 kkv
Чем вам ваше старое решение не нравится???
--



Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918278
--null--
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
авторЗабыл сказать. Если тебе запрос на удаление не нужен (а я думаю что не нужен), то удали строчку:
WScript.Echo "DELETE! " & f1.name

Это- совсем не запрос на удаление, а просто echo.
Предполагалось, что запуск идет из-под cscript, поэтому echo просто в консоли мелькнет.


первоисточник
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918334
GeT
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
--null-- авторЗабыл сказать. Если тебе запрос на удаление не нужен (а я думаю что не нужен), то удали строчку:
WScript.Echo "DELETE! " & f1.name

Это- совсем не запрос на удаление, а просто echo.
Предполагалось, что запуск идет из-под cscript, поэтому echo просто в консоли мелькнет.


первоисточник
Согласен, не правильно выразился.
Насчет первоисточника, не знаю. По-моему я его откуда-то с iXBT, брал (а может и отсюда). Точно не помню, давно было.
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918390
Фотография Ramin Hashimzade
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
с помощи делфи и WINAPI можно делать за 10 мин!
у меня есть компонент RaminDelphi можеш скачать здес www.hramin.jino-net.ru
вот там есть такая функция GetFileTime....

сперва пишеш рекурсию который будет по одному выбрать файлы потом проверяеш
Код: plaintext
if GetFileTime(....)<= [заданной даты] then delete


________________________________________
Я Знаю только то, что я ничего незнаю!
И чем я больше знаю, тем больше понимаю, что ничего не знаю!
www.hramin.jino-net.ru
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918558
Фотография kkv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Green22 kkv
Чем вам ваше старое решение не нравится???
А тем и не нравится что удаление файлов происходит не по временному диапазону, а по точному соответствию имени файла (см. 1-й пост топика).

С уважением, kkv
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918592
Biz©
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
kkv Biz©а чо, в сиквел-сервере нет штатной процедуры для этого ? апупеть ...В SQL Server есть штатное средство бэкапирования, здесь же стоит задача управлять файлами на уровне операционной системы.

любая достойная система бэкапа имеет средства для очистки всего старого, што уже не входит в задаваемый ретеншн период ...
авторТолько при этом все файлы будут накладываться друг на друга и перезатираться будут не самые ранние, а сразу все бэкапы из одного устройства. Там просто указывается опция WITH INIT (с перезаписью) и RETAINDAYS (через какое количество дней это можно сделать).
вобще-то даже в африке INIT - это "инициализация", т.е. то што вы и имеете - удаление всего содержимого ... нет ли там чеголибо типа with replace, with overwrite и т.п. ?
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918776
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Biz©вобще-то даже в африке INIT - это "инициализация", т.е. то што вы и имеете - удаление всего содержимого ... нет ли там чеголибо типа with replace, with overwrite и т.п. ?
Есть, Maintnance Plan - именно он занимается удалением старых архивов базы и логов и работает нормально, у меня годами в папке архивы за две последнии недели, никакиъ ручек и скриптов. MS SQL сервер все делает сам и делает великолепно, помнит всю историю архивов. Удалять с помощью файловых операций находится на грани непрофессионализма. Убеждать автора не собираюсь, каждый ССЗБ
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918787
Фотография kkv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Biz©любая достойная система бэкапа имеет средства для очистки всего старого, што уже не входит в задаваемый ретеншн период ...
Давайте не будем обсуждать достоинства и недостатки SQL Server, ибо это тема даже не для соответствующего форума, а для форума "Сравнение СУБД". Просто это такая политика - бэкапы делаются на устройства и если указывать опцию with noinit, то файлы будут добавляться туда до тех пор пока место на диске не закончится. Поэтому и сделана опция with init которая в сочетании с опциями retaindays, expiredate, skip, noskip препятствует (или наоборот, позволяет обходить это ограничение) перезаписывать все бэкапы из одного устройства через какой-то определенный промежуток времени. Предполагается, что АБД периодически архивирует бэкапы куда-то на внешние носители, а потому перезатирать нужно сразу все бэкапы из одного устройства. Еще раз повторюсь - внутри одного устройства нельзя удалить отдельный бэкап . Либо все, либо ничего. Рассматривать этот факт как недостаток или, напротив, как достоинство системы, (фактор, дисциплинирующий АБД) - это предмет длительной дискуссии. Если же вы еще раз внимательно перечитаете этот постинг с соответствующими ссылками, то поймете почему подобная задача периодически возникает у администраторов баз данных.

Biz© kkvТолько при этом все файлы будут накладываться друг на друга и перезатираться будут не самые ранние, а сразу все бэкапы из одного устройства. Там просто указывается опция WITH INIT (с перезаписью) и RETAINDAYS (через какое количество дней это можно сделать).
вобще-то даже в африке INIT - это "инициализация", т.е. то што вы и имеете - удаление всего содержимого ... нет ли там чеголибо типа with replace, with overwrite и т.п. ?
Опция with replace, разумеется, имеется, только она относится не к backup database, а к команде restore database, что в данном случае "ария из совершенно другой оперы".

P.S. И вообще, разговор изначально шел не о достоинствах или недостатках SQL Server, а о способах удаления устаревших файлов с помощью команд операционной системы. В принципе, я уже приблизительно понял идею как это реализовать, просто сейчас у меня эта задача, находится, как говорится, в фоновом режиме.

С уважением, kkv
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918859
Фотография kkv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Anatoly PodgoretskyЕсть, Maintnance Plan - именно он занимается удалением старых архивов базы и логов и работает нормально, у меня годами в папке архивы за две последнии недели, никакиъ ручек и скриптов. MS SQL сервер все делает сам и делает великолепно, помнит всю историю архивов. Удалять с помощью файловых операций находится на грани непрофессионализма. Убеждать автора не собираюсь, каждый ССЗБ
Это все замечательно, как вы сказали, работает, спорить не буду. Но только в случае статичности системы. В реальной же жизни базы иногда переезжают с одного сервера на другой, появляются новые базы, да и сами планы резервного копирования/восстановления тоже отнюдь не постоянны. Для каждой базы перенастраивать свой план исполнения? Кому как, а мне лично больше по душе написать один раз хранимую процедуру, в которую помимо бэкапов вложить еще кучу всякой другой сопутствующей работы и просто из джобов автоматически ее вызывать с соответствующими параметрами. Это особенно актуально тогда, когда само количество администрируемых баз отнюдь не три-пять, а гораздо больше.

С уважением, kkv
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33918942
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Ты бы все таки задал этот в форуме по MS SQL там подскажут более оптимальный путь, кроме того даже в случае файловых операций, сервер их в состоянии выполнять, без всяких бат файлов.

Мне кажется, что ты неправильным путем идешь.
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33919081
Yanis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Anatoly Podgoretsky> каждый ССЗБ

А кто такой ССЗБ?
Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33919301
Фотография trubb
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
тындекс говорит - сам себе злобный буратина,...
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33919925
Фотография kkv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Anatoly Podgoretsky... кроме того даже в случае файловых операций, сервер их в состоянии выполнять, без всяких бат файлов.
Вот ты прицепился к сиквелу! Да причем тут SQL Server вообще?! Нужно было проще поставить вопрос, а именно спросить что-то типа: "мне надо программно удалять файлы старше некоторой даты, покажите набор команд из консоли", при этом не уточняя для чего именно и в какой среде. Разговор идет не о возможностях сиквела, а об несколько усложненных способах работы с файлами средствами самой операционной системы. Подобные задачи могут возникнуть абсолютно в любой СУБД или при программировании абсолютно на любом языке. И все они решаются путем обращения к командам ОС, в данном случае SQL Server просто посылает команду del на консоль (xp_cmdschell). Сервер баз данных не умеет, да и не должен уметь выполнять работу операционной системы, у него своей работы хватает. Для того и было разработано средство обращения сервера к командой строке xp_cmdschell, ведь все равно файловые операции будет выполнять именно ОС на понятном ей языке, а вовсе никакой не SQL Server (Oracle, DB2, Access, FoxPro и т.д.). К тому же речи о бат-файлах не было вообще, я говорил о хранимой процедуре, это далеко не одно и тоже. А почему мне нужен именно такой подход, а не через Maintenance Plan я уже объяснял выше, но попробую чуточку добавить. Вот, например, в моем случае бэкапы делаются трех видов: полный, дифферинциальный и журнала транзакций. При удалении устаревшего полного бэкапа нужно автоматически удалять и все последующие дифферинциальные бэкапы и бэкапы логов транзакций (без полного бэкапа это просто лишние файлы на диске, воспользоваться ими уже будет невозможно). Причем нужно не просто удалить все последующие дифы и логи, но до первого сделанного full-бэкапа. Можно ли такое реализовать с помощью Maintenance Plan? Сильно сомневаюсь... А бэкапчики у меня будь здоров, по 130 Гб, да и диффы с логами тоже нельзя сквозь пальцы рассматривать - в сумме по ним набегает порядка 80 гигов. Если все это вовремя не удалять, то никаких дисков не напасешься. И это только один пример, могу привести еще много причин по которым я не использую Maintenance Plan, но это уже совершенно другая тема и для другого форума. Maintenance Plan - отличный инструмент администрирования, но далеко не всегда и далеко не все задачи можно решать с его помощью. Целесообразность его применения нужно рассматривать в каждом конкретном случае.

Anatoly PodgoretskyМне кажется, что ты неправильным путем идешь.Когда кажется - креститься надо. Предложи тогда свой, правильный путь, а не только голословно навешивая ярлыки непрофессионализма только лишь потому что с помощью Maintenance Plan "никаких ручек и скриптов".

Anatoly PodgoretskyТы бы все таки задал этот в форуме по MS SQL там подскажут более оптимальный путь.Выше я уже приводил ссылку где разбиралась аналогичная задача. Даже не просто аналогичная, а практически та же самая. Так что ответ на свой вопрос я уже получил, заодно и почерпнув новые знания. Нашел я, правда, этот топик уже после того, как создал свой. Видимо там тоже идут неправильным путем...

С уважением, kkv
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33919931
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
kkv
Так ты же не слушаешь, а более подробную информацию выдаешь в конце обсуждения. Надо было действительно или абстрактно задавать вопрос или рассказывать, как сейчас рассказывал.
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33919934
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
При подобной задачи я бы написал приложение, хотя бы на томже WSH вместо голого бат файла. Операции с датой там системно зависимы от локализации и версии ОС
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33919981
Фотография kkv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Мне нужно было просто понять саму идею как с помощью команд ОС удалить старые файлы. Можно, конечно, написать расширенную ХП на каком-нибудь языке, можно даже запускать какой-то левый скрипт (потом постоянно мучиться с каталогами), можно. Но только зачем? Гораздо проще запихнуть эти команды в тело хранимки и не париться. А насчет абстрактности вопроса как-то не подумал, что начнут обсуждать не мой вопрос, а рассматривать способы как это сделать по-другому.

С уважением, kkv
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33920077
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вроде не давно на форуме проскакивал WSH код на Бейсике для отбора файлов по дате.
WSH Микрософт позиционитрует как замена бат файлам, но он намного мощнее, на нем можно делать практически все, что и на других более мощных языках. Информацию по wsh можно найти на сайте Микрософта, с примерами готовых скриптов. Или у меня на сайте WSH
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33920090
--null--
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
По возможности все же следует использовать вместо устаревших bat файлов WSH. Imho, конечно.
А то, что при этом системный код будет во внешнем файле, а не в хранимке - можно в принципе даже рассматривать как плюс.
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33920218
Biz©
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
off-top: очередной раз убеждаюсь, што пока ещё "ф топку этот m$ сиквел" ...:)
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33920252
Фотография kkv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Biz©off-top: очередной раз убеждаюсь, што пока ещё "ф топку этот m$ сиквел" ...:)
Каждый видит только то, что он хочет видеть.

С уважением, kkv
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33920352
Biz©
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
kkv Biz©off-top: очередной раз убеждаюсь, што пока ещё "ф топку этот m$ сиквел" ...:)
Каждый видит только то, что он хочет видеть.
не смешите мои тапочки расхожими измышлениями ... это мысли администратора о продукте с неудовлетворительными штатными средствами администрирования ...
кста, совсем не пнял столь неуёмное желание запихнуть некую последовательность команд оси внутрь базы ... эт примерно как некоторые узеры додумываются держать графические файлы в вордовских документах ...
ну да лана ... эт ваши проблемы ...
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33920503
Фотография kkv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Biz©не смешите мои тапочки расхожими измышлениями ... это мысли администратора о продукте с неудовлетворительными штатными средствами администрирования ...Я уже говорил выше, что дискуссии о достоинствах и недостатках системы это в "Сравнение СУБД". На тему сравнения SQL Server и Oracle разбито столько копий, что хватит еще ни на одно поколение программистов и администраторов.

Biz©кста, совсем не пнял столь неуёмное желание запихнуть некую последовательность команд оси внутрь базы ... эт примерно как некоторые узеры додумываются держать графические файлы в вордовских документах ...
ну да лана ... эт ваши проблемы ...
Совершенно неуместная аналогия. Пишется самая обыкновенная системная административная процедура, на вход которой поступают такие параметры как имя базы данных, файловый каталог, количество дней, тип бэкапирования и т.д. Внутри самой процедуры кроме бэкапирования выполняется дополноительно куча всякой мелкой сопутствующей работы. Так как подобная последовательнось действий входит в план администрирования почти всех баз, то имеется самый прямой смысл использовать такой способ, особенно тогда, когда само количество таких баз становится внушительным. У меня при таком подходе все базы совершенно спокойно могут переезжать с места на место, да и вообще настройки становятся очень гибкими по отношению к разным изменениям. И способ этот, к вашему сведению, придуман не мной, а описан в очень умных книжках по администрированию SQL Server. Так что делать скоропалительные выводы о качестве системы и методах работы с нею, при этом не утрудив себя углублением в суть вопроса, - это не мои, а именно ваши проблемы.

С уважением, kkv
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33920513
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
У тебя единственная особенность, это миграция баз, вероятнее всего при этом у тебя происходит потеря истории, это единственная на мой взгляд причина для отказа от штатных средст. Ни размер, ни количество не могут являться основание, удаление файлов не ресурсо емкая, и очень быстрая операция для ОС. А вот потеря истории сводит на нет возможности сервера по данной части.

Я не ошибаюсь? Или что то еще опустил?
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33920521
--null--
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
так вроде есть в MS SQL Server доступ к OLE - можно с помощью sp_OACreate
получить доступ к FileSystemObject и проделать все необходимые действия. Наверное :-)
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33920566
Фотография kkv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Anatoly PodgoretskyУ тебя единственная особенность, это миграция баз, вероятнее всего при этом у тебя происходит потеря истории, это единственная на мой взгляд причина для отказа от штатных средст. Ни размер, ни количество не могут являться основание, удаление файлов не ресурсо емкая, и очень быстрая операция для ОС.
Я не ошибаюсь? Или что то еще опустил?
В данном конкретном случае меня больше волнует программное удаление не только устаревших full-бэкапов, но и удаление соответствующих этому бэкапу диффов и логов.

Anatoly PodgoretskyА вот потеря истории сводит на нет возможности сервера по данной части.
Потеря истории может как-то сказаться на процессе восстановления баз? Я ведь восстанавливаю не из истории бэкапов, а из самих бэкапов.
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33920569
Фотография kkv
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
--null--так вроде есть в MS SQL Server доступ к OLE - можно с помощью sp_OACreate
получить доступ к FileSystemObject и проделать все необходимые действия. Наверное :-)Согласен полностью, буду двигаться и в этом направлении.
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33920763
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
kkvПотеря истории может как-то сказаться на процессе восстановления баз? Я ведь восстанавливаю не из истории бэкапов, а из самих бэкапов.
Может но не в этом случае. Иногда из-за этого невозможно восстановить логи на определенную дату. А из бекапа базы всегда можно восстановить.
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33920774
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
kkv --null--так вроде есть в MS SQL Server доступ к OLE - можно с помощью sp_OACreate
получить доступ к FileSystemObject и проделать все необходимые действия. Наверное :-)Согласен полностью, буду двигаться и в этом направлении.
Это уже без разницы, как командные файлы, так и средства MS SQL Server создают и используют одни и теже объекты OLE, конкретно объект FileSystemObject и рулят его свойствами и методами. Просто удобнее это делать с сервера, но в некоторых случаях наоборот. Например для изоляции от сервера.
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33920788
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Сообственно ответ по OLE c помощью WSH был дан уже во втором ответе, а конкретный скрипт приведен в четвертом. Все остальное так или иначе крутится вокруг это и выяснения позиций по части возможности сервера в этой части.
Сейчас уже правильное направление выбрано, которое одними и теми же методами позволяет делать это как на сервере, так и с помощью командных файлов.
Вроде на этом обсуждение можно и прекратить?
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33920919
Biz©
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
kkvУ меня при таком подходе все базы совершенно спокойно могут переезжать с места на место, да и вообще настройки становятся очень гибкими по отношению к разным изменениям. И способ этот, к вашему сведению, придуман не мной, а описан в очень умных книжках по администрированию SQL Server. Так что делать скоропалительные выводы о качестве системы и методах работы с нею, при этом не утрудив себя углублением в суть вопроса, - это не мои, а именно ваши проблемы.

не пнял, что за множество мелких работ, которые также д.б. именно в ХП и в чём выше гибкость, чем через запуск обычной системной процедуры ... ну да ради бога ... моя, так моя ... :)
вот только последняя ремарка:
вы не задумывались, что ваш подход к удалению файлов по времени, может вас оставить вообще без бэкапа ?
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33920965
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Biz©вы не задумывались, что ваш подход к удалению файлов по времени, может вас оставить вообще без бэкапа ?
Может, но надо качественно писать, с проверками, вот только за смену даты опасаюсь, тут никакие проверки не помогут. Но надеюсь, что там такое запрещено под угрозой увольнения и взыскаиния ущерба.
Правда это всего лишь бекап, его всегда повторно можно сделать.

А проверку можно сделать так, оставлять минимальное количество бекапов, удалять по дате только до этого количество, это поможет и против зверских операций с датой.
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33921013
Biz©
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Anatoly PodgoretskyА проверку можно сделать так, оставлять минимальное количество бекапов, удалять по дате только до этого количество, это поможет и против зверских операций с датой.
дык именно по "намбер оф писиз" и говорю (+проверка минимального размера, если сбд вдруг нулевые бэкапы плодить начнёт) ... к чему время в условиях множественности баз, которые мобыть вообще у покупателя у чёрта на куличках ... хоть што-то сохранится ...
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33921032
Biz©
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Anatoly PodgoretskyПравда это всего лишь бекап, его всегда повторно можно сделать.
автоматизация расхолаживает и наступает время када о бэкапах вспомнят тока када они нужны будут .. непродуманная автоматизация - бич современных админов ...
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33921339
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Суть в авторМожет, но надо качественно писать, с проверками чем больше проверок потенциальных ошибок тем лучше, надо только поднапрячь голову, что бы представить полный спектр. Конечно и количество и размер контролировать и сообщать об обнаруженых проблемах оператору с паралельной записью в системный журнал. Делать все в рамках современных технологий и требований. Писать в журнал с помощью OLE не составит проблем, но писать не только сообщения об ошибка, но информационные об успешном выполнении задания. Конечно это не требуется если запуск ручной, тогда только сообщение оператору. Но я уверен, что подобное будет посажено на планировщик в автоматическом режиме.
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33921352
Фотография Anatoly Podgoretsky
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Biz©автоматизация расхолаживает и наступает время када о бэкапах вспомнят тока када они нужны будут .. непродуманная автоматизация - бич современных админов ...
Ой не говори, некоторые проблемы, например с RAID замечаю только несколько дней спустя. Нет возможности смотреть логи постоянно, только выборочно. Когда администратор один и на все, то другого не остается. А вот диске в RAID уже вылетали не раз. Бекапы также приходится контролировать, а то иногда сбивается автоматизм, пишет проблемы об ошибках в лог и все. А на 2003 логи громадные, можно и пропустить.
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33921664
Yanis
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Anatoly Podgoretsky> Правда это всего лишь бекап, его всегда повторно можно сделать.

Не всегда. Его нельзя повторно сделать после поломки базы
Posted via ActualForum NNTP Server 1.3
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33933678
Вот скрипт на VBS, любезно когда-то предоставленный уважаемым господином pentium-6, немного отредактированным мной.


Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
25.
26.
27.
28.
29.
30.
31.
32.
33.
34.
35.
36.
37.
38.
39.
40.
41.
42.
43.
44.
45.
46.
47.
48.
49.
50.
51.
52.
53.
54.
55.
56.
57.
58.
59.
60.
61.
62.
63.
64.
65.
66.
67.
68.
69.
70.
71.
RunForFiles "D:\arhivBase\" 'файлы, среди которых будет производиться поиск устаревших, лежат в этой директории

Function RunForFiles(folderspec)
   Dim fso, f, f1, fc

   Set fso = CreateObject("Scripting.FileSystemObject")
   Set f = fso.GetFolder(folderspec)
   Set fc = f.Files
   For Each f1 in fc
WScript.Echo (folderspec & f1.name) 'вывод сообщения с именем файла, который будет удален. используется в тестовых целях, в рабочем скрипте нужно отключить
      If CompareDate(folderspec & f1.name) = True Then Log(folderspec & f1.name)
DelFile(folderspec & f1.name) 'удалить файл. 

Next

End Function

'***************************************************************
'Возвращает True, если дата создания файла больше 14-ти дней
Function CompareDate(strFileName)
   Dim fso, f, s, i
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set f = fso.GetFile(strFileName)

   i = DateDiff("d", f.DateCreated, Now)

   If i > 14 Then 'здесь указывается количество дней, которое используется для сравнения с датой создания файла, т.е., в этом примере удаляются все файлы, созданные раньше, чем  14  дней назад
      WScript.Echo(strFileName & " " & i) 'вывести имя файла и его возраст, используется для отладки
      CompareDate = True
   Else
      CompareDate = False
   End If
End Function

'****************************************************************
'функция для извлечения пути
Function ExpandPath(strFullFileName)
   ExpandPath = Left(strFullFileName,instrrev(strFullFileName,"\"))
End Function

'***************************************************************
Function DelFile(strFullFileName)
Dim fso, F
   Set fso = CreateObject("Scripting.FileSystemObject")
   Set F = fso.GetFile(strFullFileName)
   F.Delete
End Function

'****************************************************************
'функция для создания log-файла. он создается рядом со скриптом, имя - дата запуска скрипта.
Function Log(strLineToLog)
   Const ForReading =  1 , ForWriting =  2 
   Dim fso, f, r, FileLog
   r = ""

   FileLog = Left(WScript.ScriptName,(Len(WScript.ScriptName)- 4 )) & "_" & DatePart("yyyy",Date) & "_" & DatePart("m",Date) & "_" & DatePart("d",Date) & "." & "log"
   Set fso = CreateObject("Scripting.FileSystemObject")

   If (fso.FileExists(FileLog)) Then
      Set f = fso.OpenTextFile(FileLog, Forreading, True)
      r = f.Readall
      f.Close
      Set f = fso.OpenTextFile(FileLog, ForWriting, True)
      f.Write strLineToLog & vbCrLf & r
      f.Close
   Else
      Set f = fso.OpenTextFile(FileLog, ForWriting, True)
      f.Write strLineToLog
      f.Close
   End If
End Function
...
Рейтинг: 0 / 0
Программное удаление устаревших файлов
    #33933684
Просто копируем содержимое скрипта в ткт-файл, меняем расширение на *.vbs и запускаем через планировщик заданий
...
Рейтинг: 0 / 0
50 сообщений из 50, показаны все 2 страниц
Форумы / Windows [игнор отключен] [закрыт для гостей] / Программное удаление устаревших файлов
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]