ошибка INSERT INTO

← →
helluvaname (2010-01-07 02:35) [0]

Всем привет!
Никак не могу справиться с ошибкой при выполнении

ADOQuery1.SQL.Add(" INSERT INTO Table1 (Field1) "); ADOQuery1.SQL.Add(" VALUES ("+Edit1.Text+")");

если в поле Edit1 ввожу число то выдает:

Текущий проводник не поддерживает возврат нескольких наборов записей в результате одной операции

если ввожу string то выдает:

Параметр xxx не имеет значения по умолчанию

вот полный код:

procedure TForm1.Button3Click(Sender: TObject); begin ADOQuery1.close; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add(" INSERT INTO Table1 (Field1) "); ADOQuery1.SQL.Add(" VALUES ("+Edit1.Text+")"); ADOQuery1.Open; BookName.Refresh; DBGrid1.Repaint; //MsgBox(Edit1.Text); end;

← →
Германн © (2010-01-07 02:57) [1]

Блин, модераторы!
:)
Уже написал ответ!
Еще раз писать что-ли? :)

> helluvaname (07.01.10 02:35)

> Текущий проводник не поддерживает возврат нескольких наборов
> записей в результате одной операции

Приведи оригинальный ответ на аглицком. (Просто интересно).

И какой учебник учил тебя применять метод Open при модификации данных БД?

← →
12 © (2010-01-07 09:22) [2]

use parametrs
ex:
{
qQ.sql.text =
Select
a
From d
Where
d.UreDate = :PD
}

qQ.Parameters.ParamByName("PD").Value:=s;
qQ.Active:=true;

← →
helluvaname (2010-01-07 10:19) [3]

2 Герман, интернет - вот мой учебник)

Спасибо всем, вот рабочий код:

procedure TForm1.Button3Click(Sender: TObject); begin ADOQuery1.close; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Add("INSERT INTO Table1 (Field1) VALUES (:pfield1)"); ADOQuery1.Parameters.ParamByName("pfield1").Value := Edit1.Text; ADOQuery1.ExecSQL; end;

Извините, что не в той ветке создал.

>> Германн ©
поставь Punto Switcher & разреши вести в нем дневник
(я так к нему привык - что при переходе на новую машину обязательно ставлю первым делом)

>> helluvaname
ADOCommand еще лучше использовать

> helluvaname (07.01.2010 02:35:00) [0]

У тебя есть вопрос по Дельфи?

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