T
twas via AccessMonster.com
I've got a very simple form with a single combo box called cmbPickUser with
code:
Private Sub cmdOpenUserForm_Click()
On Error GoTo Err_cmdOpenUserForm_Click
Dim stLinkCriteria As String
stLinkCriteria = BuildCriteria("[cmbPickUser]", dbText, cmbPickUser)
DoCmd.OpenForm "frmUsers", , , stLinkCriteria
If (Me.chkCloseOn.Value) Then
DoCmd.Close acForm, "frmFindUser"
End If
Exit_cmdOpenUserForm_Click:
Exit Sub
Err_cmdOpenUserForm_Click:
MsgBox Err.Description
Resume Exit_cmdOpenUserForm_Click
End Sub
but when I run it, rather than getting the selected value from the combo box,
I'm getting a message box asking for cmbPickUser as a parameter. I'm
obviously making some trival syntax error, but I can't find it. I've tried
specifying cmbPickUser.Value and cmbPickUser.SelText - and get parameter
queries for those referencens. Help!
thanks
twas
code:
Private Sub cmdOpenUserForm_Click()
On Error GoTo Err_cmdOpenUserForm_Click
Dim stLinkCriteria As String
stLinkCriteria = BuildCriteria("[cmbPickUser]", dbText, cmbPickUser)
DoCmd.OpenForm "frmUsers", , , stLinkCriteria
If (Me.chkCloseOn.Value) Then
DoCmd.Close acForm, "frmFindUser"
End If
Exit_cmdOpenUserForm_Click:
Exit Sub
Err_cmdOpenUserForm_Click:
MsgBox Err.Description
Resume Exit_cmdOpenUserForm_Click
End Sub
but when I run it, rather than getting the selected value from the combo box,
I'm getting a message box asking for cmbPickUser as a parameter. I'm
obviously making some trival syntax error, but I can't find it. I've tried
specifying cmbPickUser.Value and cmbPickUser.SelText - and get parameter
queries for those referencens. Help!
thanks
twas