Button to open form and link IDs

[dniezby]

I figured it out!!! WOW!

Okay, so in the original form, the button that opens the pop-up form has this in the OnClick event.

Private Sub SMS_Email_Click()
DoCmd.OpenForm "SMS Activity", acNormal, , , acFormAdd, 3, ID.Value
End Sub

Then in the form I open up I put this code in the OnLoad event.

Private Sub Form_Load()
    If Not IsNull(Me.OpenArgs) Then
        ContactID.Value = Me.OpenArgs
    End If
End Sub

Thanks for the discussion that led to this result.

[dniezby]

For Option #2 here's an example...I believe I've got your names correct:

In the Primary Form:

Private Sub Notes_Click()

 If Nz(Me.ID,"") <> "" Then
  DoCmd.OpenForm "SMS Activity", , , , , , Me.ID
 Else
  MsgBox "The ID Field Must Be Entered First!"
 End If

End Sub

In the Secondary Form:

Private Sub Form_Load()

    DoCmd.GoToRecord , , acNewRec
    
    If Nz(Me.OpenArgs,"") <> "" Then
      Me.ContactID = Me.OpenArgs
    End If

End Sub

Linq ;0)>

Lol, looks like we were replying at the same time. Mine is a little different but it works.