Populating a join table/form.

[Telsa]

I'm trying to have a field in a popup form automatically populate with data from an underlying form's field once the popup form is opened.

I have it working on one other set of forms, but for some reason, this one doesn't want to do it.

This is the code...

Dim stDocName As String
Dim stLinkCriteria As String

stDocName = "frmLocsJoin"
stLinkCriteria = "[Component]=" & "'" & Me![CD5x5] & "'"
DoCmd.OpenForm stDocName, acFormDS, , stLinkCriteria, , , Me.CD5x5


I have run debug.print to see if the data is being seen and it is. The filter field in the properties of the popup form points to the right information. yet the form (a datasheet form) will not have the value populate the one field (Component).

What is weird it is that it works on another set of forms I did. I compared all the properties and settings and they match.

Anyone have any clues???

 

[ghubbell]

Hi Telsa,

DoCmd.OpenForm "frmLocsJoin", acFormDS, , "[Component]= " & Me![CD5x5]

Should do it...if not:

DoCmd.OpenForm "frmLocsJoin", acFormDS, , "[Component]= '" & Me![CD5x5] & "'"

Gord
ghubbell@total.net

 

[Telsa]

Nope, didn't work. I'm thinking about rebuilding the buttons and code. Got a feeling there is a corruption I can't see in the IDE.

 

[ghubbell]

Try a simple open form... then another fixed open form...x=2 and if that won't go, make a fresh Db, import everything and try again? X-) Gord
ghubbell@total.net