Главная категория > 1С, автоматизации торговли, бухгалтерское и прочее...

1С бэкапы

<< < (2/4) > >>

PuRGen:
Клиентам тупо второй хард и бакапы по расписанию.
Про систему на второй работе оьдельная песня, рядовому денег не хватит.
Все в виртуализации и бакапится целыми виртуальнымт машинами. Sql копируется дополнительно. 1сник что-то типо резервирует, но не подозревает, что это внутри виртуальной машины)))

drfaust:

--- Цитата: PuRGen от 06/05/2018 02:34:44 ---Клиентам тупо второй хард и бакапы по расписанию.
--- Конец цитаты ---
А потом кЕтайБП после очередного "пстрык" в розетке бодро выжигает всё что есть по 5В, в том числе и контроллеры веников - проходили и не раз. Про ИБП и пр не надо вспоминать - через годик-другой обычно компы и розетки у клиентов превращаются в сгусток соплей от доморощенных электриков/знакомых/кАмпутАрщиков.

Лучше один веник и облако по вебдав. Веник для ускорения бэкапа(архивировать на него намного быстрее, чем в облако), а потом в фоне тихо и мирно долбить этот бэкап в тырнет, пока товаровед/бухгалтер ломает голову как надуть хозяина ;) .

У меня, применительно к 1С-рознице в принципе остался один вопрос - периодичность при автобэкапе.
Или же плюнуть и отдать это на откуп тому самому товароведу - начнёт забывать иконку на батник жмакать - ССЗБ.

Ну и сколько копий "предыдущих" бэкапов хранить?

PuRGen:
Вебдав конечно хорошо, но только при наличии соответствующего интернета. У нас ДСЛ не редкость, как и 3жэ свистки со скоростью ежа.
А копий обычно храню неделю, т.е. 7. Хотя есть и три дня. Один фиг вручную восстанавливать недельные документы мало кому понравится.

GS:
10 дней храню копии
Спойлер
--- Код: ---
Sub RunProgram(Filename, Wait)
Set WshShell = Wscript.CreateObject("WScript.Shell")
RetVal = WshShell.Run(Filename, Wait)
End Sub

Call RunProgram("c:\scripts\backup.cmd", False)


Set filesys = CreateObject("Scripting.FileSystemObject")
Set objFolder = filesys.GetFolder("z:\BACKUP")
For Each File in objFolder.Files
If LCase(filesys.GetExtensionName(File)) = "rar" AND DateDiff("D", File.DateLastModified, Now) > 10 Then
File.Delete true
End If
Next


--- Конец кода ---

SkaT:

--- Цитата: drfaust от 05/05/2018 20:49:16 ---... Вопрос как организовать это дело автоматом. Закидывать всё это "по рассписаию" - место будет медленно и уверенно заканчиваться, тем более быстро закончаться халявные 10Гиг на тындекс-драйве. ...
--- Конец цитаты ---
А к чему привязан "тындекс-драйв"? К IP компа? Есть реальные ограничения на количество созданных/используемых "тындекс-драйв-ов"?
Или есть возможность создать штук 10, и по кольцу в них новые вэкапы закидывать, а "старые" вэкапы удалять?

Навигация

[0] Главная страница сообщений

[#] Следующая страница

[*] Предыдущая страница