Проблемма вставки данных

← →
Kenzoo (2004-09-08 14:24) [0]

if edit1.text<>"" then
begin
sql.add(" insert into ""+Путь+""(Da) values (:Data) ");
Params[0].asdate:=strtodate(edit1.text);
end
else
begin
sql.add(" insert into ""+Путь+""(Da) values (:Data) ");
Params[0].Clear;
end;
Если в Edit1 есть дата - вставляет, если нет
то пишет
"Field "Data" is of an unknown type".
Почему так?

← →
MU © (2004-09-08 14:32) [1]

However, if the Clear method is used to bind the parameter to a NULL value, Bound must be separately set to True.

← →
Kenzoo (2004-09-08 14:40) [2]

sql.add(" insert into ""+d+""(Da) values (:par) ");
Params[0].Clear;
Params[0].Bound:=true;

то же самое получаю.

← →
Kenzoo (2004-09-08 15:08) [3]

Блин, только на этом застопорился:(

← →
LM2 (2004-09-08 15:13) [4]

Напиши так
if edit1.text<>"" then
begin
sql.add(" insert into ""+Путь+""(Da) values (:Data) ");
Params[0].asdate:=strtodate(edit1.text);
end
else
begin
sql.add(" insert into ""+Путь+""(Da) values (null) ");
end;

← →
Kenzoo (2004-09-08 15:16) [5]

В том дело, что пример упрощён.
Там несколько полей (Edit"ов) с датой
Поэтому и использую параметры.

← →
LM2 (2004-09-08 15:40) [6]

А что мешает так сделать?
sql.add(" insert into ""+Путь+""(Da1, Da2, Da3) values (");
if edit1.text<>"" then
begin
sql.add(":Da1,");
ParamByName("Da1").asdate:=strtodate(edit1.text);
end
else
sql.add("null,");

if edit2.text<>"" then
begin
sql.add(":Da2,");
ParamByName("Da2").asdate:=strtodate(edit2.text);
end
else
sql.add("null,");

if edit3.text<>"" then
begin
sql.add(":Da3)");
ParamByName("Da3").asdate:=strtodate(edit3.text);
end
else
sql.add("null)");

← →
Kenzoo (2004-09-08 16:05) [7]

Спасибо. Заработало:)

Проблемма вставки данных Найти похожие ветки