You've already forked OpenIntegrations
mirror of
https://github.com/Bayselonarrend/OpenIntegrations.git
synced 2025-08-10 22:41:43 +02:00
Fastfix
This commit is contained in:
@@ -57,7 +57,7 @@
|
|||||||
|
|
||||||
OPI_ПреобразованиеТипов.ПолучитьСтроку(Адрес);
|
OPI_ПреобразованиеТипов.ПолучитьСтроку(Адрес);
|
||||||
|
|
||||||
TCPКлиент = OPI_Инструменты.ПолучитьВнешнююКомпоненту("OPI_TCPClient");
|
TCPКлиент = ПодключитьКомпонентуНаСервере("OPI_TCPClient");
|
||||||
|
|
||||||
TCPКлиент.Address = Адрес;
|
TCPКлиент.Address = Адрес;
|
||||||
|
|
||||||
@@ -206,12 +206,7 @@
|
|||||||
OPI_ПреобразованиеТипов.ПолучитьБулево(ОтветСтрокой);
|
OPI_ПреобразованиеТипов.ПолучитьБулево(ОтветСтрокой);
|
||||||
|
|
||||||
Соединение = ОткрытьСоединение(Адрес);
|
Соединение = ОткрытьСоединение(Адрес);
|
||||||
|
Результат = ОтправитьДвоичныеДанные(Соединение, Данные);
|
||||||
Если Соединение = Неопределено Тогда
|
|
||||||
Возврат "OPI: Не удалось установить соединение";
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
Результат = ОтправитьДвоичныеДанные(Соединение, Данные);
|
|
||||||
|
|
||||||
Если Результат Тогда
|
Если Результат Тогда
|
||||||
|
|
||||||
@@ -235,3 +230,21 @@
|
|||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
|
|
||||||
|
#Область СлужебныеПроцедурыИФункции
|
||||||
|
|
||||||
|
Функция ПодключитьКомпонентуНаСервере(Знач ИмяКомпоненты, Знач Класс = "Main")
|
||||||
|
|
||||||
|
Если OPI_Инструменты.ЭтоOneScript() Тогда
|
||||||
|
ИмяМакета = OPI_Инструменты.КаталогКомпонентOS() + ИмяКомпоненты + ".zip";
|
||||||
|
Иначе
|
||||||
|
ИмяМакета = "ОбщийМакет." + ИмяКомпоненты;
|
||||||
|
КонецЕсли;
|
||||||
|
|
||||||
|
ПодключитьВнешнююКомпоненту(ИмяМакета, ИмяКомпоненты, ТипВнешнейКомпоненты.Native);
|
||||||
|
|
||||||
|
Компонента = Новый("AddIn." + ИмяКомпоненты + "." + Класс);
|
||||||
|
Возврат Компонента;
|
||||||
|
|
||||||
|
КонецФункции
|
||||||
|
|
||||||
|
#КонецОбласти
|
@@ -1146,21 +1146,6 @@
|
|||||||
|
|
||||||
КонецФункции
|
КонецФункции
|
||||||
|
|
||||||
Функция ПолучитьВнешнююКомпоненту(Знач ИмяКомпоненты, Знач Класс = "Main") Экспорт
|
|
||||||
|
|
||||||
Если OPI_Инструменты.ЭтоOneScript() Тогда
|
|
||||||
ИмяМакета = OPI_Инструменты.КаталогКомпонентOS() + ИмяКомпоненты + ".zip";
|
|
||||||
Иначе
|
|
||||||
ИмяМакета = "ОбщийМакет." + ИмяКомпоненты;
|
|
||||||
КонецЕсли;
|
|
||||||
|
|
||||||
ПодключитьВнешнююКомпоненту(ИмяМакета, ИмяКомпоненты, ТипВнешнейКомпоненты.Native);
|
|
||||||
|
|
||||||
Компонента = Новый("AddIn." + ИмяКомпоненты + "." + Класс);
|
|
||||||
Возврат Компонента;
|
|
||||||
|
|
||||||
КонецФункции
|
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
|
|
||||||
#КонецОбласти
|
#КонецОбласти
|
||||||
|
Reference in New Issue
Block a user