Архивация базы 1С-Предприятие

21.01.10

База данных - Архивирование (backup)

Используем стандартный планировщик Windows и файл Visual Basic Script с файлом настроек, для плановой выгрузки базы данных.

Бесплатные

ВНИМАНИЕ: Файлы из Базы знаний - это исходный код разработки. Это примеры решения задач, шаблоны, заготовки, "строительные материалы" для учетной системы. Файлы ориентированы на специалистов 1С, которые могут разобраться в коде и оптимизировать программу для запуска в базе данных. Гарантии работоспособности нет. Возврата нет. Технической поддержки нет.

Узнавайте о новых бесплатных решениях в нашей телеграм-группе Инфостарт БЕСПЛАТНО

Наименование Скачано Бесплатно
Файл архив внутри скрипт и файл настроек
.zip 3,64Kb
277 Скачать бесплатно

Вы можете заказать платную доработку или адаптацию этой разработки под вашу конфигурацию на «Бирже заказов».

  • 0% комиссии — оплата напрямую исполнителю;
  • Исполнители любого масштаба — от отдельных специалистов до команд под проект;
  • Прямой обмен контактами между заказчиком и исполнителем;
  • Безопасная сделка — при необходимости;
  • Рейтинги, кейсы и прозрачная система откликов.

Данный скрипт предназначен для создания архивов баз данных, используя стандартный метод выгрузки из 1С. использовать скрипт можно, как в ручном режиме, так и через стандартный Windows - планировщик.

За основу темы использовалась разработка на скриптовом языке AutoIt, но очень хотелось именно на Visual Basic Script с внешним файлом настроек.

Изменить внутренние параметры переменных в самом скрипте дело не сложное, но хотелось, чтобы тело исполнения программы оставалось постоянным а менялся только текстовый файл настроек. Таким образом применяя этот скрипт на разных Серверах Предприятия требуется откорректировать только файл настроек. Жаль, что Visual Basic Script не работает напрямую со стандартными Ini файлами, ни через свои функции, ни через WinApi32... Поэтому шел классическим способом перебирая строки в текстовом файле.

Есть идея делать сохранение настроек в системном реестре, но это дело будующего.

Есть еще идея передавать в качестве параметров имя файла настроек, для того, чтобы подмешивать всякий раз к скрипту различные файлы настроек. Кстати, эта работа в процессе.

29 декабря 2009 г. Во втором архивном файле уже реализована возможность использования различных файлов настроек передаваемых в скрипт из командной строки. То есть создаете столько файлов настроек, сколько баз и последовательно исполняете:

Arc_1C_8.1.vbs nastr.ini

Arc_1C_8.1.vbs nastr2.ini

и.т.д.

По поводу уникальности:

Данная работа имеет кучу аналогичных рзработок. Она не является уникальной. Но анализируя все встречающееся не устраивало... Поэтому это просто реплей для своих целей. Если кому то понравится - буду рад. Если кто то удовлетворился уже ранее опубликованным - отлично. Скриптик в разработке и его задача отрабатывать на сервере, да и пишется он не для пользователя, а именно как сервис для сервера Предприятия... Laughing

Примечание:

  • Реализована функция удаления просроченных архивов. При удалении проверяется префикс архива.
  • 20 января 2010 Реализована возможность работы скрипта при выгрузки из баз версии 7.7. и 8.1 Проверено. В файле - архиве имеются два ini файлика, один для семерки, другой для восьмерки...
  • Пока не продумана схема остановки пользователей... Предполагается, что данная работа совершается в полночь, когда все пользователи отключились.
  • Причем надо будет подумать о механизме блокировки и 8-ки и 7-ки.

До этой разработки архивы выгружал, как рекомендуют в 1С - при помощи создания BackUp в Планировщике SQL Сервера.

Вступайте в нашу телеграмм-группу Инфостарт

См. также

Архивирование (backup) Инструменты администратора БД 1С:Предприятие 8 1C:Бухгалтерия 1С:Розница 2 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия 3.0 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х 1С:Управление нашей фирмой 3.0 1С:Розница 3.0 Платные (руб)

Данная разработка позволит решить вопрос с резервным копированием Ваших баз в автоматическом режиме, расположенных на сервере 1С. Система умеет ставить блокировки на вход, блокировать фоновые задания, принудительно отключать сеансы пользователей. И все это система делает в автоматически при создании бэкапа (или через команду). Выгрузка происходит в родной формат 1С - .dt. Так же система умеет архивировать данные выгрузки с установкой пароля. Умеет менять расширение файла zip или dt на любое указанное вами, что позволит сохранить выгрузки от шифровальщика. Может удалять старые копии выгрузок, оставляя указанное количество резервных копий, начиная с самой поздней. Только для WINDOWS! Версия 1.4 от 28.05.2026

7320 руб.

06.11.2012    80381    635    45    

94

Разработка внешних компонент Телефония, SIP Разработчик 1С:Предприятие 8 1C:Бухгалтерия Россия Платные (руб)

Внешняя компонента выполнена по технологии Native API для 1С 8.х, обеспечивает доступ к программным АТС Asterisk (FreePBX, Elastix) через AMI интерфейс. Через него можно управлять многими функциями Asterisk (определение номеров, перевод звонков, набор телефона и т. д.)

5246 руб.

04.05.2018    52184    128    68    

72

Разработка внешних компонент Разработчик 1С:Предприятие 8 1C:Бухгалтерия 1С:Управление нашей фирмой 1.6 1С:Бухгалтерия 3.0 Платные (руб)

Внешняя компонента позволяет работать c TWAIN-совместимым оборудованием (сканерами, камерами) . Полностью совместима со стандартной TWAIN-компонентой из БСП и может применяться как ее замена без изменения вызовов, при этом может работать с 64-разрядной платформой, а так же имеет расширенную функциональность, например, сохранение результата непосредственно в PDF без использования сторонних утилит. Прекрасно работает на сервере, тонком клиенте и веб-клиенте (проверена работа в браузерах Google Chrome, Mozilla Firefox и Microsoft Internet Explorer).

5084 руб.

12.05.2020    34938    147    100    

103

Архивирование (backup) Учет документов Бухгалтер 1С:Предприятие 8 1С:ERP Управление предприятием 2 1С:Управление торговлей 11 1С:Комплексная автоматизация 2.х Россия Платные (руб)

В текущих версиях 1С пока нет функции, позволяющей автоматически отмечать возврат оригиналов документов с помощью сканера штрих-кодов. Многие контрагенты часто сталкиваются с проблемой утери оригиналов УПД или их невозврата. В ответ на эти запросы было разработано расширение, которое упрощает контроль за возвратом оригиналов документов и помогает лучше организовать их хранение.

12200 руб.

19.02.2025    2939    3    0    

3

Разработка внешних компонент Системный администратор Разработчик Стажер Бесплатно (free)

Библиотека для работы с базами SQLite из 1С на основе внешней компоненты. Для Linux и Windows, бесплатно и с открытым исходным кодом!

14.01.2025    8209    bayselonarrend    17    

54

Разработка внешних компонент Разработчик 1С:Предприятие 8 Россия Бесплатно (free)

В статье описывается приложение-конструктор внешних компонент (native API). Конструктор упрощает процесс разработки за счет удобного добавления всех нужных функций и процедур в графическом режиме, с указанием их параметров и типов параметров. На выходе приложение генерирует готовый код на С++ и Rust и позволяет сразу приступить к реализации, без настройки API компоненты вручную.

04.12.2024    13781    kovalevdmv    29    

84

Архивирование (backup) 1С 8.3 1С:Библиотека стандартных подсистем Абонемент ($m)

Резервные копии базы 1С без завершения сеансов: .dt, файл базы, PostgreSQL, MS SQL, своя команда. Расписание, профили, ротация, ZIP, FTP, журнал и письмо об ошибке. Платформа 8.3+ (кроме 8.2), любая конфигурация с БСП. Подключение за 5 минут.

5000 руб.

27.08.2024    4135    1    6    

2
Комментарии
Подписаться на ответы Инфостарт бот Сортировка: Древо развёрнутое
Свернуть все
1. alexk-is 6550 29.12.09 18:52 Сейчас в теме
Здесь список ссылок на публикации аналогичной направленности http://infostart.ru/public/19363/
2. cdiamond 212 30.12.09 09:46 Сейчас в теме
Скрипт для затирания устаревших файлов:

Set WshShell = CreateObject("WScript.Shell")
Set fso = CreateObject("Scripting.FileSystemObject")
Set folder = fso.GetFolder(Folder_Name)
Set files = folder.Files
For Each f in files
fdate = f.DateCreated
If ((Date - fdate) > Stack_Depth) Then
f.Delete
End If
Next
3. alves 105 30.12.09 09:58 Сейчас в теме
(2) Спасибо внес изменение. Выставляю архив с изменениями. Авторство в скрипте в комментариях.
Для отправки сообщения требуется регистрация/авторизация