COM-подключение к базе 7.7 из 8.2 1С

 &НаКлиенте
   Процедура Загрузки()
    ПутьКБазе="D:\ВашаБаза\1с77\";
    Пользователь="stvbliz";//пользователь базы 7.7
    Пароль="вашпароль";
    МонопольныйРежимOLE = ""; // " /m";
    ЗапускБезЗаставки = 1;
    База = Новый COMОбъект("V1CEnterprise.Application");
    СтрокаПодключения = "/D"""+СокрЛП(ПутьКБазе)+""" /N"""+СокрЛП(Пользователь)+""" /P"""+СокрЛП(Пароль)+"""";
    РезультатПодключения=База.Initialize(База.RMTrade,СтрокаПодключения,?(ЗапускБезЗаставки = 1,"NO_SPLASH_SHOW",""));

    Если НЕ РезультатПодключения Тогда
        Сообщить("Не удалось произвести подключение к информационной базе");
    КонецЕсли;
    Таблица.Очистить();
    Док = База.CreateObject("Документ.ЗаявкаПокупателя");
    Док.ВыбратьДокументы(НачалоНедели(Дата),КонецНедели(Дата));                  
    Пока Док.ПолучитьДокумент() = 1 Цикл
        ОбработкаПрерыванияПользователя();
        Если Док.НомерДок = НомерЗаявки Тогда
            Док.ВыбратьСтроки();
            Пока Док.ПолучитьСтроку()=1 Цикл
                нов=Таблица.Добавить();
                нов.Номенклатура = Док.Номенклатура.Наименование;
                нов.Количество = Док.Количество;
                нов.Единица = Док.Единица.Наименование;
                нов.Цена = Док.Цена;
                Нов.Сумма = Док.Сумма;
                нов.Коэффициент = Док.Коэффициент;
                нов.Производитель = Док.производитель;
                Нов.Валюта = Док.Валюта.Наименование;

            КонецЦикла;
        КонецЕсли;

    КонецЦикла;  

    Док=NULL;
КонецПроцедуры   

 //Примеры получения значений

//Периодический реквизит нужно получать на дату
ДатаОст= ТекущаяДата();
Спр77Оле.ВидГрейда.Получить(ДатаОст).код;

// Перечисление
Если База77ОЛЕ.ВидКонтрагента.Идентификатор() = "ЧастноеЛицо"
// или
Если Сотрудник.ХарактерРаботы.Получить(Необходимая_Дата).Идентификатор() = БазаОЛЕ.EvalExpr("Перечисление.ХарактерРаботы.ТрудовыеОтношения.Идентификатор()") Тогда 
// Принадлежит ...
КонецЕсли;

//В запросе
   // в v7 ссылка OLE
   Запрос = v7.CreateObject("Запрос");
   ТипТовара = v7.evalexpr("Перечисление.ТипыТоваров.Собственный.ПорядковыйНомер()");
   
   ТекстЗапроса = 
   "//{{ЗАПРОС(Сформировать) 
   |ТекущийЭлемент = Справочник.Номенклатура.ТекущийЭлемент;
   |Наименование = Справочник.Номенклатура.Наименование;
   |ТипТовара = Справочник.Номенклатура.ТипТовара;
   |ЕдиницаИзмерения = Справочник.Номенклатура.ЕдиницаИзмерения;
   |Функция Счётчик = Счётчик();
   |Группировка ТекущийЭлемент;
   |Условие(ТипТовара.ПорядковыйНомер() = "+ТипТовара+");
   |"//}}ЗАПРОС 
   ;