Combo Box "Can't Assign Value to This Object"

  • Thread starter Thread starter Pam
  • Start date Start date
P

Pam

Using the following code, can someone please tell me why I get the msg
"Can't Assign Value to This Object". It was working fine and we had a
glitch run thru the db's that are linked together and then I started getting
the above msg. Help is greatly appreciated as I spent quite a bit of time
with postings to get it to work in the first place. Thanks Pam

Private Sub Combo32_AfterUpdate()
Dim strFilter As String

strFilter = "JobNumber=" & Me.Combo32

Me.PumpType = DLookup("PumpType", "tGeneralInfo", strFilter)

If Me.PumpType = "NIKKISO/MANUFACTURING" Then
DoCmd.OpenForm "fGeneralInfoNikkiso", , , strFilter
Else
DoCmd.OpenForm "fGeneralInfo", , , strFilter
End If
 
Barry,
Thanks for replying. I came back in this morning and worked on it. I put a
hidden field "PumpType" on the form and it worked again. I don't understand
why. I didn't have it there before and it worked.
Thanks again for your help.
Pam
 
Back
Top