SB
Вот кусок инсерта
Size: a a a
2020 March 03
DB
ExecSQL скорее всего нужен для udpate/insert
N
пустой sql отправляю??
Нет. Просто insert умеет возвращать через returning заданные поля. В этом случае твой код норм отработает. Но надо смотреть синтаксис insert в твоей СУБД.
AF
Нет. Просто insert умеет возвращать через returning заданные поля. В этом случае твой код норм отработает. Но надо смотреть синтаксис insert в твоей СУБД.
а
SB
И на всякий случай, вредная функция =)
// get the ID of the last inserted row
function GetLastID(Query: TADOQuery): Integer;
begin
try
Query.SQL.Text := 'SELECT @@IDENTITY';
Query.Active := True;
Query.First;
Result := Query.Fields.Fields[0].AsInteger;
finally
Query.Active := False;
end;
end;
// get the ID of the last inserted row
function GetLastID(Query: TADOQuery): Integer;
begin
try
Query.SQL.Text := 'SELECT @@IDENTITY';
Query.Active := True;
Query.First;
Result := Query.Fields.Fields[0].AsInteger;
finally
Query.Active := False;
end;
end;
N
Если просто insert, то надо через ExecSQL выполнять. Если с returning, то можно через Open
N
При ExecSQL свойство RecordCount недоступно.
N
У тебя из-за этого падает.
AF
Если просто insert, то надо через ExecSQL выполнять. Если с returning, то можно через Open
в такой комбинации руагется что датасет закрыт
DB
на какой строке?
DB
попробуй включить debug dcu, возможно точнее покажет
AF
попробуй включить debug dcu, возможно точнее покажет
где включается?
DB
в xe6 тут (нижняя строка):
AF
)) любопытое окошко
AS
Покажи как именно ругается
DB
ну или отладку попробуй, может быстрее будет. увидишь где его там плющит
AS
А, так?