Добавление записи в ADOQuery.

[lovetolaugh]

Доброго времени суток. Такая проблема:
Как добавлять с помощью ADOQuery новые записи в БД?

В БД Students имеются соответственно следующие поля и их типы:



За добавление записи отвечают следующие строки:

adoquery1.Close;
    adoquery1.SQL.Clear;
    adoquery1.SQL.Add('insert into Students values(100, 'Колганов', 'Максим', 'Валерьевич', 'м', 17.11.1991, 'П_408', '111-222', 0, '12345')') ;
    adoquery1.ExecSQL;

Выдаются следующие ошибки (которые все относятся к строчке с добавление записи):



А если например поле имеет тип DATE, то как тогда задать значение поля?

[D-mon]

Вот так попробуй.

adoquery1.SQL.Add('insert into Students values(100, ''Колганов'', ''Максим'', ''Валерьевич'', ''м'', 17.11.1991, ''П_408'', ''111-222'', 0, ''12345'')');

[Аватар]

adoquery1.SQL.Add('insert into Students values(100,''Колганов'',''Максим'',''Валерьевич'',''м'',17.11.1991,''П_408'',''111-222'',0,''12345''') ;

В конце не очень понял зачем вторая скобка. Насчет даты - зависит от СУБД, не знаете как - делайте параметрический запрос

[D-mon]

Сообщение от Аватар

adoquery1.SQL.Add('insert into Students values(100,''Колганов'',''Максим'',''Валерьевич'',''м'',17.11.1991,''П_408'',''111-222'',0,''12345''') ;

В конце не очень понял зачем вторая скобка. Насчет даты - зависит от СУБД, не знаете как - делайте параметрический запрос

А закрыть скобку для

values(

не надо по Вашему???

А вот насчёт даты соглашусь, что не сильно красиво написано.

[Аватар]

Сообщение от D-mon

не надо по Вашему???

Надо, проморгал, каюсь

[D-mon]

Для даты приблизительно так, для разных БД:
Для MS SQL

adoquery1.SQL.Add('insert into Students values(100,''Колганов'',''Максим'',''Валерьевич'',''м'',convert(datetime, ''23/10/2016'', 103),''П_408'',''111-222'',0,''12345'')') ;

Для Oracle

adoquery1.SQL.Add('insert into Students values(100,''Колганов'',''Максим'',''Валерьевич'',''м'',to_date(OP_DATETIME,''dd.mm.yyyy''),''П_408'',''111-222'',0,''12345'')') ;

Для Firebird

adoquery1.SQL.Add('insert into Students values(100,''Колганов'',''Максим'',''Валерьевич'',''м'',cast(''23/10/2016'' as DATE),''П_408'',''111-222'',0,''12345'')') ;

[lovetolaugh]

Спасибо - все работает.

Только возникла новая проблема: необходимо чтобы новая запись имела номер на 1 больше предыдущего. Я пытаюсь сделать это так:

    n := form1.ADOQuery1.RecordCount;
    form1.adoquery1.Close;
    form1.ADOQuery1.SQL.Clear;
    form1.ADOQuery1.SQL.Add('insert into Students values(n+1, ''Колганов'',
 ''Максим'', ''Валерьевич'', ''м'', convert(datetime, ''17.11.1991'',103),
 ''П_408'', ''111-222'', 0, ''230105'')');
    form1.ADOQuery1.ExecSQL;

Но возникает такая ошибка:



И если можно напишите как взять значение для поля БД из edit'а...

[Stilet]

form1.ADOQuery1.SQL.Add('insert into Students values('+IntToStr(n+1)...

Ферштейн?

[lovetolaugh]

Сообщение от Stilet

form1.ADOQuery1.SQL.Add('insert into Students values('+IntToStr(n+1)...

Ферштейн?

Ага. Спасибо.

Сообщение от Stilet

form1.ADOQuery1.SQL.Add('insert into Students values('+IntToStr(n+1)...

Ферштейн?

А не подскажешь как взять значение для нового поля из edit?

Будет что-то вроде:

form1.ADOQuery1.SQL.Add('insert into Students values(''+edit1.text+''...

(Правда данный вариант не работает)

[Stilet]

SQL.Add('insert into Students values('+QuotedStr(edit1.text)+'...

Опять таки в зависимости от типа поля - в данном случае предполагается строковое поле.