Форум по Delphi программированию

Delphi Sources



Вернуться   Форум по Delphi программированию > Все о Delphi > [ "Начинающим" ]
Ник
Пароль
Регистрация <<         Правила форума         >> FAQ Пользователи Календарь Поиск Сообщения за сегодня Все разделы прочитаны

 
 
Опции темы Поиск в этой теме Опции просмотра
  #1  
Старый 08.08.2010, 00:01
gebs gebs вне форума
Прохожий
 
Регистрация: 03.08.2010
Сообщения: 48
Репутация: 10
По умолчанию Помогите с SQL запросом

Помогите пожалуйста с SQL запросом

немного поясню, есть основная форма Form1, есть форма редактирования Form2, контролы которой подключены к DataSource 1 формы, при запросе возникает ошибка в синтаксисе. Спасибо!

Код:
Form1.myquery_znp.SQL.ADD('UPDATE znp SET id = :id, iddog = :iddog, lastname = :lastname, name = :name, surname = :surname, addrstreet = :addrstreet, addrdom = :addrdom, addrkv = :addrkv, addretazh = :addretazh, mobtel = :mobtel, ');
Form1.myquery_znp.SQL.ADD('domtel = :domtel, tarif = :tarif, datapodkl = :datapodkl, ktoprinyal = :ktoprinyal, ktoispolnil1 = :ktoispolnil1, ktoispolnil2 = :ktoispolnil2, rozetki = :rozetki, kabel = :kabel, status = :status');
Form1.myquery_znp.SQL.Add('WHERE `id`= :id');
Form1.myquery_znp.ParambyName('id').AsInteger :=cxDBSpinEdit1.Value;
Form1.myquery_znp.ParambyName('iddog').AsInteger :=cxDBSpinEdit2.Value;
Form1.myquery_znp.ParambyName('lastname').asstring:=DBEditEh1.Text;
Form1.myquery_znp.ParambyName('name').asstring:=DBEditEh2.Text;
Form1.myquery_znp.ParambyName('surname').asstring:=DBEditEh3.Text;
Form1.myquery_znp.ParambyName('addrstreet').asstring:=DBComboBox6.Text;
Form1.myquery_znp.ParambyName('addrdom').asstring:=DBEdit1.Text;
Form1.myquery_znp.ParambyName('addrkv').asstring:=DBEdit2.Text;
Form1.myquery_znp.ParambyName('addretazh').asstring:=DBEdit3.Text;
Form1.myquery_znp.ParambyName('mobtel').asstring:=DBEdit4.Text;
Form1.myquery_znp.ParambyName('domtel').asstring:=DBEdit5.Text;
Form1.myquery_znp.ParambyName('tarif').asstring:=DBComboBox2.Text;
Form1.myquery_znp.ParambyName('datapodkl').AsDateTime:=AdvDBDateTimePicker2.DateTime;
Form1.myquery_znp.ParambyName('ktoprinyal').asstring:=DBComboBox1.Text;
Form1.myquery_znp.ParambyName('ktoispolnil1').asstring:=DBComboBox3.Text;
Form1.myquery_znp.ParambyName('ktoispolnil2').asstring:=DBComboBox4.Text;
Form1.myquery_znp.ParambyName('status').asstring:=DBComboBox5.Text;
Form1.myquery_znp.Execute;
Close;
end;
Ответить с цитированием
 


Delphi Sources

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск
Опции просмотра

Ваши права в разделе
Вы не можете создавать темы
Вы не можете отвечать на сообщения
Вы не можете прикреплять файлы
Вы не можете редактировать сообщения

BB-коды Вкл.
Смайлы Вкл.
[IMG] код Вкл.
HTML код Выкл.
Быстрый переход


Часовой пояс GMT +3, время: 19:58.


 

Сайт

Форум

FAQ

Соглашения

Прочее

 

Copyright © Форум "Delphi Sources" by BrokenByte Software, 2004-2025