Mackbear
Registered User.
- Local time
- Today, 17:35
- Joined
- Apr 2, 2019
- Messages
- 168
Hello everyone, hope you can help. I've been staring at this code for hours and I an unable to figure out what is wrong. It is saying Too Few Parameters Expected 2... :banghead::banghead::banghead: I checked the controls they all have values. I have another one like this on another form and it works. I made sure as well that this is exactly how it written as the other on that works.. :banghead::banghead::banghead:
Dim sqlstrapdec As String
sqlstrapdec = "UPDATE tbl_LFReview SET tbl_LFReview.[LFCreditedAmount]='" & Me.LFCreditedAmount & "', tbl_LFReview.[LFCreditedDate]='" & Me.lfcreditdate & "', tbl_LFReview.[LFReviewNotes]='" & Me.LFReviewNotes & "', tbl_LFReview.[LFCreditStatus]='" & Me.LFCreditStatus & "', tbl_LFReview.[LFReviewedby]='" & Me.ReqbyAP & "', tbl_LFReview.[LFReviewedName]='" & Me.apfullname & "', tbl_LFReview.[LFReviewedDate]='" & Me.ReqDate & "', tbl_LFReview.[LFReviewedDateTime]='" & Me.ReqDateTime & "', tbl_LFReview.[LFReviewedWeek]='" & Me.ReqWeek & "', tbl_LFReview.[LFReviewedMonth]='" & Me.ReqMonth & "', tbl_LFReview.[LFReviewStatus]='" & Me.stat & "' WHERE tbl_LFReview.[entryid_lfreview] IN (" & Replace(SelectedList, "|", ",") & ")"
Debug.Print sqlstrapdec
CurrentDb.Execute sqlstrapdec
Dim sqlstrapdec As String
sqlstrapdec = "UPDATE tbl_LFReview SET tbl_LFReview.[LFCreditedAmount]='" & Me.LFCreditedAmount & "', tbl_LFReview.[LFCreditedDate]='" & Me.lfcreditdate & "', tbl_LFReview.[LFReviewNotes]='" & Me.LFReviewNotes & "', tbl_LFReview.[LFCreditStatus]='" & Me.LFCreditStatus & "', tbl_LFReview.[LFReviewedby]='" & Me.ReqbyAP & "', tbl_LFReview.[LFReviewedName]='" & Me.apfullname & "', tbl_LFReview.[LFReviewedDate]='" & Me.ReqDate & "', tbl_LFReview.[LFReviewedDateTime]='" & Me.ReqDateTime & "', tbl_LFReview.[LFReviewedWeek]='" & Me.ReqWeek & "', tbl_LFReview.[LFReviewedMonth]='" & Me.ReqMonth & "', tbl_LFReview.[LFReviewStatus]='" & Me.stat & "' WHERE tbl_LFReview.[entryid_lfreview] IN (" & Replace(SelectedList, "|", ",") & ")"
Debug.Print sqlstrapdec
CurrentDb.Execute sqlstrapdec