Имя: Пароль:
1C
1С v8
Запрос из 1с8 в 1с7
Ø (GROOVY 29.10.2013 01:36)
0 Uragan_a
 
29.10.13
01:12
Вот подключение
ункция ПодключитьБазуОЛЕ(ПутьБазы) Экспорт
    Пользователь = "";
    Пароль = "";
    Если не((БазаОле="") или (БазаОле=неопределено)) тогда
        Если Вопрос("Есть подключенная база. Подключиться к новой?",
            РежимДиалогаВопрос.ОКОтмена)=КодВозвратаДиалога.Отмена тогда
            Возврат Ложь
        КонецЕсли;
    КонецЕсли;
    БазаОлеТек= Новый COMОбъект("V77.Application");
    РезультатПодключения = БазаОлеТек.Initialize(БазаОлеТек.RMTrade,"/D" + ПутьБазы + " /N" + СокрЛП(Пользователь) + " /P" + СокрЛП(Пароль) + "", "NO_SPLASH_SHOW");
    Если РезультатПодключения = Ложь Тогда
        Предупреждение("Ошибка подключения.");
        Возврат Ложь;
    КонецЕсли;
    БазаОле=БазаОлеТек;
    Возврат Истина;
КонецФункции    // ПодключитьБазуОЛЕ()


А вот как правильно сделать запрос к 7ке?

Запрос = ...