I get this error:

Run Time Error '-21472117887 (80040e21)':
Mutliple-step operation generated errors: check each status value

And this is my code, what is wrong?? when i debug it highlights the phone line

VB Code:
  1. Private Sub WriteDataFromControls()
  2. rsRecordSet("firstname").Value = txtFirstName.Text
  3. rsRecordSet.Fields("lastname").Value = txtLastName.Text
  4. rsRecordSet!phone = txtPhone.Text
  5. End Sub