|
|
Регистрация | << Правила форума >> | FAQ | Пользователи | Календарь | Поиск | Сообщения за сегодня | Все разделы прочитаны |
|
Опции темы | Поиск в этой теме | Опции просмотра |
#1
|
|||
|
|||
sql-запрос коректировка
Здравствуйте, такое дело, написал следующий запрос:
Код:
if form2.Caption='1' then begin with form1 do begin ADOQuery1.Active:=false; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add('insert into sotrudniki (familia, ima, otchestvo, professia, data_prinatia, adres, data_rogdenia, tabel, primechanie)'); ADOQuery1.SQL.Add('values ("'+edit1.Text+'","'+edit2.Text+'","'+edit3.Text+'","'+edit4.Text+'","'+edit5.Text+'","'+edit6.Text+'","'+edit7.Text+'","'+edit8.Text+'","'+edit9.Text+'")'); ADOQuery1.ExecSQL; end; end else if form2.Caption='2' then begin with form1.ADOQuery1 do begin active:=false; sql.Clear; sql.Add('update sotrudniki'); sql.Add('set familia = "'+edit1.Text+'",ima = "'+edit2.Text+'",otchestvo = "'+edit3.Text+'",professia = "'+edit4.Text+'",data_prinatia = "'+edit5.Text+'",adres = "'+edit6.Text+'",data_rogdenia = "'+edit7.Text+'",tabel = "'+edit8.Text+'",primechanie = "'+edit9.Text+'"'); sql.Add('where nomer = '+inttostr(n)+''); execSQL; end; end; тесть добавление новой записи либо изменение выделенной в зависимости от заголовка формы. что не так? изменение вообще не работает, добавление через раз Последний раз редактировалось Admin, 04.12.2011 в 14:51. |