Добавить запись в таблицу по нажатию кнопки кнопки

Пятница, 23 Декабря 2016 г. 08:12 + в цитатник

На кнопку "повешал" обработчик

Private Sub bttnOK_Click()
    Dim rstCurr As DAO.Recordset
    Dim dbsCurr As Database
    
    Set dbsCurr = Access.CurrentDb
    Set rstCurr = dbsCurr.OpenRecordset("tblSecond", dbOpenDynaset)
    
    rstCurr.AddNew
    rstCurr.Fields("record1_text").Value = fldRecord.Text
    rstCurr.Update
End Sub

Но так и не хочет добавлять запись в таблицу, говорит что ошибка 2185 в строке
rstCurr.Fields("record1_text").Value = fldRecord.Text

В чем проблема? (Форма для добавления записи frmAddRecords)

http://www.sql.ru/forum/1243780/dobavit-zapis-v-tablicu-po-nazhatiu-knopki-knopki