i have never seen this error before. Its a run time error. The source code below generates it. Please tell me how to fix it. Thanks in advance.
VB Code:
  1. Private Sub Command2_Click()

  2.  
  3. Adoproducts.Recordset.Fields("ProductID") = tbpid.Text

  4. Adoproducts.Recordset.Fields("ProductName") = tbpn.Text

  5. Adoproducts.Recordset.Fields("Date") = tbdate.Text

  6. Adoproducts.Recordset.Fields("US Rate") = tbrate.Text

  7. Adoproducts.Recordset.Fields("Scaled Weight") = tbweight.Text

  8. Adoproducts.Recordset.Fields("Yeild") = tbyeild.Text

  9. Adoproducts.Recordset.Fields("IngredientList") = txtlist.Text

  10. Adoproducts.Recordset.Fields("TOTAL") = txttotal.Text

  11.  
  12. End Sub