D-SQL

← →
icu (2002-05-10 18:47) [0]

Как добавить новую запись в таблицу MS SQL Server?

CommandText := "insert into Common_Agreement_Form" +
"(" +
"@datereg, @dateagr, @numb, @dateexe, @agent, @executor, @somedate, @somenote" +
")";
Prepared := True;
Parameters.Items[0].Value := dxdeDateReg.Date;
Parameters.Items[1].Value := dxdeDateAgr.Date;
Parameters.Items[2].Value := dxeNumber.Text;
Parameters.Items[3].Value := dxdeDateExe.Date;
Parameters.Items[4].Value := dxMemData1agent_id.Value;
Parameters.Items[5].Value := dxMemData1executor_id.Value;
Parameters.Items[6].Value := dxdeSomeDate.Date;
Parameters.Items[7].Value := dxSomeNote.Text;
Execute;

Это не катит почему-то...

← →
wicked © (2002-05-10 19:51) [1]

> CommandText := "insert into Common_Agreement_Form" +
> "(" +
> "@datereg, @dateagr, @numb, @dateexe,
> @agent, @executor, @somedate, @somenote" +
> ")";

вместо переменных (например, @agent) пиши так - ":agent", т. е. запрос будет выглядеть таким образом:
CommandText := "insert into Common_Agreement_Form" +
"(" +
":datereg, :dateagr, :numb, :dateexe, :agent, :executor, :somedate, :somenote" +
")"

или так
CommandText := "insert into Common_Agreement_Form" +
"(" +
"?, ?, ?, ?, ?, ?, ?, ?" +
")"
я предпочитаю второй способ, но при нём надо обращаться к параметрам по номеру, начиная с 0...

← →
wicked © (2002-05-10 19:54) [2]

млин, не глянул на синтаксис инсерта...
он такой:
insert < таблица> ( список полей) values ( список значений)

т. о., у тебя
CommandText := "insert into Common_Agreement_Form" +
"(datereg, dateagr, numb, dateexe, agent, executor, somedate, somenote)" +
"values (:datereg, :dateagr, :numb, :dateexe, :agent, :executor, :somedate, :somenote)"

Спасибо.

D-SQL Найти похожие ветки