データベースのテーブルから特定の条件のレコードを追加するにはAddNewメソッドとUpdateメソッドを使用します。


レコードセット変数.AddNew

レコードセット変数!フィールド名=値

レコードセット変数.Update
					

AddNewメソッドを使用する場合、Openメソッドでレコードセットを作成する際に引数としてadLockOptimisticを指定して更新用にレコードセットを作成する必要があります。

以下の例では社員名簿テーブルよりOpenメソッドにより更新用にレコードセットを作成して、AddNewメソッドにより新規にレコードを作成しそのレコードに"武田太郎"を追加しUpdateメッソドにて更新、Closeメソッドで閉じています。


Sub Sample()

	Dim rs As New ADODB.Recordset
    
	rs.Open "社員名簿", CurrentProject.Connection,,adLockOptimistic
    
	rs.AddNew
        
	rs!氏名 ="武田太郎"
        
	rs.Update	
    
	rs.Close

End Sub