1C настройка COM соединения. Пример подключения по OLE.
1С: предприятие может работать в следующих режимах согласно концепции 1с :
- Файловый;
- Серверные;
- Web-сервер
Рассмотрим 2-варианта подключения.
Во-первых вариант файловой базы данных.
Настройка COM соединения в 1С. Пример.
Код подключения следующий:
//подключение V8.COMConnector
File="C:\1с\wsBuh\1CBase8.3(3.0.71.77) для экзамена";
БазаДанных = "ws-buh";//"ws-buh";
Пользователь = "";
Пароль = "";
//
// Создается объект-коннектор
V8 = Новый COMОбъект("V83.COMConnector");
//Новый COMObject ("V8.COMConnector");
СтрокаПодключения ="File='"+СокрЛП(File) //"srvr='" + СокрЛП(Сервер)
+ "'; ref='" + СокрЛП(БазаДанных)
+ "'; usr='" + СокрЛП(Пользователь)
+ "'; pwd='" + СокрЛП(Пароль) + "';";
БазаИсточник = V8.Connect(СтрокаПодключения);
1C настройка COM соединения выполнена.
Код
//подключение OLE
File="C:\1с\wsBuh\1CBase8.3(3.0.71.77) для экзамена";
БазаДанных = "ws-buh";//"ws-buh";
Пользователь = "";
Пароль = "";
//
// Создается объект-коннектор
БазаOLE = Новый COMОбъект("V83.Application");//Новый COMObject ("V8.COMConnector");
СтрокаПодключения ="File='"+СокрЛП(File) //"srvr='" + СокрЛП(Сервер)
+ "'; ref='" + СокрЛП(БазаДанных)
+ "'; usr='" + СокрЛП(Пользователь)
+ "'; pwd='" + СокрЛП(Пароль) + "';";
БазаOLE.Connect(СтрокаПодключения);
Получение формы документа в 1с через com соединение
БазаИсточник = Новый COMОбъект("V83.Application");
СтрокаПодключения = "Srvr=""*****"";Ref=""****"";Usr=""***"";Pwd=""111"";";
Попытка
БазаИсточник.Connect(СтрокаПодключения);
Исключение
Сообщить(ОписаниеОшибки());
Возврат;
КонецПопытки;
Документ = БазаИсточник.Документы.ВедомостьНаВыплатуЗарплатыВКассу;
Документ.ПолучитьФормуСписка().Открыть();
Закрыть OLE соединение
ЗавершитьРаботуСистемы (Exit)
Синтаксис:
ЗавершитьРаботуСистемы(<Запрашивать возможность>)
Параметры:
<Запрашивать возможность> (необязательный)
Тип: Булево. Если Ложь, то завершение работы программы будет выполнено безусловно (не зависимо от наличия редактируемых данных).
Если значение параметра Истина, то будут вызываться обработчики закрытия для каждой открытой формы и для всего приложения. Необходимо закрыть все открытые окна и формы. Если нет факторов, препятствующих закрытию (например, данные модифицированы и не сохранены), то выполняется завершение работы. В противном случае (такие данные есть) будет выдан вопрос о необходимости сохранения документов.
Значение по умолчанию: Истина
Описание:
Позволяет принудительно вызвать завершение работы 1С:Предприятия. В зависимости от переданного параметра будут вызываться обработчики закрытия и завершения работы системы или завершает работу безусловно.
Недоступен на сервере 1С:Предприятие. Не используется в модуле внешнего соединения.
Примечание:
Если вызов осуществляется из модуля формы, открытой в модальном режиме, завершение работы системы не выполняется.
Пример:
// безусловное завершение работы программы
ЗавершитьРаботуСистемы();
БазаOLE.ЗавершитьРаботуСистемы(ложь);
Запуск функции для COM соединения
#Если ВнешнееСоединение Тогда
Функция МояФункция() Экспорт
КонецФункции
#КонецЕсли
Спасибо за подробную информацию.
Спасибо за информацию буду знать.