![]() |
Модераторы: Poseidon |
![]() ![]() ![]() |
|
Mike324 |
|
|||
Новичок Профиль Группа: Участник Сообщений: 1 Регистрация: 29.6.2006 Репутация: нет Всего: нет |
Взял из учебника пример "Адресная книжка", набрал в Дельфи 7 код, фрагмент из которого приведен ниже
procedure TForm1.Button1Click(Sender: TObject); var buf:string[30]; begin buf:=InputBox('Выборка информации из БД', '1Введите информащию и щелкните на кнопке ОК',''); if buf ='' then exit; with Query1 do begin Close; SQL.Clear; SQL.Add('SELECT Fam, Name, Tel, Email'); SQL.Add('From":adrbook:adrbook.db"'); SQL.Add('WPERE'); SQL.Add('(Fam = "'+ buf +'")'); SQL.Add('ORDER BY Fam, Name'); Open; if RecordCount <> 0 then DataSource1.DataSet:=Query1 else ShowMessage('В БД нет записей, удовлетворяющих' + #13 + 'критерию запроса.'); end; end; Но при запуске программы и введении в InputBox фамилии и нажатии ОК вылетает табличка Debugger Exception Notification Project Project1.exe raised exception class EDBEngineError with message 'Invalid use of keyword. Token:(Fam Line Number: 4'. Process stopped. Use Step or Run to continue. Пытался ввести этот SQL запрос через компонент Query. При перестановке свойства Active из False в True опять вылетает эта табличка. В чем дело? |
|||
|
||||
skyboy |
|
|||
неОпытный ![]() ![]() ![]() ![]() Профиль Группа: Модератор Сообщений: 9820 Регистрация: 18.5.2006 Где: Днепропетровск Репутация: 5 Всего: 260 |
потому что надо "WHERE",а не "WPERE"!
Добавлено @ 15:43 пара замечаний: 1. при размещении поста на форуме пользуй кнопку "Код"(справа вверху над полем ввода текста). Подсветка синтаксиса никогда не будет лишней. 2. При ошибках компилятор вылетает сразу же после обнаружения, но на следующей строчке. В твоеё ситуации сбой произошёл на линии 4, о чём компилятор тебе и указал. В смысле, 4-й линии запроса. Посмотрел бы на предыдущюю линию -- сразу бы заметил ошибку. 3. "SQL", а не "СОЛ", несмотря на некоторую схожесть букв. |
|||
|
||||
comtat |
|
|||
![]() Эксперт ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 1310 Регистрация: 2.5.2006 Где: Россия, Казань Репутация: 8 Всего: 71 |
SQL РУЛИТ, так что читаем по нему маны
![]() -------------------- Рожденный в СССР !!! ExtJS - мой фреймворк |
|||
|
||||
![]() ![]() ![]() |
Правила форума "Центр помощи" | |
|
ВНИМАНИЕ! Прежде чем создавать темы, или писать сообщения в данный раздел, ознакомьтесь, пожалуйста, с Правилами форума и конкретно этого раздела.
Более подробно с правилами данного раздела Вы можете ознакомится в этой теме. Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Poseidon, Rodman |
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Центр помощи | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |