sqlconnection1: there is no active transaction
kodlarım aşağıdaki gibidir.
Kod: Tümünü seç
Trans.TransactionID := 1;
Trans.IsolationLevel := xilREPEATABLEREAD;
SQLQuery1.Close;
try
SQLConnection1.StartTransaction(Trans);
SQLQuery1.CommandText:=' INSERT INTO DigerBilgiler(kimlikno,ceptel,email) '+
'Values (:No, :Cep, :Mail)';
SQLQuery1.Params[0].AsString:=Edit1.Text;
SQLQuery1.Params[1].AsString:=Edit2.Text;
SQLQuery1.Params[2].AsString:=Edit3.Text;
SQLQuery1.ExecSQL;
SQLConnection1.Commit(Trans);
finally
SQLConnection1.Rollback(Trans);
showmessage('Kayit Olmadı');
end;