Форум: "Базы";
Текущий архив: 2002.05.09;
Скачать: [xml.tar.bz2];
Вниз
Почему не работает 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;
Скачать: [xml.tar.bz2];
Память: 0.44 MB
Время: 0.006 c
