V7=Новый COMОбъект("v77.Application", "DATABASE");
Попытка
Открыта=V7.Initialize(V7.RMTrade,"/d"+ПутьКБазе+" /n"+""+" /p"+"","");
   Исключение
   Предупреждение("Ошибка подключения к базе!");
   Возврат;
КонецПопытки;
Док=V7.CreateObject("Документ");

В 8.0. работает, в 8.1 выпадает на последней строчке Неудачная попытка создания объекта (Документ):

Книга знаний: Коды ошибок 1С:80

Попытка
Открыта=V7.Initialize(V7.RMTrade,"/d"+ПутьКБазе+" /n"+""+" /p"+"","");
   Исключение
   Предупреждение("Ошибка подключения к базе!");
   Возврат;
КонецПопытки;
///
это лажа

О = Новый COMОбъект("V77.Application");
   Рез = О.Initialize(О.RMTrade,"/DПапкаСБазой /NИмяЮзера /PПарольЮзера","NO_SPLASH_SHOW");
   Если Рез=0 Тогда Сообщить("Не удалось подключиться к базе в папке "+СокрП(Папка)); Возврат; КонецЕсли;

     Док=V7.CreateObject("Документ");

Попробуй.

3. Ваш код точно такой же как искомый, я просто выкинул из текста пароль и имя юзера. В 8.0. работало в 1С:Предприятие 8.1 (8.1.6.38) не пашет.

в 8-1 Там навяли какие то изменения как раз с объектом оле.Надо мануал искать и смотреть

(4) савсем не такой...

6. В чем разница?

(7) в Если

Открыта=V7.Initialize(V7.RMTrade,"/d"+ПутьКБазе+" /n"+""+" /p"+"","");
Если Открыта=Ложь Тогда
   Сообщить (ОписаниеОшибки());
   Возврат;
КонецЕсли;

Возвращает ОписаниеОшибки()=""

в VBS на скрипт выдает True, ну никак не хочет 8.1.

set v7 = createobject("v77.Application", "DATABASE")

MsgBox(V7.Initialize(V7.RMTrade,"/d"+"***********"+" /n"+"******"+" /p"+"******",""))

(10) А чо, v77 уже может работать как COM+ сервер?

Состояние("Подключение к 7.7");
   ПутьКБазе = "\\file\base\DataBase\Ver";
   
   База77 = Новый COMОбъект("V77.Application");
   Попытка
       strApp = "/M /D""" + ПутьКБазе + """";
       strApp = "/D""" + ПутьКБазе + """";
       Попытка
           Результат = База77.initialize(База77.RMTrade, strApp, "NO_SPLASH_SHOW");
       Исключение
           База77= "";
           Сообщить("Не прошла инициализация Базы! Ошибка - " + ОписаниеОшибки(), СтатусСообщения.БезСтатуса);
           Возврат;
       КонецПопытки;
       Если Результат = 0 Тогда
           База77= "";
           Сообщить("Не прошла инициализация Базы!", СтатусСообщения.БезСтатуса);
           Возврат;
       КонецЕсли;
   Исключение
       База77= "";
       Сообщить("Не прошла инициализация Базы! Ошибка - " + ОписаниеОшибки(), СтатусСообщения.БезСтатуса);
       Возврат;
   КонецПопытки;
   Состояние("Получение остатков.");
   Запрос = База77.EvalExpr("СоздатьОбъект(""Запрос"")");
   ТекстЗапроса = "Номенклатура = Регистр.Остатки.ТМЦ.Код;
   | Кол = Регистр.Остатки.ОстатокТовара;
   | Функция КонКол = КонОст(Кол);
   | Группировка Номенклатура;";
   Рез = Запрос.Выполнить(ТекстЗапроса);
   Запрос.ВНачалоВыборки();
   Состояние("Сохранение остатков.");
   //Сообщить(Строка(ТекущаяДата()) + " Запрос выполнен");
   Пока Запрос.Группировка("Номенклатура") = 1 Цикл;
       СправочникСсылка = Справочники.ТМЦ.НайтиПоКоду(Запрос.Номенклатура);
       Если СправочникСсылка.Пустая() Тогда
           Сообщить("В 7.7 новая номенклатура с кодом " + Запрос.Номенклатура + ". Требуется добавить ее в 8.0");
       Иначе
           СправочникОбъект = СправочникСсылка.ПолучитьОбъект();
           СправочникОбъект.ОстаткиВ7 = Запрос.Кол;
           СправочникОбъект.Записать();        
       КонецЕсли;
   КонецЦикла;
   //Сообщить(Строка(ТекущаяДата()));

(12) У меня на 8.1.6 работает

13 спасибо, в реалии у меня не было только "NO_SPLASH_SHOW", с ним заработало