sub form not linking

[Mary10k]

I have an Access form with a button on it that opens a sub form. I cannot get the sub form to open linking to the record id on the first form. Any suggestions?

Here is the code I use to open the sub form:
Private Sub Command178_Click()
On Error GoTo Err_Command178_Click

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "Contact"

stLinkCriteria = "[EMPI]=" & "'" & Me![EMPI] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria

Exit_Command178_Click:
Exit Sub

Err_Command178_Click:
MsgBox Err.Description
Resume Exit_Command178_Click

End Sub

 

[ZmrAbdulla]

I think you have altered the code. try changing to the original position.

stLinkCriteria = "[EMPI]=" & "'" & Me![EMPI] & "'"

stLinkCriteria = "[EMPI]=" & Me![EMPI]

Zameer Abdulla
[sub]Jack of Visual Basic Programming, Master in Dining & Sleeping[/sub]
Visit Me

 

[Mary10k]

Hello,
Thank you for your help. I tried the modifications listed above and they are not working. Any other suggestions?

Thank you.

 

[ZmrAbdulla]

Do you mean that the form is not opening?
It is opening and not shows the correct record?
It is opening and shows nothing?
Giving any error message?

Zameer Abdulla
[sub]Jack of Visual Basic Programming, Master in Dining & Sleeping[/sub]
Visit Me

 

[Mary10k]

Hello,
The form opens, but it is not linked to any record from the main form. When it opens, it is just a text box.

No errors are happening.
Thanks,

 

[ZmrAbdulla]

I think you have set the new form's DataEntry=Yes. In this case it will open only in the new record mode.
Change to
Form Properties > Data tab > DataEntry=No


Zameer Abdulla
[sub]Jack of Visual Basic Programming, Master in Dining & Sleeping[/sub]
Visit Me