| Вопрос: DBF | Добавлено: 06.07.07 10:13 |
Автор вопроса:  fuzytsfcrew | Web-сайт: video-edit.com.ua | ICQ: 314339 |
|
Ставлю DAO на форму, говорю ему что он DBASE V, указываю базу. В гриде ставлю dataSource = Data1 и все супер!, но...
Возник такой вопрос - как теперь в коде с ним работать? (Смотрел в примерах BPDBF.cls - там добавил класс, вообщем все как в инструкции. с файлом "readme.dbf" все работает а с моим нет..) вообщем нужно заполнить ComboBox значениями первого поля (но там есть повторы, нужно без них) и еще в грид показать определенные поля для выбранного в комбо значения... Прога вроде и простяцкая, но все доки у меня только по Access, а по DBF ничего нету...:( |
| Ответы | Всего ответов: 4 |
|
Номер ответа: 1 Автор ответа:  fuzytsfcrew ICQ: 314339 Вопросов: 30 Ответов: 102 |
Web-сайт: Профиль | | #1 | Добавлено: 06.07.07 15:57 |
|
Огромное спасибо все за оказанную помощь.
Я разобрался, заполнил ComboBox значениями первого поля но с повторами так ничего и не выходит. Data1.RecordSource = "SELECT * FROM baza" Data1.Refresh With Data1.Recordset Do Until .EOF If Not IsNull(!pole1) Then Combo1.AddItem !pole1 .MoveNext Loop End With |
||
|
Номер ответа: 2 Автор ответа: mc-black ICQ: 308-534-060 Вопросов: 20 Ответов: 1860 |
Web-сайт: Профиль | | #2 | Добавлено: 06.07.07 16:22 |
|
Надо исправить SQL-запрос и только.
"SELECT DINSTINCT baza.pole1 FROM baza" или что-то похожее, забываю я уже директивы, посмотри сам в help'е к MS Access, там есть справочник по Jet SQL, так, для общего развития. |
||
|
Номер ответа: 3 Автор ответа: fuzytsfcrewICQ: 314339 Вопросов: 30 Ответов: 102 |
Web-сайт: Профиль | | #3 | Добавлено: 09.07.07 08:16 |
| Спасибо конечно, в help'е к MS Access я это конечно-же нашел. Но не хочет эта зараза работать с DBF. Как ни крутил - DINSTINCT, DISTINCTROW - не понимает. Может пойти другим путем - вложить еще один цикл, который будет присваивать значение поля в какую-нить переменную, а потом как-то сравнивать это значение со след переменной (типа LIKE....) естественно предварительно отсортировав это поле. ??? Только вот с синтаксисом у меня запарка.. | ||
|
Номер ответа: 4 Автор ответа: fuzytsfcrewICQ: 314339 Вопросов: 30 Ответов: 102 |
Web-сайт: Профиль | | #4 | Добавлено: 09.07.07 09:27 |
Спасибо всем, получилось... 
mc-black - BIG RESPECT!!! Data1.RecordSource = "SELECT DISTINCT pole1 FROM baza ORDER BY pole1" Data1.Refresh |
||
Страница: 1 |