Циклический бэкап по дням недели

В интернете часто можно встретить статьи о том, как написать скрипты для автоматического архивирования баз MSSQL. Методика, в них предлагаемая создает новый архив каждый новый день.
Более подробно об этом можно почитать в http://outcoldman.ru/ru/blog/show/127
Я предлагаю незначительное усовершенствование скриптов и генерацию архивов по дням недели с циклической их перезаписью. Скрипт тоже не полностью мой, а скомпонован из различных примеров, найденных в интернете, но, надеюсь, именно представленный вариант будет полезен не только мне.

 

Циклический бэкап по дням недели.

 

В интернете часто можно встретить статьи о том, как написать скрипты для автоматического архивирования баз MSSQL. Методика, в них предлагаемая создает новый архив каждый новый день.

Более подробно об этом можно почитать в http://outcoldman.ru/ru/blog/show/127

   Я предлагаю незначительное усовершенствование скриптов и генерацию архивов по дням недели с циклической их перезаписью. Скрипт тоже не полностью мой, а скомпонован из различных примеров, найденных в интернете, но, надеюсь, именно представленный вариант будет полезен не только мне.

 

Для бэкапирования SQL сервера используется обычный скрипт:

DECLARE @pathName NVARCHAR(512)

SET @pathName = ‘D:Backupdb_backup_’ + Convert(varchar(8), GETDATE(), 112) + ‘.bak’

BACKUP DATABASE [MyDataBase] TO DISK = @pathName WITH NOFORMAT, INIT, NAME = N’db_backup’, SKIP, NOREWIND, NOUNLOAD, STATS = 10

 

Этот скрипт создает бекап с именем файла db_backup_YYYYDDMM.bak где YYYYDDMM – это текущая дата.  Дата в имени файла позволит нам создавать каждый день бекап в новом файле. Запустите и проверьте что бекап действительно создается такой, какой вам и нужен. Этот скрипт сохраняем в какой-нибудь папке под именем schedule.sql, предположим c:sheduled tasks. В этой же папке создадим исполняемый файл backup.bat, следующего содержания:

@Echo Off

SetLocal EnableExtensions EnableDelayedExpansion

 

For /F "Tokens=1* Delims==" %%i In (‘WMIC Path Win32_LocalTime Get /Value #k8SjZc9Dxk| Find "="’) Do (

  Set V=%%j

  Set $%%i=!V:~0,-1!

)

If "%$DayOfWeek%"=="0" Set $DayOfWeek=7

 

For /F "Tokens=%$Month%" %%i In ("January February March April May June July August September October November December") Do Set $MonthName=%%i

For /F "Tokens=%$DayOfWeek%" %%i In ("Monday Tuesday Wednesday Thursday Friday Saturday Sunday") Do Set $DayOfWeekName=%%i

 

Echo —————————————

Echo Day            : %$Day%

Echo Month          : %$MonthName% (%$Month%-й месяц года)

Echo Year           : %$Year%

Echo —————————————

Echo DayOfWeek      : %$DayOfWeekName% (%$DayOfWeek%-й день недели)

Echo Quarter        : %$Quarter%

Echo —————————————

Echo Hour           : %$Hour%

Echo Minute         : %$Minute%

Echo Second         : %$Second%

Echo —————————————

 

sqlcmd -S SEVERNAME -U UserName -P Password -i schedule.sql

del D:Backupdb_backup _%$DayOfWeekName%.rar

"C:Program Files (x86)WinRARRar.exe" a -m2 D:Backupdb_backup _%$DayOfWeekName%.rar D:Backupdb_backup _*.bak

If "%$Day%"=="1" copy D:Backupdb_backup _%$DayOfWeekName%.rar D:Backupdb_backup _%$MonthName%.rar

del D:Backupdb_backup _*.bak

 

Где меняем SERVERNAME – имя сервера, UserName – имя пользователя, Password – пароль пользователя, schedule.sql – имя сохраненного скрипта. Вторая и третья строка батника архивирует бекап в rar файл и удаляет сам файл бекапа. Для того чтобы работала архивация необходимо установить архиватор WinRAR и прописать полные пути до исполняемого файла Rar.exe. Дополнительно в этом варианте скрипта создается ежемесячный архив. Если он не нужен, уберите строчку: If "%$Day%"=="1" copy D:Backupdb_backup _%$DayOfWeekName%.rar D:Backupdb_backup _%$MonthName%.rar. Возможны другие варианты архивации (ежемесячная, ежеквартальная и т.д.) с помощью незначительной модификации скрипта,

 

 Теперь можем запустить исполняемый файл backup.bat и проверить проработает ли он так как нужно. Последний шаг это записать schedule в задачи windows. Запускаем Task Scheduler из меню Пуск, либо набираем в командной строке taskschd.msc. В разных версиях Windows это выглядит по-разному, да и информацию о том, как сделать задачу можно прочитать в помощи Windows. Основное – это запускать задачу от имени пользователя с достаточными правами на используемые папки. При помощи таких действий можно так же запрограммировать и любые другие задачи. В скрипте schedule.sql можно перед бекапом вызвать какие-либо необходимые процедуры, может переиндексирование или сжатие базы данных.

 

 

Акция! Вы можете скачать эту разработку в  составе архива всех моих разработок, которые я предлагаю за StartMone, по Специальной  цене//infostart.ru/public/960899/#archive

15 Comments

  1. arteast

    Ммм…доброго времени суток. А чем этот подход принципиально лучше механизма бэкапов средствами SQL?

    Reply
  2. German

    Все это очень не надежно.

    Сколько будет бекапится файл в 500ГГ? А потом еще и по сетке переливаться?

    И все это еще и будет делать рабочий сервер, если нужен такой функционал то лучше использовать

    http://www.red-gate.com/products/SQL_Backup/index.htm

    лучше решения нет. 😉

    Reply
  3. webester

    (2) Решение то неплохое но 300$ за возможность делать бэкапы многовато как то, не находите?

    Reply
  4. clsmk
    А чем этот подход принципиально лучше механизма бэкапов средствами SQL?

    В Express версии нет SQL Agent

    Скрипты SQL соответственно запускать по расписанию удобнее вот так.

    Reply
  5. German

    (3) но оно того стоит, работает безупречно и дает полную уверенность в том что все хорошо.

    Reply
  6. Ivon

    (3)(4)(5)Вот код для SQL Job

    ——————————————————

    IF DATEPART(dw, getdate()) = 1

    BEGIN

    BACKUP DATABASE [MyDB]

    TO DISK = N’G:BackUpMyDB_full.bak’

    WITH NOFORMAT, NOINIT,

    NAME = N’MyDB-Full Database Backup’,

    SKIP, NOREWIND, NOUNLOAD, STATS = 10

    END

    ELSE

    BEGIN

    BACKUP DATABASE [MyDB]

    TO DISK = N’G:BackUpMyDB_diff.bak’

    WITH DIFFERENTIAL , NOFORMAT, NOINIT,

    NAME = N’MyDB-Differential Database Backup’,

    SKIP, NOREWIND, NOUNLOAD, STATS = 10

    END

    ———————————————————-

    Делает в воскресенье полный бекап и во все остальные дни разностный.

    Если у кого Express-версия — копать в сторону sqlcmd. В этом случаевышеупомянутый код записываем в текстовый файл mybackupscript.sql и запускаем его на сервере MSSQL Express с помощью sqlcmd. Соответственно все это дело можно запихнуть в планировщик.

    Если не Express версия, то рекомендую вместе с данным скриптом использовать Log shipping.

    Reply
  7. milkers

    (1) Принципиальной разницы нет чем пользоваться. Следует напомнить, что все средства бэкапирования SQL баз рассчитаны на конкретный тип SQL сервера, как правило, платные, или не имеют достаточной гибкости. Скрипт абсолютно прозрачен, легко контролируем и достаточно надежен, к тому же абсолютно бесплатен и может быть адаптирован под любой тип SQL сервера.

    (2)(3) Не у всех клиентов такие большие базы. Как правило, на сервере с 4-8 процессорами параллельное архивирование базы не заметно даже в дневные часы. Но по сценарию я запускаю архивирование в ночное время суток. Для больших баз от архивирования надо отказываться и использовать достаточно большие внешние носители, благо с размеров жестких дисков сейчас проблем нет. Копирование по сети тоже не единственный вариант бэкапа. Сеть тоже разной бывает по пропускной способности.

    Reply
  8. webester

    (5) Вопрос не только в том стоит или не стоит, вопрос еще в том что сравнивать приложение за 300$ и скрипт сделанный в обеденные перерывы как то неправильно. Это продукты из разных категорий. Но открытые решения всегда больше нравились в силу сказанного в (7)

    Reply
  9. DMSDeveloper

    (4) А в Express версии SQL-Server agent и не нужен!

    По условиям лицензирования Microsoft — SQL Express предназначен для разработчиков программного обеспечения и нивкоем случае не должен использоваться при осуществлении коммерческой деятельности.

    Т.е. Разработать программу для SQL и затем продавать программу вы можете, а вот использовать его как движок для своей рабочей базы — нельзя.

    Reply
  10. nikakoy

    У нас так реализовано…

    На сервере, не сильно загруженном в дневное время, запускается назначенное задание, через 10 мин. (вычислено эмпирически, с большим запасом).

    В файлы год_месяц_дата_MD и год_месяц_дата бекапируются файлы MD,DDS,USR и SQL бекап в отдельный файл (потому что это занимает порядочное время) .

    Технология — файлы структуры копируются, переименовываются и упаковываются в архив.

    Файл бэкапа переименовывается и архивируется.

    Имена файлов формируются час_минуты.расширение.

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

    Собственно сам VBS скрипт

    Const OverwriteExisting = TRUE

    Set objFSO = CreateObject(«Scripting.FileSystemObject»)

    Set WshShell = CreateObject(«WScript.Shell»)

    l= len(CStr(time))

    ‘формирование новых имен файлов

    if l=8 then

    NewName = CStr(Mid( time,1,2) & «_» & Mid(time,4,2) & «_» & «Base_» & «.bak»)

    NewNameMD = CStr(Mid( time,1,2) & «_» & Mid(time,4,2) & «_» & «Base_» & «.MD»)

    NewNameDDS = CStr(Mid( time,1,2) & «_» & Mid(time,4,2) & «_» & «Base_» & «.DDS»)

    NewNameUSR = CStr(Mid( time,1,2) & «_» & Mid(time,4,2) & «_» & «Base_» & «.USR»)

    else

    NewName = CStr(Mid( time,1,1) & «_» & Mid(time,3,2) & «_» & «Base_» & «.bak»)

    NewNameMD = CStr(Mid( time,1,1) & «_» & Mid(time,3,2) & «_» & «Base_» & «.MD»)

    NewNameDDS = CStr(Mid( time,1,1) & «_» & Mid(time,3,2) & «_» & «Base_» & «.DDS»)

    NewNameUSR = CStr(Mid( time,1,1) & «_» & Mid(time,3,2) & «_» & «Base_» & «.USR»)

    end if

    ‘C:BKP временная папка на сервере выполняющем архивацию

    ‘N:Base путь к каталогу базы данных

    objFSO.CopyFile «N:Base1Cv7.MD» , «C:BKP» & NewNameMD , OverwriteExisting

    objFSO.CopyFile «N:Base1Cv7.DDS» , «C:BKP» & NewNameDDS , OverwriteExisting

    objFSO.CopyFile «N:Baseusrdefusers.usr» , «C:BKP» & NewNameUSR , OverwriteExisting

    ‘файл rar.exe положил в C:Program Files1Cv77

    ‘файлы после завершения упаковки удаляются rar_ом…

    RunStr =»C:Progra~11Cv77RAR a \CетевоеИмяКудаПоложитьАрхивBKP$Base_» & Mid(Date,9,2) & «_» & Mid(Date,4,2) & «_» & Mid(Date,1,2) & «_MD C:BKP*.* -DW»

    WshShell.Run runstr

    WScript.Sleep 12000

    objFSO.MoveFile «\Srv02kp$Base_backup.bak» ,»\Srv02kp$» & NewName

    RunStr =»C:Progra~11Cv77RAR a \CетевоеИмяКудаПоложитьАрхивBKP$Base_» & Mid(Date,9,2) & «_» & Mid(Date,4,2) & «_» & Mid(Date,1,2) & «.rar \СетевоеИмяSQLсервераkp$» & NewName & » -DW»

    WshShell.Run runstr

    Reply
  11. nikakoy

    Может кому-то пригодится..

    Ежесуточный (средствами 1С) выполняется скриптом.

    On Error Resume Next

    dim ParamFile,BasePath,User,UserPassvord,Arhiv,RunString

    Set objShellApp = CreateObject(«Shell.Application»)

    BasePath = «N:Base»

    User = «UsVeR»

    UserPassvord = «UsVeR_Pass»

    Arhiv = CStr(«N:BaseInOutBase_» & Mid(Date,9,2) & «_» & Mid(Date,4,2) & «_» & Mid(Date,1,2) & «.zip»)

    ParamFile = CStr(BasePath & «arhiv.prm»)

    Set FSO = CreateObject(«Scripting.FileSystemObject»)

    ‘MsgBox paramfile, vbInformation

    Set File = FSO.CreateTextFile(ParamFile)

    file.WriteLine «[general]»

    file.WriteLine «Quit=1»

    file.WriteLine «UnloadData=1»

    file.WriteLine «[UnloadData]»

    file.WriteLine «IncludeUserDef=1»

    file.WriteLine «UnloadToFile=»»» & Arhiv & «»»»

    RunStr = «»»C:Program Files1Cv77BIN1cv7s.exe»» Config /D» & «»»» & BasePath & «»» /N» & User & » /P» & UserPassvord & » /@»»» & paramFile & «»»»

    Set WshShell = CreateObject(«WScript.Shell»)

    WshShell.Run runstr

    If Err.Number <> 0 Then

    MsgBox «Чет не срослось!», vbInformation

    End If

    Reply
  12. Baglandir

    Сделал себе бекапы на основании этой статьи.

    Рекомендую в дополнение к статьи скачать видеоуроки по бекопированию. Оказалось все не так сложно как казалось на первый взгляд.

    В дополнение добавлю что возникли трудности с очисткой лог файла которые решаются с помощю скриптов .

    Reply
  13. Ichigo

    Хороший скрипт, очень удобный!

    Поставили и забыли про бэкапы 🙂 каждый день (ночью) автоматом запускается и делается бэкап. Человеческий фактор уходит (забывчивость).

    Reply
  14. wolf2012x

    Отличный скрипт…

    Reply
  15. skelelaz

    Бэкаплю bat-файлом с WinRAR 3 раза в сутки. Тоже нормально. На счет цикличности — предпочитаю чистить от лишних архивов вручную, а так пускай собираются, сколько места хватит. Бывает, что надо архив полугодовой давности посмотреть.

    Reply

Добавить коментарий

Ваш адрес email не будет опубликован. Обязательные поля помечены *