database - MS Access で VBA 経由で添付ファイルを追加する

Question

私のフォームの1つは次のとおりです

これは、MS Access で作成されたフォームで、ユーザーが観察結果を追加できるようにします。観察には、示されているように添付ファイルが含まれる場合があります。添付ファイル コントロールをクリックして、表示されるポップアップに添付ファイルを追加できます。ただし、上記のフォームに示すように [追加] ボタンをクリックすると、この添付ファイルがテーブルの対応するフィールドに追加されることが予想されます。

このフォームのすべてのコントロールはバインドされていません。

ADD ボタンの背後に書かれたコードは次のとおりです。

Private Sub cmdAdd_Click()
    Dim db As DAO.Database
    Dim rs As DAO.Recordset

    Set db = CurrentDb
    Set rs = db.OpenRecordset("tblObservation", dbOpenDynaset)

    rs.AddNew

    rs![Artifact] = artifactId
    rs![Observation Text] = txtObservationText.Value

    'rs![Attachments] = ' not able to solve this

    rs.Update
    rs.Close

    Set rs = Nothing
    Set db = Nothing
End Sub