Более подробно об этом можно почитать в 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
Related Posts
Восстановление последовательности документов при закрытии месяца в Бухгалтерия 3.0 не завершается
Заполнение табличных частей
Формирование сводных актов выполненных работ
Ввод поступления в переработку на основании передачи сырья (между организациями)- Конспект по установке сервера 1С на linux
Получение имени компьютера и его IP локально и в терминале
Ммм…доброго времени суток. А чем этот подход принципиально лучше механизма бэкапов средствами SQL?
Все это очень не надежно.
Сколько будет бекапится файл в 500ГГ? А потом еще и по сетке переливаться?
И все это еще и будет делать рабочий сервер, если нужен такой функционал то лучше использовать
лучше решения нет. 😉
(2) Решение то неплохое но 300$ за возможность делать бэкапы многовато как то, не находите?
В Express версии нет SQL Agent
Скрипты SQL соответственно запускать по расписанию удобнее вот так.
(3) но оно того стоит, работает безупречно и дает полную уверенность в том что все хорошо.
(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.
(1) Принципиальной разницы нет чем пользоваться. Следует напомнить, что все средства бэкапирования SQL баз рассчитаны на конкретный тип SQL сервера, как правило, платные, или не имеют достаточной гибкости. Скрипт абсолютно прозрачен, легко контролируем и достаточно надежен, к тому же абсолютно бесплатен и может быть адаптирован под любой тип SQL сервера.
(2)(3) Не у всех клиентов такие большие базы. Как правило, на сервере с 4-8 процессорами параллельное архивирование базы не заметно даже в дневные часы. Но по сценарию я запускаю архивирование в ночное время суток. Для больших баз от архивирования надо отказываться и использовать достаточно большие внешние носители, благо с размеров жестких дисков сейчас проблем нет. Копирование по сети тоже не единственный вариант бэкапа. Сеть тоже разной бывает по пропускной способности.
(5) Вопрос не только в том стоит или не стоит, вопрос еще в том что сравнивать приложение за 300$ и скрипт сделанный в обеденные перерывы как то неправильно. Это продукты из разных категорий. Но открытые решения всегда больше нравились в силу сказанного в (7)
(4) А в Express версии SQL-Server agent и не нужен!
По условиям лицензирования Microsoft — SQL Express предназначен для разработчиков программного обеспечения и нивкоем случае не должен использоваться при осуществлении коммерческой деятельности.
Т.е. Разработать программу для SQL и затем продавать программу вы можете, а вот использовать его как движок для своей рабочей базы — нельзя.
У нас так реализовано…
На сервере, не сильно загруженном в дневное время, запускается назначенное задание, через 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
Может кому-то пригодится..
Ежесуточный (средствами 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
Сделал себе бекапы на основании этой статьи.
Рекомендую в дополнение к статьи скачать видеоуроки по бекопированию. Оказалось все не так сложно как казалось на первый взгляд.
В дополнение добавлю что возникли трудности с очисткой лог файла которые решаются с помощю скриптов .
Хороший скрипт, очень удобный!
Поставили и забыли про бэкапы 🙂 каждый день (ночью) автоматом запускается и делается бэкап. Человеческий фактор уходит (забывчивость).
Отличный скрипт…
Бэкаплю bat-файлом с WinRAR 3 раза в сутки. Тоже нормально. На счет цикличности — предпочитаю чистить от лишних архивов вручную, а так пускай собираются, сколько места хватит. Бывает, что надо архив полугодовой давности посмотреть.