![]() |
|
![]() ![]() ![]() |
|
Zerony |
|
|||
![]() Шустрый ![]() Профиль Группа: Участник Сообщений: 89 Регистрация: 21.12.2008 Репутация: нет Всего: нет |
Здравствуйте!
Нам дали на самостоятельное изучение реализацию SQL-запросов с помощью Delphi. Тема несложная, но на самом последнем этапе трудности всё-таки возникли. Вот задание: Практическое задание 1.С помощью MS Access создайте таблицу БД в соответствие с Табл. 1. Создайте в таблице не менее пяти записей. 2.Используя программный способ формирования SQL-запросов, создайте приложение, которое реализует следующие возможности: - Определяет номер телефона по фамилии абонента; - Определяет фамилию, имя, отчество и адрес абонента по номеру телефона; - Выдает все номера телефонов, Ф.И.О. и номера квартир абонентов, проживающих на одной улице в одном доме (по указанному номеру дома и указанной улице Вот с последним-то заданием я и не справилась. У меня есть два Edit'а-один для ввода улицы, другой для ввода дома, кнопка, в процедуре написано следующее: Код: procedure TForm1.Button4Click(Sender: TObject); begin ADOQuery1.Active:=False; ADOQuery1.Close; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('SELECT PhoneNum, FName, LName, PhName , Kv'); ADOQuery1.SQL.Add('FROM Таблица1'); ADOQuery1.SQL.Add('WHERE Street='+'"'+Edit4.Text+'"'); //ADOQuery1.SQL.Add('WHERE House='+'"'+Edit9.Text+'"'); ADOQuery1.Open; ADOQuery1.Active:=True; end; По отдельности (когда один из них закомментирован) запросы работают правильно, но вместе никак не хотят, программа вылетает и выдаёт ошибку "Ошибка синтаксиса (пропущен оператор) в выражении запроса Street="Пушкина" WHERE House="77"" |
|||
|
||||
cat512 |
|
||||
![]() Опытный ![]() ![]() Профиль Группа: Участник Сообщений: 438 Регистрация: 20.3.2007 Репутация: 1 Всего: 15 |
А зачем два раза добавлять where???
Общая конструкция:
Вот так попробуй:
Это сообщение отредактировал(а) cat512 - 16.9.2010, 19:28 |
||||
|
|||||
Данкинг |
|
|||
![]() Yersinia pestis ![]() ![]() ![]() ![]() Профиль Группа: Завсегдатай Сообщений: 8302 Регистрация: 7.11.2006 Где: მოსკოვი Репутация: 35 Всего: 130 |
Ну правильно, видимо, and вместо второго where нужен.
-------------------- There's nothing left but silent epitaphs. |
|||
|
||||
![]() ![]() ![]() |
Правила форума "Delphi: Базы данных и репортинг" | |
|
Запрещено: 1. Публиковать ссылки на вскрытые компоненты 2. Обсуждать взлом компонентов и делиться вскрытыми компонентами Обязательно указание: 1. Базы данных (Paradox, Oracle и т.п.) 2. Способа доступа (ADO, BDE и т.д.)
FAQ раздела лежит здесь! Если Вам помогли и атмосфера форума Вам понравилась, то заходите к нам чаще! С уважением, Vit, Петрович. |
1 Пользователей читают эту тему (1 Гостей и 0 Скрытых Пользователей) | |
0 Пользователей: | |
« Предыдущая тема | Delphi: Базы данных и репортинг | Следующая тема » |
|
По вопросам размещения рекламы пишите на vladimir(sobaka)vingrad.ru
Отказ от ответственности Powered by Invision Power Board(R) 1.3 © 2003 IPS, Inc. |