Главная страница
Top.Mail.Ru    Яндекс.Метрика
Текущий архив: 2002.05.09;
Скачать: CL | DM;

Вниз

Почему не работает Insert?   Найти похожие ветки 

 
AFROLOV ©   (2002-04-16 17:21) [0]

При работе через ADO с Access возникает ошибка:

“Current Provider does not supporting returning multiple recordsets from single execution.”

function AddPatern(var ADOQuery:TADOQuery; pName:string):Cardinal;
var
tmp:Cardinal;
SQLStr:String;
begin
ADOQuery.Active:=false;

ADOQuery.SQL.Clear();
ADOQuery.SQL.Add("Select Count(*) as MyField from Paterns where Paterns.PaternName=""+pName+"";");
///////////////////////////////////////////////////////////////////////////////
ADOQuery.Active:=true;

tmp:=integer(ADOQuery.FieldValues["MyField"]);
if (tmp>0) then
begin
ADOQuery.SQL.Clear();
ADOQuery.SQL.Add("Select PaternId as MyField from Paterns where Paterns.PaternName=""+pName+"";");
tmp:=integer(ADOQuery.FieldValues["MyField"]);
end else
begin
ADOQuery.SQL.Clear();
SQLStr:="Insert into Paterns (PaternName) Values(""+pName+"");";
ADOQuery.SQL.Add(SQLStr);
ADOQuery.Active:=true;//Место где происходит ошибка
end;
//tmp:=ADOQuery.Fields[0].AsInteger;
result:=tmp;
end;

Заранее спасибо.


 
Kuusiniemi ©   (2002-04-16 17:43) [1]

ADOQuery.Active:=true;//Место где происходит ошибка

Сколько уже раз про это писали!!! НЕТ У ВАС КУРСОРА ПОСЛЕ ВЫПОЛНЕНИЯ КОМАНДЫ INSERT!!!! НЕТУ!! EXECSQL вызывайте!!!! Хелп читайте!!

:)) Сори за крик души.



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

Текущий архив: 2002.05.09;
Скачать: CL | DM;

Наверх




Память: 0.46 MB
Время: 0.013 c
14-26236
lipskiy
2002-03-14 13:50
2002.05.09
Правда ли то, что XP, если она нелецензионная, может грохнуть винт на физическом уровне?


1-26180
Ромик
2002-04-23 15:02
2002.05.09
Вызов метода дальнего предка


6-26212
RainMan
2002-02-20 07:17
2002.05.09
Локальный WEB site


14-26258
PVOzerski
2002-04-02 11:38
2002.05.09
Чем занят комп в


14-26264
ATLANTIDO
2002-04-02 16:04
2002.05.09
Autorun на сидюках