Иногда возникает ситуация, когда приходится обновлять базу какого-либо древнего релиза. В этом случае приходится либо скачивать все обновления подряд, либо в полуавтоматическом режиме выискивать нужную последовательность скачиваемых обновлений.
Когда мне надоело делать это вручную, родилась идея сделать самостоятельную конфигурацию, которая могла бы сама выкачивать из интернета все, что мне нужно.
Итак, начнем с настроек и скачивания обновлений в интерактивном режиме.
1. Настройки
Параметры доступа в портал обновлений (это который releases.1c.ru) хранятся в константах(Меню "Настройка параметров" -> "Открыть настройки авторизации").
Настройки скачиваемых конфигураций хранятся в рг. св. "Список конфигураций". (Меню "Настройка параметров" -> "Открыть настройки списка конфигураций"):
Список можно заполнить по умолчанию из макета, в котором хранятся самые популярные конфигурации.
2. Интерактивный режим
Чтобы скачать обновления, нужно:
1. Указать Логин/пароль от сайта 1С:ИТС;
2. Выбрать конфигурацию из списка доступных,
3. Указать каталог, в который будут скачиваться обновления;
4. Нажать "Получить список обновлений";
5. Выбрать необходимые версии;
6. Нажать "Скачать обновления".
После этого обновления скачаются в заданный каталог для обновлений.
Теперь по поводу скачивания необходимой последовательности обновлений.
Для того, чтобы обновить текущую конфигурацию (например УТ) с какой-нибудь древней версии, например 10.3.22.2, необходимо нажать кнопку "Установить последовательность обновлений", после чего укзать номер версии, которая стоит сейчас:
Или с помощью контектстного меню в таблице:
После этого флажки таблицы будут установлены в соответствии с алгоритмом и можно скачивать выделенные версии:
3. Запуск с помощью скрипта
Скачивание обновлений можно запускать с помощью скрипта. При этом будет скачиваться только одно, самое последнее обновление.
Для этого надо создать VBS-скрпт следующего вида:
On Error GoTo 0
UserName = "Admin"
Password = "123"
Set connector = CreateObject("V83.COMConnector")
WScript.Echo("connecting...")
Set connection = connector.Connect("File=D:\Work\UpdDownloader\base;Usr=""" & UserName & """;Pwd=""" & Password & """;")
WScript.Echo("downloading Acc20...")
call connection.ExtConnection.GetUpdates("Acc20")
WScript.Echo("downloading HRM25...")
call connection.ExtConnection.GetUpdates("HRM25")
WScript.Echo("finished")
В этом случае вызывается процедура GetUpdates(ID), где параметр ID соответствует id необходимой конфигурации в рг. св. "Список конфигураций".
Чтобы сообщения валились в командную строку, а не предупреждениями, надо вызывать файл с VBS-скриптом с помощью команды
"cscript run_upd.vbs", где run_upd.vbs - файл с VBS-скриптом (т.е. из bat-файла).
Похожие публикации:
Автоматическая загрузка обновлений+платформы 8.2 (Downloader 1C)
