Basic PopUp Search Form

[ApexData]

I am in the process of eliminating too many ComboBoxes used for
searching. My MainForm will have a Button that will launch a PopUp
Search Form. This SearchForm is a continuous form that has 7-Fields
displayed, and the user can click on any field label to change the
order of the records. This all works.

How do I code to have the MainForm display the record that the user
clicked on in the Popup SearchForm. I am currently trying the approach
that follows, but maybe there is a better way ???

txtDmySearch ' Hidden text box on the mainform.

Private Sub cmdSearch_Click() '
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "FS-SEARCH"
DoCmd.OpenForm stDocName, , , stLinkCriteria, , acDialog
With Me.Recordset.Clone
.FindFirst "[SrvID] = " & Nz(Me.txtDmySearch)
If Not .NoMatch Then Me.Bookmark = .Bookmark
End With

Thanks Greg
End Sub

[engles]

On Mar 31, 8:58 pm, "[e-mail]" <[e-mail]:

I am in the process of eliminating too many ComboBoxes used for
searching. My MainForm will have a Button that will launch a PopUp
Search Form. This SearchForm is a continuous form that has 7-Fields
displayed, and the user can click on any field label to change the
order of the records. This all works.

How do I code to have the MainForm display the record that the user
clicked on in the Popup SearchForm. I am currently trying the approach
that follows, but maybe there is a better way ???

txtDmySearch ' Hidden text box on the mainform.

Private Sub cmdSearch_Click() '
Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "FS-SEARCH"
DoCmd.OpenForm stDocName, , , stLinkCriteria, , acDialog
With Me.Recordset.Clone
.FindFirst "[SrvID] = " & Nz(Me.txtDmySearch)
If Not .NoMatch Then Me.Bookmark = .Bookmark
End With

Thanks Greg
End Sub

So where do you use the information from the popup?

Here is one approach:
1) Don't close the popup, just hide it.
2) Then something like this:
dim f as form
set f=forms (stDocName)
3) then, use the control from the stDocName form in the .FindFirst.

Don't forget to close f using this approach.

-- Larry Engles