Не работает INSERT

← →
Anics (2002-11-21 08:50) [0]

Программа такая
var
C: integer;

C := Query1.FieldByname("Chislo").AsInteger;
Query2.SQL.Add("INSERT INTO tablica (Kod)");
Query2.SQL.Add("VALUES (:P1)");
Query2.SQL.ParamByName("P1").AsInteger := C;
Query2.ExecSQL

В результате ошибка Type mismath in expression
Помогите разобраться в чем дело

← →
sask (2002-11-21 08:56) [1]

Посмотри, для начала, что содержится в поле "Chislo"
(Query1.FieldByname("Chislo").AsString)

← →
BoxTer (2002-11-21 09:25) [2]

и вааще, как ты пытаешься запустить квери без параметра???
.... передачу параметра попробуй сделать до набивки скуля...

← →
VAleksey (2002-11-21 09:39) [3]

> BoxTer © (21.11.02 09:25)

чего - чего ??? ерунда.
приведи структуру таблицы пжлст.

← →
Valeron (2002-11-21 09:55) [4]

Скажи зачем ты создаешь параметр, если можешь вписать в SQL свое значение?
Типа токого:
...
Query2.SQL.Add("VALUES ("" "+StrToInt(C)+" "" )");
...
А если с параметром так можно(нужно) и не динамически, в при проектировке проги. А протестировать лучше всего в SQL Monitor. Я всегда тестирую там, только потом переношу в программу.

← →
Valeron (2002-11-21 10:00) [5]

обшибся, извините :)
написал так
Query2.SQL.Add("VALUES ("" "+StrToInt(C)+" "" )");
а нужно не StrToInt(C) , а IntToStr(C)
Сорри...

← →
kostya (2002-11-21 13:51) [6]

> Query2.SQL.ParamByName("P1").AsInteger := C;

Замени на
Query2.SQL.ParamByName("P1").AsInteger := IntToStr(C);

← →
kostya (2002-11-21 13:52) [7]

> Query2.SQL.ParamByName("P1").AsInteger := C;

Замени на
Query2.SQL.ParamByName("P1").Text:= IntToStr(C);

← →
kostya (2002-11-21 13:52) [8]

> Query2.SQL.ParamByName("P1").AsInteger := C;

Замени на
Query2.ParamByName("P1").Text:= IntToStr(C);

← →
kostya (2002-11-21 13:54) [9]

Извини, за маленький глюк ! Последнее ВЕРНО !!! У меня работает!

Не работает INSERT Найти похожие ветки