Solved OpenArgs populate textbox

[Mario R. Perez]

Hi there, I'm obviously doing something wrong, but can't figure out what it is, and this should be pretty simple.

I have a button on a form(form1) that opens another form(form2) and not populates a textboxes in the second form with a the values from openargs.

form1
Private Sub Command31_Click()

DoCmd.OpenForm "form2", , , , , , "select ID,Fldsize from TBLSIZE"

end sub

form2 (default view: Continuous Forms, 2 unbound Textboxes : TextId,TextSize)

Private Sub Form_Open(Cancel As Integer)
If Not IsNull(Me.OpenArgs) Then
Me.RecordSource = Me.OpenArgs
Me.TextId = Me!ID 'not populate only first rec
Me.TextSize = Me!Fldsize 'not populate only first rec
End If

end sub

Thanks for advance

 

[Gasman]

Have you done the simple stuff, like walking your code and inspecting values?

 

[theDBguy]

Rather than these:

Me.TextId = Me!ID 'not populate only first rec
Me.TextSize = Me!Fldsize 'not populate only first rec

Perhaps you meant these?

Me.TextId.ControlSource = ID
Me.TextSize.ControlSource = Fldsize

 

[Gasman]

I tested the O/P's code with my fields and it worked for me?, so not sure what else is going on? I made my controls unbound which is what they have appeared to do?

 

[theDBguy]

I tested the O/P's code with my fields and it worked for me?, so not sure what else is going on? I made my controls unbound which is what they have appeared to do?

Did you also try to use a Continuous Form as the OP did?

 

[Gasman]

No sorry, just a form I had from another site.

 

[theDBguy]

No sorry, just a form I had from another site.

Just checking...

 

[Gasman]

Ah I see, I misunderstood his issue.
I have just done that with a Continuous form and I see what you mean, as control is unbound, all are set to whatever the values are.

My apologies @theDBguy and O/P.

 

[theDBguy]

Ah I see, I misunderstood his issue.
I have just done that with a Continuous form and I see what you mean, as control is unbound, all are set to whatever the values are.

My apologies @theDBguy and O/P.

No worries.

 

[Mario R. Perez]

Rather than these:

Me.TextId = Me!ID 'not populate only first rec
Me.TextSize = Me!Fldsize 'not populate only first rec

Perhaps you meant these?

Me.TextId.ControlSource = ID
Me.TextSize.ControlSource = Fldsize

I tried as you indicated, but it does not recognize the "ID" field, it takes it as a non-existent variable

 

[MajP]

Me.TextId.ControlSource = ID
Me.TextSize.ControlSource = Fldsize

I think the @theDBguy made a typo, because that would assume variables. These properties are strings.

Me.TextId.ControlSource = "ID"
Me.TextSize.ControlSource = "Fldsize"

 

[theDBguy]

I think the @theDBguy made a typo, because that would assume variables. These properties are strings.

Me.TextId.ControlSource = "ID"
Me.TextSize.ControlSource = "Fldsize"

Oops, my bad. Thanks for the assist @MajP!

 

[Mario R. Perez]

I think the @theDBguy made a typo, because that would assume variables. These properties are strings.

Me.TextId.ControlSource = "ID"
Me.TextSize.ControlSource = "Fldsize"

Now it works, thank you very much MajP and everyone who read my post.