Enter Parameter Value???

So did deleting the control work out for you?
 
deleting the control just made it so I can no longer "go to" a specified record. I can still search for a record from the standard "search" box. from the messages I've been getting (error 2950) and others, it seems I may have started from a older version of Access and now it cannot update to my 2007 version. :banghead: - don't want to waste your time - or mine - but if you have any suggestions, I can stop beating my head against the wall! Thanks!
 
Do not delete the control.. The ComboBox acts like a simple search tool.. just change the RowSource to..
Code:
SELECT [ID], [Contact Name], [Company], [E-mail Address] FROM [Contacts Extended] ORDER BY [Contact Name];
Then in the ComboBox After Update event just paste the code as..
Code:
Private Sub [COLOR=Blue]yourComboBoxName[/COLOR]_AfterUpdate()
    If DCount("*","[Contacts Extended]","[ID]=" & Me.[COLOR=Blue]yourComboBoxName[/COLOR]) <> 0 Then
        ' Find the record that matches the control.
        Dim rs As DAO.RecordSet
        Set rs = Me.Recordset.Clone
        rs.FindFirst "[ID] = " & [COLOR=Blue]Me.yourComboBoxName[/COLOR]
        If Not rs.EOF Then Me.Bookmark = rs.Bookmark
    Else
        Call MsgBox("No such record exists.", vbCritical, "No match found")
    End If
End Sub
 
when i did that, i got the attached screen :confused:
 

Attachments

  • prt_scr.png
    prt_scr.png
    30.2 KB · Views: 93
You did not use an Equal sign before the Query on the RowSource property did you? If so delete the EQUALS sign and just copy and paste the SQL Query in Post #23..
 

Users who are viewing this thread

Back
Top Bottom