Cant assign to read-only property

[reysy28]

Hello guy,

Am having this error, the source field of this is a query....

Private Sub Command6_Click()
Dim m_ans As String
Dim cn As ADODB.Connection

Set cn = CurrentProject.Connection

m_ans = Ans1
cn.Edit
cn!Answer = m_ans <==== this is the error
cn.Update

DoCmd.GoToRecord , , acNext

End Sub

Whats seems to be the problem?

 

[pr2-eugin]

What is that you are trying to do here?

 

[reysy28]

What is that you are trying to do here?

Hi,

Answer is a field and Ans1 is also a field of the same table, am trying to copy the content of Ans1 to Answer.