| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL | | Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

	« предыдущая ветвь | форум | следующая ветвь »

Помогите найти ошибку [D6, Access]

Владий ©   (2003-08-13 09:57:00) 

База страховых полисов. Нужно из отдельной таблицы брать рассрочку платежа. Предположил, что нужно менять динамически запрос... Благо похожий пример был и работал (н там по комбобоксу выбиралось)
Пример был следующий:

adoReports.Active := false;
adoReports.SQL.Clear;
adoReports.SQL.Add("select * from companies, payments, firm "+
"where (companies.Comp_name = payments.Comp_name) "+
"and (payments.Firm_name = firm.Firm_name) " +
"and (companies.Comp_name = """+tblCompanies.FieldValues["Comp_name"]+""")");
adoReports.Active := true;


Сделал следующим образом:

PolRQ.Active := false;
PolRQ.SQL.Clear;
PolRQ.SQL.Add("select * from polices, Rpay"+
"where (rpay.Police = polices.P_Num) "+
"and (polices.P_Num = """+PolBase.FieldValues["P_Num"]+""")");
PolRQ.Active := true;


Ругается на "ошибку синтаксиса в предложении FROM". Где онибка? Я не в упор не вижу... =(

Хорошей Удачи!
Владий // ICQ: 47659886

---

MsGuns   (2003-08-13 11:37:00) [1]

>Владий ©

А что, предварительно прогонять запросы эксплорером (к примеру) гордость не позволяет ?

---

Е-Моё имя   (2003-08-13 11:30:00) [2]

класс!

---

Владий   (2003-08-13 11:27:00) [3]

А ведь действительно - из-за пробела...
Спасибо огромное!

Хорошей Удачи!
Владий // ICQ: 47659886

---

MsGuns   (2003-08-13 10:48:00) [4]

>Reindeer Moss Eater © (13.08.03 10:14) [5]
>не пробуй так.

Excellent !!!!

---

sniknik   (2003-08-13 10:24:00) [5]

лутше пробел добавь. -> Johnmen © (13.08.03 10:03) [3]

---

Reindeer Moss Eater   (2003-08-13 10:14:00) [6]

не пробуй так.

---

Zorik   (2003-08-13 10:04:00) [7]

попробуй так

PolRQ.Active := false;
PolRQ.SQL.Clear;
PolRQ.SQL.Add("select polices.field1, polices.field2, ... Rpay.field1, Rpay.field2, ... from polices"+
"where (rpay.Police = polices.P_Num) "+
"and (polices.P_Num = """+PolBase.FieldValues["P_Num"]+""")");
PolRQ.Active := true;


---

Johnmen   (2003-08-13 10:03:00) [8]

Таки отсутствует пробел, однако...:) (после Rpay)

---

Nikolay M.   (2003-08-13 10:00:00) [9]

Чему после всех манипуляций до PolRQ.Active := true; равно PolRQ.SQL.Text?

---

Reindeer Moss Eater   (2003-08-13 09:59:00) [10]

Посмотри на получившийся SQL перед выполнением
PolRQ.Active := true;

Только внимательно, а не в упор.

---

Наверх