Скачать: CL | DM;

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

← →
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]

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

---

Страницы: 1 вся ветка

Скачать: CL | DM;



Память: 0.46 MB
Время: -0.974 c