Запрос с параметром из MS Access с 1с через com соединение #645474

Надо в Access подключиться к 1с и выполнить запрос с параметром, подключение проходит успешно, затык на моменте установки параметра запроса В чём косяк?

А параметр не передавать, а задать через значение религия не позволяет?

Запрос.ТекстЗапроса = "ВЫБРАТЬ ВЫБОР КОГДА КонтактнаяИнформация.Объект ССЫЛКА Справочник.КонтактныеЛицаКонтрагентов ТОГДА КонтактнаяИнформация.Объект.Владелец ИНАЧЕ КонтактнаяИнформация.Объект КОНЕЦ КАК Наименование, КонтактнаяИнформация.CRM_НомерТелефона КАК НомерТелефона ИЗ РегистрСведений.КонтактнаяИнформация КАК КонтактнаяИнформация ГДЕ КонтактнаяИнформация.Тип = Значение(Перечисление.ТипыКонтактнойИнформации.Телефон)"

ой, простите за , не глянул что с Леди общаюсь(((

через значение, это понятно, что работает. Мне не понятно почему через УстановитьПараметр не работает

В чем проявляется "не работает"?

VBA пишет "Syntax error"

к сожалению в VBA познаний оч мало(((

В 1с работает

я с вба ваще не знаком, но может так надо Set Параметр = База.Перечисления.ТипыКонтактнойИнформации.Телефон; Запрос.УстановитьПараметр("Телефон",пАРАМЕТР); ?

не работает. ладно, чёрт с ним, сделаю через значение. спс, за участие.

Вот нашел ссылку

судя по примеру Dim trade As Object Dim Элемент As Object Set trade = CreateObject("V82.Application")                           'Создать Automation сервер trade.Connect("File=""c:InfoBasesTrade"";Usr=""Director"";")      'Соединиться с информационной базой Вам таки надо попробовать соединение а не база Set Параметр = Соединение.Перечисления.ТипыКонтактнойИнформации.Телефон; Запрос.УстановитьПараметр("Телефон",пАРАМЕТР); ?

заработало вот так вот Запрос.УстановитьПараметр "Телефон", База.Перечисления.ТипыКонтактнойИнформации.Телефон

о_О

VBA бессмысленное и беспощадное)))