Passing values from main form to popup form

[John V]

I know this has been discussed here a million times before but I am not finding an answer to my problem (at least not one my little brain can understand).

I have a main form for entering Employer Information (frmEmployers) and this form has a command button on it for opening a form to enter Retirement Plan information (frmRRSP).

Originally the Employer Form did not have a textbox for displaying the EmployerID (PK) but I was forced to add one (txtEmployerID) (Visible=No) when I used the wizard for adding the command button.

The Employer form has tblEmployer as its recordsource and the RRSP form has tblRRSP as its recordsource.

The RRSP form that gets opened with the command button has Fields for RRSP Rate and the Dates the RRSP Rate is in Effect. It does not have a textbox for displaying the EmployerFK from the main form. Nor does it have a textbox for displaying the RatdeID (PK from the RRSP table).



The wizard asked me to choose which fields contain matching data to use for lookup, I chose txtEmployerID from frmEmployers and EmployerFK from frmRRSP and linked them with the "<->" button in the wizard.

I would like to have EmployerID (PK field from the Employer Table) be transferred to the EmployerFK field of the RRSP Table. This isn't happening. Why not?

I have tried adding a textbox to the RRSP form and setting its controlsource as EmployerFK. This did not work. I have setup a relationship between the Employer Table (EmployerID field) and the RRSP Table (EmployerFK field).

Do I need to use OpenArgs? If I do, how? I can't get the syntax quite right.

TIA
John V

[burrina]

Is your popup form bound? Here is an example:

Forms![PopupForm]![SomeField] = Forms![MainForm].[SomeField]
Me.Dirty = False

HTH

[azhar2006]

Hello John
Try this code

Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "NameForm"
stLinkCriteria = "[NameID]=" & "'" & Me![NameID] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria

[John V]

I was hoping that would be taken care of when "linking" EmployerID and EmployerFK with the wizard. Apparently not.

John V

[John V]

I tried it and it didn't work. Not sure that I am replacing "NameID" and "NameForm with the right things though, and I am assuming I am supposed to.

Here is what I did:

I replaced "NameForm" with the name of the popup form (frmRRSP) and the first "NameID" with the field name I am trying to pass the value to (EmployerFK) and the second "NameID with the textbox name from the main form (EmployerID) I am trying to pass the value from.

I put this code in the Click event of the command button that opens the popup form. So my code looks like this:

Private Sub EditRRSP_Click()

Dim stDocName As String
Dim stLinkCriteria As String
stDocName = "frmRRSP"
stLinkCriteria = "[EmployerFK]=" & "'" & Me![EmployerID] & "'"
DoCmd.OpenForm stDocName, , , stLinkCriteria

End Sub

I put this code in the Click event of the command button that opens the popup form.

[azhar2006]

Put it up for a field name in the (frmEmployers)
And double-click the event

[June7]

Is EmployerID text data type? Do you want to open the form to an existing record? The suggested code should accomplish that.

If you want to open the form to a new record and populate the EmployerFK field with EmployerID, review https://www.accessforums.net/forms/f...les-45450.html