HASTER: AddNew i et DataGrid

Hvordan skal koden se ud når man skal indsætte i en datagrid der får sit indhold fra en tabel \"BEMÆRKNING\"?

Under hvilken hændelse skal koden ligges.

Jeg har prøvet med AfterInsert, BeforeInsert, OnAddNew

Jeg har forsøgt mig med følgende. Er det helt i skoven?

******************************************************

Private Sub dtgBemærkninger_OnAddNew()

    Dim strSQL As String
     
    Dim rs As ADODB.Recordset
   
    Set rs = New ADODB.Recordset
   
    rs.Open \"BEMÆRKNING\", strCnn, , adLockOptimistic
   
    strSQL = \"INSERT INTO BEMÆRKNING VALUES (\'\" & txtKundenr & \"\',\'\" & dtgBemærkninger.Columns(0).Value & \"\',\'\" & Date & \"\')\"
   
    Set rs = m_DBConnection.Execute(strSQL)
   
    rs.Close
   
End Sub

******************************************************