access ADODB でテーブルを更新しない場合

お世話になっております。
access VBAで作成しております。


以下の分でテーブルにデータを追加しています。
''''''''''''''''''''''''
sub テスト（）
Dim cn As ADODB.Connection
Dim rs As New ADODB.Recordset

Set cn = CurrentProject.Connection
rs.Open "SELECT * FROM テーブル", cn, adOpenDynamic, adLockPessimistic

rs.AddNew ' レコード追加

rs("NAME").Value = "山田"
rs.Update ' レコードの変更を確定
rs.Close
end sub
''''''''''''''''''''''''

テーブルを更新したくない場合は、以下でよいのでしょうか。
※Update、Closeを無くせばいいのでしょうか。それともCancelなどの
関数はあるのでしょうか。

''''''''''''''''''''''''
sub テスト（）
Dim cn As ADODB.Connection
Dim rs As New ADODB.Recordset

Set cn = CurrentProject.Connection
rs.Open "SELECT * FROM テーブル", cn, adOpenDynamic, adLockPessimistic

rs.AddNew ' レコード追加

rs("NAME").Value = "山田"
end sub
''''''''''''''''''''''''



何卒よろしくお願い申し上げます。

No.1 ベストアンサー 回答者： くんこば 回答日時： 2021/08/18 13:57

トランザクション処理を利用してください。

https://t-yumi.jp/gengo/access/20160203005949675 …

失敗した場合はロールバックを。

No.2 回答者： bonaron 回答日時： 2021/08/19 01:54

こちら。

CancelUpdate メソッド (ADO)
https://docs.microsoft.com/ja-jp/office/client-d …