Текущий архив: 2002.10.21;
Скачать: CL | DM;

Вниз

Помогите разобраться с ошибкой пожалуйста....   Найти похожие ветки 

← →
KaPaT ©   (2002-09-28 14:06) [0]

Ошибка такая: Invalid use of keyword. Token: BirthDay
Код такой:

With Main do
begin
Query.SQL.Clear;
Query.SQL.Add("UPDATE "base.db"");
Query.SQL.Add("SET");
Query.SQL.Add("Fio = :Fio");
Query.SQL.Add("Birthday = :Birthday");
Query.SQL.Add("Address = :Address");
Query.SQL.Add("Telephone = :Telephone");
Query.SQL.Add("Mobile = :Mobile");
Query.SQL.Add("Pager = :Pager");
Query.SQL.Add("Mail = :Mail");
Query.SQL.Add("Icq = :Icq");
Query.SQL.Add("Nick = :Nick");
Query.SQL.Add("Comment = :Comment");
//Инициализация параметров
Query.Params[0].AsString:=Fio.Text;
Query.Params[1].AsDateTime:=BirthDay.DateTime;
Query.Params[2].AsString:=Address.Text;
Query.Params[3].AsString:=Telephone.Text;
Query.Params[4].AsString:=Mobile.Text;
Query.Params[5].AsString:=Pager.Text;
Query.Params[6].AsString:=Mail.Text;
Query.Params[7].AsString:=Icq.Text;
Query.Params[8].AsString:=Nick.Text;
Query.Params[9].AsString:=Comment.Text;
Query.ExecSQL;
end;


---

← →
KaPaT ©   (2002-09-28 14:08) [1]

Пояснения:
Query находится на форме Main
А Edit"ы на другой

---

← →
NP-237 ©   (2002-09-28 14:14) [2]

Вставь запятые

Query.SQL.Add("Fio = :Fio,");
Query.SQL.Add("Birthday = :Birthday,");

---

← →
Юра   (2002-09-28 14:20) [3]

Посмотри Local SQL Help "Update".
Возможно у вас нехватает запятых в тексте запроса

---

← →
KaPaT ©   (2002-09-28 14:31) [4]

Ребят, спасибо большое....так оно и есть..=)

---

Страницы: 1 вся ветка

Текущий архив: 2002.10.21;
Скачать: CL | DM;

Наверх

Память: 0.47 MB
Время: 0.018 c