need format for using stlinkcriteria using 4 keys

[punky]

I took the next example off this site but is does not work.
Can someone tell me how to string 4 keys together to make the stlinkcriteria work. I do not know what double quotes go with what single quotes and so on.

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "Second Form"

stLinkCriteria = "[FirstName]=" & "'" & Me![FirstName] & "' AND [LastName] = '" & Me![LastName] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria

DoCmd.Close acForm, "First Form"
----------------------------------------

 

[ToeShot]

The code looks ok. What happens when you try it? Dave
ToeShot@Hotmail.com
Today Is Tomorrows Yesterday. So Why Wait

 

[punky]

HI ToeShot,
I finally got the stlinkcriteria to work for two criteria, but I do not know how to extend it to four criteria. The following works great, but I am still not sure about the groupings between the double and single quotes. Obviously, if I take enough time I will figure it out, but I have run short on patience with it.

Dim stDocName As String
Dim stLinkCriteria As String

iID = [Forms]![frm_1EqipPg2]![EQ1ID]
aArea = [Forms]![frm_1EqipPg2]![EQ1AREA]
dDept = [Forms]![frm_1EqipPg2]![EQ1Dept]
tTruck = [Forms]![frm_1EqipPg2]![EQ1TruckID]

'next statement will find record or create one if
' it does not exist.
stLinkCriteria = "[NYSPGenDept]=" & "'" & Me![EQ1Dept] & "' AND [NYSEQ1TruckID] = '" & Me![EQ1TruckID] & "'"

stDocName = "frm_NYSPortGens"
DoCmd.OpenForm stDocName, , , stLinkCriteria