I'm having trouble writing the code in the commandbutton to copy the data from the form to the desired forms. None of the textboxes or combo boxes are bounded because I need to to change information on various forms. The combo boxes take information from a table. When I click the commandbutton, there is no error message, but the information isn't added to the "Takeout_History" table. In fact, nothing happens. This is my code so far:
Code:
Private Sub Command17_Click()
Dim rstTakeout_History As DAO.Recordset
Set rstTakeout_History = CurrentDb.OpenRecordset("Takeout_History")
With rstTakeout_History
.AddNew
!Date.Value = Text18
!Name_Worker = Text7
!Name_Product = Combo0
!Name_Model = Combo2
!Amount = Text15
!Unit = Text12
.Update
End With
End Sub
Update: Turns out it works, but the results don't show up in the table until I close it and reopen it. Is there anyway I can have it show up immediately after I click? I think the .update did that for me.