Find Record using three Criteria

[kufre]

How can I use three criteria to find a record? I've done this before
where I only use one criteria to find a record and set the focus to
that criteria only.
Thanks in advance.

[MGFoster]

kufre wrote:

How can I use three criteria to find a record? I've done this before
where I only use one criteria to find a record and set the focus to
that criteria only.

How are you searching? Using the Find function (Ctrl-F)? Using the
Filter option (right-click menu on forms/datasheets)? In a query?
Using the recordset .Find?

......? More info please.

--
MGFoster:::mgf00 <at> earthlink <decimal-point> net
Oakland, CA (USA)

[Larry Linson]

"kufre" wrote

How can I use three criteria to
find a record? I've done this before
where I only use one criteria to find
a record and set the focus to
that criteria only.

In what context? You can certainly use multiple criteria in a Query, but
there are some limitations in the D... functions. However, you can base a
DLookup, say, on a Query that has criteria of its own to circumvent the
limitations. The manual Find and Filter operations may be more
problematical.

Larry Linson
Microsoft Access MVP

[kufre]

I have a Find command button on my form that I would like to use to
perform my search.

[MGFoster]

kufre wrote:

I have a Find command button on my form that I would like to use to
perform my search.

-----BEGIN PGP SIGNED MESSAGE-----
Hash: SHA1

Usually, you can do something like this:

Private Sub cmdFind_Click()

Dim strCriteria As String
Dim rs As DAO.Recordset

' Set the criteria to values in different TextBoxes.
strCriteria = "col1 = " & Me!txtANumber
strCriteria = strCriteria & " AND col2 = '" & Me!txtAString & "'"
strCriteria = strCriteria & " AND col3 = #" & Me!txtADate & "#"

' Get the same Recordset as the form
Set rs = Me.RecordsetClone

' Try to find the data w/ the criteria
rs.FindFirst strCriteria

If Not rs.NoMatch Then
' Do something w/ the found data
MsgBox "Found"
Else
MsgBox "Not Found"
End If

' Clean up & exit
Set rs = Nothing

End Sub

--
MGFoster:::mgf00 <at> earthlink <decimal-point> net
Oakland, CA (USA)

-----BEGIN PGP SIGNATURE-----
Version: PGP for Personal Privacy 5.0
Charset: noconv

iQA/AwUBQji294echKqOuFEgEQKDXwCfaeAHk1C/NyqM+fkfwim/EDglcqAAnicz
LNoKy8EPJD31+LQ41Oc5xmg9
=TnnT
-----END PGP SIGNATURE-----