ADO_レコードのの追加
ADOではレコードを簡単に追加できます。フィールドを指定して処理をすることができるます。
書式
AddNewメソッドを利用します。AddNewメソッドを使用する場合、Openメソッドでレコードセットを作成する際に引数として adLockOptimisticを指定して更新用にレコードセットを作成する必要があります。
作成例
テーブル「T_名簿」に追加のレコード氏名「井上 史郎」、入会年月日「10/20/2024」を一件追加します。
Public Sub ADOTest()
Dim cn As New ADODB.Connection
Dim rs As New ADODB.Recordset
Set cn = CurrentProject.Connection
rs.Open "T_名簿", cn, adOpenKeyset, adLockOptimistic
rs.AddNew
rs!氏名 = "井上 史郎"
rs!入会年月日 = #10/20/2024# '書式 #月/日/西暦#
rs.Update
rs.Close: Set rs = Nothing
cn.Close: Set cn = Nothing
End Sub
（追加前）
（追加後）
最終行に追加されています。番号はオートナンバーです。
（この項終わり）