procedure Insert - Помощь студентам

keen86nv · 01.04.2010, 15:48

Код:

procedure Insert(Table,Values:string);
begin
dm.ADOConnection1.ConnectionString:='Provider ...';
dm.ADOConnection1.Connected:=false;
dm.ADOCommand1.CommandText:='INSERT INTO ('+Table+') (tip,device,t_har,i_num) values ('+Values+')';
dm.ADOCommand1.Execute;
dm.ADOCommand1.CommandText:='';
dm.ADOConnection1.Connected:=true;
end;

procedure TForm2.Button1Click(Sender: TObject);
   var e:string;
begin
e:=edit1.text+','+edit2.text+','+edit3.text+','+edit4.text  ;
Insert ('tab_device', 'e');
end;

призапуск выдает ошибку Incorrect syntax near '("
Подскажите пожалуйсто в чем может быть проблема

Stilet · 01.04.2010, 16:35

Код:

'INSERT INTO '+Table+'...

Скобки не нужны.

keen86nv · 01.04.2010, 17:37

еще 1 вопрос
ADOCommand1 лучше к базе подключать или через ADOConnection1, если через ADOConnection1 подключаю, то ошибка "операция не допускаеться если объек открыт"

01.04.2010, 16:35	#2
Stilet Белик Виталий :) Старожил Регистрация: 23.07.2007 Сообщений: 57,097	Код: `'INSERT INTO '+Table+'...` Скобки не нужны. I'm learning to live...

Опции темы	Поиск в этой теме
Версия для печати Отправить по электронной почте	Поиск в этой теме: Расширенный поиск

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Procedure SQL	Neymexa	SQL, базы данных	7	23.03.2010 09:29
procedure Delete	REztor	Помощь студентам	6	10.03.2009 21:47
Procedure unknown	yulia	БД в Delphi	9	26.01.2009 01:33
procedure! please! help!	NeAlSe	Помощь студентам	2	15.06.2008 15:38
function procedure	Toxa	Microsoft Office Access	1	28.11.2007 18:32

01.04.2010, 17:37	#3
keen86nv Новичок Джуниор Регистрация: 30.03.2010 Сообщений: 2	еще 1 вопрос ADOCommand1 лучше к базе подключать или через ADOConnection1, если через ADOConnection1 подключаю, то ошибка "операция не допускаеться если объек открыт"