Форум программистов «Весельчак У»
  *
Добро пожаловать, Гость. Пожалуйста, войдите или зарегистрируйтесь.
Вам не пришло письмо с кодом активации?

  • Рекомендуем проверить настройки временной зоны в вашем профиле (страница "Внешний вид форума", пункт "Часовой пояс:").
  • У нас больше нет рассылок. Если вам приходят письма от наших бывших рассылок mail.ru и subscribe.ru, то знайте, что это не мы рассылаем.
   Начало  
Наши сайты
Помощь Поиск Календарь Почта Войти Регистрация  
 
Страниц: [1]   Вниз
  Печать  
Автор Тема: Unknown Language Driver в BDE  (Прочитано 9384 раз)
0 Пользователей и 2 Гостей смотрят эту тему.
DanZer
Гость
« : 16-08-2004 19:23 » 

Доброго времени суток всем.

В нашей конторе имеется база данных, написанная на Visual FoxPro 5. Фирмочка, которая это все клепала, давным-давно сдохла, потому как в наших краях заказчиков маловато, поэтому за обновлениями обратиться некуда. Попросило начальство меня написать программульку, которая делает выборку из этой базы. Ну что ж - надо, значит надо. Ставлю свой любимый Delphi 6 и вот такой облом получается: как только меняю в свойствах таблицы .Active на True, так сразу BDE вылетает с ошибкой Unknown Language Driver. Через компонент TQuery пробовал вытаскивать данные - та же история. SQL Explorer показывает структуру таблицы, если побаловаться с параметром Transaction Isolation, но данные вытаскивать тоже не желает. Пока, чтобы отчитаться, обошелся экспортом нужных таблиц в файлы dBase, и беру данные уже оттуда, но это не выход - при каждом изменении все экспортировать заново придется... Поможите, кто чем может, сами мы не местные Ага
Записан
Oldy
Команда клуба

ru
Offline Offline
Пол: Мужской

« Ответ #1 : 17-08-2004 05:14 » 

DanZer, попробуйте через ODBC или лучше ADO+ODBC, где в качестве ODBC драйвера - Microsoft Visual FoxPro Driver. Если и это не поможет, то придется двоичным редактором править заголовки (байт кодовой страницы) DBF файлов.
Записан

С уважением, Oldy.
DanZer
Гость
« Ответ #2 : 17-08-2004 06:14 » 

Спасибо, обязательно попробую.
Записан
DanZer
Гость
« Ответ #3 : 18-08-2004 06:37 » 

Попробовал, получилось. Но теперь вопрос по ADO - как отфильтровать таблицу по значению введенному пользователем? FilterOptions там не поддерживается, а значит и PartialCompare тоже...
Записан
Oldy
Команда клуба

ru
Offline Offline
Пол: Мужской

« Ответ #4 : 18-08-2004 08:10 » 

DanZer писал,
Цитата

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

Предлагаю использовать SQL-запрос с изменяемыми условиями выборки, т.е.
select * from MyDBF WHERE field1 =|<|>|LIKE :par1... и т.д. и выдавать пользователю не таблицу а DataSet (результат SQL запроса).
Записан

С уважением, Oldy.
x77
Модератор

ro
Offline Offline
Пол: Мужской
меняю стакан шмали на обратный билет с Марса.


« Ответ #5 : 18-08-2004 08:48 » 

и у TAdoTable, и у TAdoQuery есть событие OnFilterRecord, в котором можно сравнивать и отфильтровывать всё, что угодно.
Записан

DanZer
Гость
« Ответ #6 : 18-08-2004 19:28 » 

SQL-запросы пробовал, делаю через ADODataSet.CommandText, но они не проходят, выдают в результате либо пустой набор (если использую = или LIKE), либо все записи, начинающиеся с букв, больше или меньше первой буквы запроса (если соответственно ставить > или <). Т.е. если, к примеру, в запросе задать ... where street_name > 'Северная', выдаются все улицы начинающиеся с букв от Т до Я, если ... where street_name < 'Северная', выдаются все улицы начинающиеся с букв от А до Р.  А <>, естественно, выдает все, кроме того, что надо   Ха-ха-ха

С ADOQuery я и сам возился, но пока до конца не разобрался, почему вечно ругается, что поле Parameter чего-то недопустимое содержит. И ParameterCheck отключал - все равно.
Записан
DanZer
Гость
« Ответ #7 : 19-08-2004 00:34 » 

Урряяя! Оно работает! :l_cool: OnFilterRecord - как раз то, что надо.  Всем, кто принял/проявил участие огромное спасибо.
Записан
x77
Модератор

ro
Offline Offline
Пол: Мужской
меняю стакан шмали на обратный билет с Марса.


« Ответ #8 : 19-08-2004 05:33 » 

Цитата
Урряяя! Оно работает
- куда б оно делось с подводной лодки Ага
Записан

Страниц: [1]   Вверх
  Печать  
 

Powered by SMF 1.1.21 | SMF © 2015, Simple Machines