Adding data through Pop-Up forms

[AndyM]

Hi,
probably a very simple one this.
I have a data-input form that requires quite a few controls but has limited real estate. To get around this I've attached a pop-up form accessed through an "Advanced" button that displays the controls that are not normally used.
data entered

The problem I have is:
I enter data into the pop-up in the vain hope that it updates the record opened by the parent form, but this doesn't seem to happen.
I believe this is due to the OpenForm method (called when the button is pressed) that I'm using but I dont know enough about SQL to write a correct 'where' statement

Any help greatly appreciated


Code: ( text )
Private Sub Command0_Click()
On Error GoTo Err_Command0_Click

Dim stDocName As String
Dim stLinkCriteria As String

strDocName = "subfrmInputVoiceMitelAdvanced"
strLinkCriteria = "[BOSSID]= Forms![Form_subfrmInputVoiceMitel]![BOSSID]"

DoCmd.OpenForm strDocName, , , strLinkCriteria

Exit_Command0_Click:
Exit Sub

Err_Command0_Click:
MsgBox Err.Description
Resume Exit_Command0_Click

End Sub

[hyperpau]

Change This:

strLinkCriteria = "[BOSSID]= Forms![Form_subfrmInputVoiceMitel]![BOSSID]"

To this:

strLinkCriteria = "[BOSSID]=" & Me!BOSSID

Hi,
probably a very simple one this.
I have a data-input form that requires quite a few controls but has limited real estate. To get around this I've attached a pop-up form accessed through an "Advanced" button that displays the controls that are not normally used.
data entered

The problem I have is:
I enter data into the pop-up in the vain hope that it updates the record opened by the parent form, but this doesn't seem to happen.
I believe this is due to the OpenForm method (called when the button is pressed) that I'm using but I dont know enough about SQL to write a correct 'where' statement

Any help greatly appreciated


Code: ( text )
Private Sub Command0_Click()
On Error GoTo Err_Command0_Click

Dim stDocName As String
Dim stLinkCriteria As String

strDocName = "subfrmInputVoiceMitelAdvanced"
strLinkCriteria = "[BOSSID]= Forms![Form_subfrmInputVoiceMitel]![BOSSID]"

DoCmd.OpenForm strDocName, , , strLinkCriteria

Exit_Command0_Click:
Exit Sub

Err_Command0_Click:
MsgBox Err.Description
Resume Exit_Command0_Click

End Sub

[cyberdwarf]

FWIW
Maybe you could place the 'Advanced' controls on a hidden Tab/Page on the main form. That way, clicking the Advanced button would just make the hidden Page visible and switch focus .
HTH

Steve

[Ericks]

Hi,
probably a very simple one this.
I have a data-input form that requires quite a few controls but has limited real estate. To get around this I've attached a pop-up form accessed through an "Advanced" button that displays the controls that are not normally used.
data entered

The problem I have is:
I enter data into the pop-up in the vain hope that it updates the record opened by the parent form, but this doesn't seem to happen.
I believe this is due to the OpenForm method (called when the button is pressed) that I'm using but I dont know enough about SQL to write a correct 'where' statement

Any help greatly appreciated


Code: ( text )
Private Sub Command0_Click()
On Error GoTo Err_Command0_Click

Dim stDocName As String
Dim stLinkCriteria As String

strDocName = "subfrmInputVoiceMitelAdvanced"
strLinkCriteria = "[BOSSID]= Forms![Form_subfrmInputVoiceMitel]![BOSSID]"

DoCmd.OpenForm strDocName, , , strLinkCriteria

Exit_Command0_Click:
Exit Sub

Err_Command0_Click:
MsgBox Err.Description
Resume Exit_Command0_Click

End Sub

Not sure if still relevant or if I understood it correctly. I too use popup forms to fill in data input forms. To make sure it updates the Form I put a Refresh form statement in the popup's on close event.

[missinglinq]

The classic answer to too many controls for the real estate available is to do as Cyberdwarf has suggested; use a form with tabbed pages. You could hide the second page and have it appear with a click of the "advanced" button, or simply label the second page, with the seldom used controls, as "Advanced."

This way, referencing is easy, because the controls are, in actuality, on a single form. There's no problem trying to "sync" up the two forms, because there is no second form, and you avoid the problem of having two forms trying to write to a single table/query, for the same reason.

Linq ;)>