新しい行をテーブルに挿入してから SerialNo を取得し、SerialNo を使用して ReferenceNo 列を更新し、データベースを再度更新するコードがあります。
ただし、2回目の更新で次のエラーが表示されます: 更新する行が見つかりません。最後に読み取られてから一部の値が変更されている可能性があります。
コードは次のようになります
DataEnvironment1.rsAddNewMsg.Open
With DataEnvironment1.rsAddNewMsg
.Field1 ="mpla"
.Field2 ="mpla"
....
.Update
.ReferenceNo = "Mpla" + SerialNo
.Update
DataEnvironment1.rsAddNewMsg.Close
2 回目の更新でエラーが発生します。