Помогите, пожалуйста. Битый час ищу как сделать запрос к ДБФ и никак.
То что сейчас имею:
       База = СоздатьОбъект("OLEDBData");
   Соединение = "Provider=VFPOLEDB.1;Data Source=" + КаталогИБ()+ ";Mode=ReadWrite;Extended Properties="";User ID="";Password="";Mask Password=False;Collating Sequence=RUSSIAN;DSN=""";
   Рез = База.Соединение(Соединение);
   //Запрос = База.СоздатьКоманду();
   RS = СоздатьОбъект("ODBCRecordset");
   RS.УстБД(База);
   ТекстЗапроса = "
   |SELECT  
   |    Спр.ID as [Элемент $Справочник.Товары]
   |,        $Спр.ИД as ИД
   |FROM
   |        $Справочник.Товары as Спр
   |ORDER BY
   |$Спр.ИД    DESС
   |";
   //Запрос.Выполнить(ТекстЗапроса);
   //ТЗ = СоздатьОбъект("ТаблицаЗначений");
   //RS.Отладка(1);
   ТЗ = Запрос.ВыполнитьИнструкцию(ТекстЗапроса);

и что не получается ? что за ошибка ?

Запрос = База.СоздатьКоманду();
   ТекстЗапроса = "
           |SELECT
           |*
           |FROM $Справочник."+"СТСостоянияОбъектов"+" as Спр where $Спр.КодВнешний=:ВыбКод";
   Запрос.УстановитьТекстовыйПараметр("ВыбКод","55169095549987777");        
   ТЗ2 = Запрос.ВыполнитьИнструкцию(ТекстЗапроса);
   ТЗ2.ВыбратьСтроки();
   Пока ТЗ2.ПолучитьСтроку()=1 Цикл
       Сообщить(ТЗ2.КодВнешний);
               Сообщить(ЗначениеИзСтрокиВнутр(ТЗ2.ВнутреннееПредставление));
               Сообщить("Дата КПК - "+ТЗ2.ДатаКПК+", Дата Загрузки "+ТЗ2.ДатаКонтроль);
               Сообщить("----");
   КонецЦикла;

(1)у него все не получается, даже не интересно, что за ошибка.

Эту статью читал?

http://www.1cpp.ru/forumfiles/Attachments/mod_002.zip

Для DBF версии рекомендуется использовать объект “ OLEDBData”(для версии 1С++ 2.0.0.0 и выше) следующим образом:
       База = СоздатьОбъект("OLEDBData");
       Соединение = "Provider=VFPOLEDB.1;Deleted=Yes;Data Source=" + КаталогИБ()+ ";Mode=ReadWrite;Extended Properties="";User ID="";Password="";Mask Password=False;Collating Sequence=RUSSIAN;DSN=""";
       Рез = База.Соединение(Соединение);
       Запрос = База.СоздатьКоманду();
А что делать, если на компьютере не установлен драйвер фокса? Дык, качать!

(0) в базе никто монопольно не сидит?

(4) драйвер установлен

(0) что за подозрительный реквизит?

"$Спр.ИД"

(7) есть такой реквизит.

(6) ты может объяснишь уже что у тебя не получается?

(3) спасибо на добром слове.

если база дбф нужно использовать "ODBCRecordset"?

(8): о. синхронизируем базы данных по Id объектов данныых?..

(11) см. (1)(9)

База = СоздатьОбъект("OLEDBData");
   Соединение = "Provider=VFPOLEDB.1;Data Source=" + КаталогИБ()+ ";Mode=ReadWrite;Extended Properties="";User ID="";Password="";Mask Password=False;Collating Sequence=RUSSIAN;DSN=""";
   Рез = База.Соединение(Соединение);
   Запрос = База.СоздатьКоманду();
   ТекстЗапроса = "
   |SELECT  
   |        Спр.ID as [Элемент $Справочник.Товары]
   |,        $Спр.ИД as ИДД
   |FROM
   |        $Справочник.Товары as Спр
   |ORDER BY
   |        $Спр.ИД    DESС
   |";
   ТЗ = Запрос.ВыполнитьИнструкцию(ТекстЗапроса);


{Глобальный модуль(5849)}: FAILED! ICommandText::Execute(): Command contains unrecognized phrase/keyword.

(14) а если вместо
"as [Элемент $Справочник.Товары]"

написать:
"as Элемент"

ошибка остается?

(8) ИД - числовой реквизит для связки с mySQL

(15) Ответ тот же, что и в (14)

$Спр.ИД посмотри какое его имя.
Может это поможет

Как получить Id реквизита справочника (fieldid) ?

глМД = СоздатьОбъект("MetaDataWork");
ИДЮрАдрес = Прав(_IDToStr(глМД.ИДРеквизитаСправочника("ЮрЛица","ЮрАдрес")),4);

(18) Мне не надо ID 1С. Как его получить я знаю.

Поменял на:
ТекстЗапроса = "
   |SELECT  
   |      $Спр.Норма as Норма
   |FROM
   |        $Справочник.Товары as Спр
   |ORDER BY
   |        $Спр.Норма    DESС
Но результат тот же.

(17) может дело в этом?

==========================
"Правда, не все имена метапарсер преобразовывает в поля таблиц. Есть исключения – это предопределенные имена:
Для справочников
ИД (Ссылка)        ID"
==================================

попробуй убрать строку про "$Спр.ИД"

(20)
Возьми * и посмотри какие колонки ты получаешь. и харе гадать

(21) поле ИД поменял на Норма, но ошибка та же.

(23) ага, я уже поздно увидел.
Ну пробуй (22) ....

(22) Возвращает поля как в DD-файле

(22) поля DBF

(25) а закеж запрос, который отработал без ошибок.

База = СоздатьОбъект("OLEDBData");
   Соединение = "Provider=VFPOLEDB.1;Data Source=" + КаталогИБ()+ ";Mode=ReadWrite;Extended Properties="";User ID="";Password="";Mask Password=False;Collating Sequence=RUSSIAN;DSN=""";
   Рез = База.Соединение(Соединение);
   Запрос = База.СоздатьКоманду();
   //RS = СоздатьОбъект("ODBCRecordset");
   //RS.УстБД(Рез);
   ТекстЗапроса = "
   |SELECT  
   |      *
   |FROM
   |        $Справочник.Товары as Спр
   |";
   //Запрос.Выполнить(ТекстЗапроса);
   //ТЗ = СоздатьОбъект("ТаблицаЗначений");
   //RS.Отладка(1);
   ТЗ = Запрос.ВыполнитьИнструкцию(ТекстЗапроса);

Нафига тебе все это?
Используй 1CPP.dll + 1sqlite.dll будь человеком.

(28) аднака в нём нет сортировки и именно фразы "DESС"

(29) Я могу обойтись и без этого. Хотелось что б побыстрей запросы выполнялись. А базу на SQL перевести не дают. Поиск документа по какому-нибудь реквизиту шапки запросом 1С это вообще жуть.

(31) Ты не понял, на просвещайся
http://infostart.ru/public/15977/

+ для дбф юзай класс ПрямойЗапрос, после перевода на скуль не надо будет ничего переписывать.

(32) Я все понял. Годами использую T-SQL на другой базе. Но он не работает с ДБФ

(32) ToySQL

(33) Мда.

на форумах прочитал, что можно делать запросы к ДБФ и решил попробовать разогнать то, что изначально сделано тормозом (запросы 1С).

(36) Я тебе еще раз говорю, ты не понял. toysql тут вообще никаким боком. Стукнись в асю расскажу как все сделать, только быстро давай.

Проблему решил пока так:
       ТекстЗапроса = "
   |SELECT
   |      $Спр.ИД as ИДД
   |FROM
   |        $Справочник.Товары as Спр
   |ORDER BY
   |        $Спр.ИД
   |";

   ТЗ = Запрос.ВыполнитьИнструкцию(ТекстЗапроса);
   ТЗ.Сортировать("ИДД -");
оказывается, обратной сортировки он не понимает.

(3) ну хоть что-то получилось. :)

(38) т.е. я был прав в (30)

(40) Да.

(40) с ТОР дело так же обстоит как DESC?

хотя ТОР мне мало бы помог без DESC. мне надо было максимальное значение, а оно без DESC в последней строке.

СПАСИБО ВСЕМ!!!

и за критику тоже.

>>оказывается, обратной сортировки он не понимает.
FAQ для 1С++ через фокс
http://www.1cpp.ru/forum/YaBB.pl?num=1148038411/15#24
в частности документация
http://vfpx.codeplex.com/releases/view/10203
в частности сортироыка

Детальный синтаксис рассматриваемой секции ORDER BY имеет следующий вид:
[ORDER BY Order_Item [ASC | DESC] [, ...]]

Collating Sequence=MACHINE;

(46) спасибо.