Книга знаний

1С:Предприятие / Приемы программирования / Внешние компоненты

Внешняя компонента для объединения конфигураций (v77)

Внешняя компонента предназначена для автоматического объединения конфигураций. режим бета-тестирования.Автор статьи: Sonic | Редакторы: Волшебник
Последняя редакция №8 от 06.05.06 | История
URL: http://kb.mista.ru/article.php?id=217

Ключевые слова: Внешняя компонента, объединение конфигураций


предназначена для объединения конфигураций. умеет пока только
запускать 1Ску, возращает Handle  (hwnd) окна запущенной 1ски
и собственно выполняет объединение.
Пока не работает если есть список пользователей.

----
Регистрация внешней компоненты в системе Windows

Внешняя компонента фактически является дополнением для программных файлов 1С:Предприятие, и требует соответствующей установки.

Любые внешние компоненты для 1С:Предприятие являются COM-библиотеками, которые необходимо перед первым запуском регистрировать в системном реестре. Для этого необходимо обладать правами администратора или привилегированного пользователя на компьютере, где производится установка.

Регистрация при помощи regsvr32 в данном случае, однако, не работает.

Пример регистрации компоненты в системном реестре, чтобы ее смогла найти 1С:


regasm.exe ИмяКомпоненты.dll /codebase

-------
(c) Romix
-------

Параметры:
1. Подключение-
а) для v80
 Попытка
               ПодключитьВнешнююКомпоненту("AddIn.NetComponent");
               Net=Новый ("AddIn.NetComponent");
       Исключение
               Сообщить(ОписаниеОшибки());
       КонецПопытки;


б) для v77

Процедура ПриНачалеРаботыСистемы()
        ИмяВК="AddIn.NetComponent";
  
        ок=ПодключитьВнешнююКомпоненту(ИмяВК);
        Если ок=0 Тогда
                Сообщить("Не удалось подключить компоненту "+ИмяВК);
        КонецЕсли;
        net =СоздатьОбъект(ИмяВК);
 КонецПроцедуры



2. Запустить 1С -

       hwnd_1c=Net.Запустить1С("C:\Program Files\1Cv77\BIN\1Cv7s.exe","Config","H:\1c_bases\Buh\Afina_dv");


3. выполнить объединение

       If hwnd_1c then
       Результат=Net.Обновить1С(hwnd_1c,"c:\1cv7.md");
       endif   


Временно не работает, если в базе есть список пользователей.

Скачать можно http://kb.mista.ru/files/217/V7ExtSample.dll

Здесь можно оставить комментарии по данному вопросу:
http://www.forum.mista.ru/topic.php?&id=179089


p.s. огромное спасибо Romix за предоставленный пример ВК
http://www.kb.mista.ru/files/NetV7ExtTemplate.rar
все методы ии функции, доступные в его ВК, пока остаются доступны



Описание | Рубрикатор | Поиск | ТелепатБот | Захваченные статьи | Установки | Форум
© Станислав Митичкин (Волшебник), 2005-2025 | Mista.ru

Яндекс.Метрика