Удаление строки в ADOQuery через SQL

← →
koha © (2006-12-12 13:25) [0]

Удаление строки в ADOQuery через SQL - запрос
Цель удаление нескольких записей в соподченённой связаной таблице

DELETE FROM MainTabl
WHERE LinkToName=Fkey

- Запрос возвращает несколько записей, но удалять отказывается происходит ошибка: Типа провайдер не поддерживает режим удаления для нескольких записей.

Как это можно преодолеть?

← →
Megabyte © (2006-12-12 13:27) [1]

Сменить провайдера? :)
А вообще модно указывать СУБД и Провайдера.

← →
koha © (2006-12-12 13:28) [2]

> Megabyte © (12.12.06 13:27) [1]
- Провайдеров несколько кто подойдет?

← →
Megabyte © (2006-12-12 15:33) [3]

Т.е. СУБД указать религия не позволяет?

← →
koha © (2006-12-14 15:44) [4]

> Megabyte © (12.12.06 15:33) [3]
> Т.е. СУБД указать религия не позволяет?

- А первая строка не о чем не говорит:
Удаление строки в ADOQuery через SQL - запрос

← →
koha © (2006-12-14 15:52) [5]

> Т.е. СУБД указать религия не позволяет?

Вот ConectionStrinng:
Provider=Microsoft.Jet.OLEDB.4.0;Provider=Microsoft.Jet.OLEDB.4.0;Data Source=GarageCool.mdb;Persist Security Info=False

← →
Sergey13 © (2006-12-14 15:55) [6]

> DELETE FROM MainTabl
> WHERE LinkToName=Fkey
>
> - Запрос возвращает несколько записей

Вот этот запрос возвращает несколько записей?!!!
Че то ты делаешь не так.

← →
koha © (2006-12-14 16:02) [7]

> Вот этот запрос возвращает несколько записей?!!!

- вот на счет этого не буду утверждать, что он что то вернул, но должен был найти все записи равные условию WHERE LinkToName=Fkey и удалить их.

← →
Sergey13 © (2006-12-14 16:05) [8]

> [7] koha © (14.12.06 16:02)

Ты можешь сколько угодно утверждать что-то или сомневаться, но пока не видно кода нам остается только гадать.

← →
koha © (2006-12-14 16:07) [9]

А, да, забыл, в запросе ковычки там всякие опустил.

← →
Max Zyuzin © (2006-12-14 16:12) [10]

>koha © (14.12.06 16:07) [9]
Случаем возвращаемые записи не "Invalid use of keyword...." :)

Вот код такой был:

procedure TForm1.BitBtn1Click(Sender: TObject); Var fKey: string; begin fKey:=ADOTable5.FieldByName("Key").AsString; with ADOQuery1 do begin Close; SQL.Clear; SQL.Add("DELETE FROM MonthTlb"); SQL.Add("WHERE LinkToName="+Fkey); Open; end; end;

> Open;

Execute, ExecSQL или как там у АДО.

>koha © (14.12.06 16:15) [11]
Ох... от куда примеры брал?

ADOQuery1.Close; ADOQuery1.SQL.Clear; ADOQuery1.SQL.Text := "DELETE FROM MonthTlb WHERE LinkToName= :pLinkToName"; ADOQuery1.Parameters.ParamByName("pLinkToName").value := ADOTable5.FieldByName("Key").value; ADOQuery1.ExecSQL;

Когда же хелп то читать будут? К тому же не пользуйся вообще ADOQuery. Пользоваться только ADODataSet.

> Пользоваться только ADODataSet.
в этом случае ADOCommand.
в ADO вообще очень четкое разграничение на команды возвращающие данные (ADODataSet), и не возвращающие(ADOCommand). борланд же своими "микс" компонентами а.ля.BDE только все путает. (и путает именно тех ради кого вроде бы они и делались, типа облегчить переход/сделать одинаково)

если бы выбрал изначально правильно ADOCommand, то ситуация данного топика была бы попросту невозможной.

> (и путает именно тех ради кого вроде бы они и делались,
> типа облегчить переход/сделать одинаково)

Можно подумать, в БДЕ с TQuery Open для такого запроса прошел бы без ошибки :)

> в ADO вообще очень четкое разграничение на команды возвращающие
> данные (ADODataSet), и не возвращающие(ADOCommand). борланд
> же своими

ADOCommand и ADODataSet - это не какое-то там ADO, а ADO от борланд.
Причем ADOCommand.Execute не метод, а функция, возвращающая, как ни странно _Recordset:
function Execute: _Recordset; overload;

А на примере TADOConnrction это ещё нагляднее видно:

procedure TADOConnection.Execute(const CommandText: WideString; var RecordsAffected: Integer; const ExecuteOptions: TExecuteOptions = [eoExecuteNoRecords]); var VarRecsAffected: OleVariant; begin CheckActive; ConnectionObject.Execute(CommandText, VarRecsAffected, adCmdText+ExecuteOptionsToOrd(ExecuteOptions)); RecordsAffected := VarRecsAffected; end; function TADOConnection.Execute(const CommandText: WideString; const CommandType: TCommandType = cmdText; const ExecuteOptions: TExecuteOptions = []): _Recordset; var VarRecsAffected: OleVariant; begin CheckActive; Result := ConnectionObject.Execute(CommandText, VarRecsAffected, Integer(CommandTypeValues[CommandType])+ExecuteOptionsToOrd(ExecuteOptions)); end;

А само ADO никаких различий не делает, к.к. один и тот же ConnectionObject исполняет запросы и возвращающие НД и не возвращающие

Удаление строки в ADOQuery через SQL - Немогу удалить Найти похожие ветки