// Переменная База - строка содержащая путь к базе 1С 7.7

// Возвращает переменную содержащую в себе COM-объект 1С 7.7

Функция ПодключитьсяКOLE(База)

	Попытка

		v7 = Новый COMObject("V1CEnterprise.Application");

	Исключение

		Сообщить(ОписаниеОшибки());

		Возврат Null;

	КонецПопытки;

	

	Попытка

		Открыта = v7.Initialize(v7.RMTrade, "/D""" + База+ """ /M ", "NO_SPLASH_SHOW");

	Исключение

		Сообщить(ОписаниеОшибки());

		Возврат Null;

	КонецПопытки;

	

	Если Не Открыта Тогда

		Сообщить(ОписаниеОшибки());

		Возврат Null;

	КонецЕсли;

	

	Возврат v7;

КонецФункции

   

 v7 = "";