Top.Mail.Ru
Мастера DELPHI, Delphi programming community Титульная страница Поиск, карта сайта Написать письмо 
| Новости | Поиск | FAQ | Статьи | Книги | Новости VCL |
| Форумы ЧАТ | Орешник | KOL и MCK |
Форумы -» Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

ошибка INSERT INTO [D7, .mdb]


helluvaname ©   (2010-01-07 02:35:00) 

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

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;


Anatoly Podgoretsky   (2010-01-07 13:06:00) [1]

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

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


12   (2010-01-07 10:49:00) [2]

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

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


helluvaname   (2010-01-07 10:19:00) [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;


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


12   (2010-01-07 09:22:00) [4]

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

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


Германн   (2010-01-07 02:57:00) [5]

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


> helluvaname   (07.01.10 02:35)  


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

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

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


Наверх

Титульная страница Поиск, карта сайта Написать письмо