Есть следующий код:

Private Sub Command1_Click()
Adodc1.ConnectionString = "Provider=Microsoft.Jet.OLEDB.4.0;Data Source=C:\base\pc2.mdb;Persist Security Info=False"
Adodc1.CommandType = adCmdText

str1 = "insert into customer (id_cust,name,address,phone,id_model) values(" + Text5.Text + ",'" + Text1.Text + "','" + Text2.Text + "','" + Text3.Text + "'," + Text4.Text + ")"

Adodc1.RecordSource = str1
Adodc1.Refresh
End Sub

В итоге при нажатии на кнопку появляется ошибка вида:
' runtime error 3704
' "Операция не допускается, если объект закрыт"

Но запись в базу данных всё же добавляется.
Подскажите, в чем ошибка.