Имя: Пароль:
1C
 
Подключение к ТиС из УНФ по OLE для обмена данными
0 falselight
 
09.02.17
17:09
Подскажите пожалуйста по коду, для подключения к 1с v7.7
конфигурации ТиС, из 1с 8.3 конфигурации УНФ для обмена данными.
Что бы можно было извлекать объекты из ТиС и перекачивать их для обмена.
Или посоветуйте пожалуйста мануал какой либо.
1 silent person
 
09.02.17
17:16
что-то типа этого

  Попытка
        СоединениеСБазой77 = Новый COMОбъект("V77.Application");
    Исключение
        ЗаписатьВЛог("Не удалось создать объект доступа к базе V7.7");

    КонецПопытки;
    Если НЕ СоединениеСБазой77=Неопределено Тогда
        СтрокаПодключения="/d"""+Путь+""" /n"+Имя+ " /p"+Пароль;
        Попытка
            РезультатПодключения = СоединениеСБазой77.Initialize(СоединениеСБазой77.RMTrade, СтрокаПодключения, "NO_SPLASH_SHOW");
            //РезультатПодключения = ОбъектДоступа.Initialize(ОбъектДоступа.RMTrade, СтрокаПодключения, "");
        Исключение
            ТекстСообщения = " " + ТекущаяДата() + " Непонятная ошибка" + ОписаниеОшибки();
            ЗаписатьВЛог(ТекстСообщения);
            Сообщить(ТекстСообщения);
        КонецПопытки;
        Если Не РезультатПодключения Тогда

           Стр="Не удалось подключиться к базе V7.7
            |Возможно неверно указаны путь к каталогу, имя пользователя или пароль
            |программа запущена в монопольном режиме или требуется переиндексация.";
            ЗаписатьВЛог(Стр);
            Сообщить(Стр);            
        КонецЕсли;
    КонецЕсли;



ну и дальше


СпрСотрудники = СоединениеСБазой77.CreateObject("Справочник.Сотрудники");
2 falselight
 
09.02.17
19:56
(1) Братуха спасибо!