insert문을 실행하면 다음과 같은 에러가 발생합니다.
commit에 원인이 있는것 같은데 어떻게 해야 되나요?
'No user transaction is currently in progress'
간략하에 코드를 보면
try with Query1 do
begin
Close;
SQL.Clear;
SQL.text := statement;
ExecSQL;
end;
except
showmessage('sql error');
end;
sql_dm.Database1.commit;
감사합니다.
> insert문을 실행하면 다음과 같은 에러가 발생합니다.
>
> commit에 원인이 있는것 같은데 어떻게 해야 되나요?
>
> 'No user transaction is currently in progress'
>
> 간략하에 코드를 보면
>
> try with Query1 do
> begin
> Close;
> SQL.Clear;
> SQL.text := statement;
> ExecSQL;
> end;
> except
> showmessage('sql error');
> end;
>
> sql_dm.Database1.commit;
>
>
> 감사합니다.
데이타베이스comp명.StartTransaction;
try with Query1 do
begin
Close;
SQL.Clear;
SQL.text := statement;
ExecSQL;
end;
except
showmessage('sql error');
데이타베이스comp명.Rollback;
end;
데이타베이스comp명.Commit;
이렇게 하면은요.....