Insert statement wont work

[todmac]

Hello,
Can anyone tell me what is wrong with this simple code?
it keeps coming back "Method or data member not found" and highlights me.datedone, I dont understand.

 Private Sub Submit_Click()
Dim strsql As String
strsql = "Insert into MAIN (unitnumber, DateDone,kilometers, Item, WheelPosition, measurement) Values ('" & Me.Unit & "','" & Me.DateDone & "', '" & Me.kilometers & "','" & Me.item & "','" & Me.Wheelposition & "', '" & Me.measurement & "')"
Debug.Print strsql
Dim db As dao.Database
CurrentDb.Execute (strsql)
End Sub

[June7]

Is this actually solved? Want to share the solution?