OpenForm asks for parameter value (1 Viewer)

[alexandria]

I'm using the WhereCondition of OpenForm to filter to the correct form. I need to use the values in 2 form controls plus the value of a DCount I perform shortly before the OpenForm. My code sort of works-instead of picking up the DCount's value, I get a popup asking for the parameter value (once entered the correct form opens). Can anyone see a problem in my coding?

Private Sub usOK_btn_Click()
DoCmd.SetWarnings (False)
Dim UpdateCount As Integer
UpdateCount = DCount("*", "qUpdate_RecordCount")
If UpdateCount >= 1 Then
DoCmd.RunSQL "UPDATE ProjectUpdates SET UpdateNumber = " & UpdateCount & " WHERE '" & Forms!Update_SelectName!usResearcher & "' AND '" & Forms!Update_SelectName!usProjectName & "' AND [ProjectUpdates.UpdateNumber] = 0;"
End If
DoCmd.SetWarnings (True)

DoCmd.OpenForm "Update_EnterProject", , , "[ProjectUpdates.Researcher]= '" & Forms!Update_SelectName!usResearcher & "' AND [ProjectUpdates.ProjectName]= '" & Forms!Update_SelectName!usProjectName & "' AND [ProjectUpdates.UpdateNumber] = UpdateCount"
DoCmd.Close acForm, "Update_SelectName"
End Sub

 

[boblarson]

Yep, I sure do spot the problem (the part in blue):

DoCmd.OpenForm "Update_EnterProject", , , [COLOR=red]"[ProjectUpdates.Researcher]= '" & Forms!Update_SelectName!usResearcher & "' AND [ProjectUpdates.ProjectName]= '" & Forms!Update_SelectName!usProjectName & "' AND [ProjectUpdates.UpdateNumber] = [B][COLOR=blue]UpdateCount"[/COLOR][/B][/COLOR]

It should be:

DoCmd.OpenForm "Update_EnterProject", , , [COLOR=red]"[ProjectUpdates.Researcher]= '" & Forms!Update_SelectName!usResearcher & "' AND [ProjectUpdates.ProjectName]= '" & Forms!Update_SelectName!usProjectName & "' AND [ProjectUpdates.UpdateNumber] = [COLOR=blue][B]" & UpdateCount[/B][/COLOR][/COLOR]

 

[alexandria]

That worked! Thanks, Bob.