Not(Set Subform Recordsouce)

[davidmreid]

I get an error message (2580: The recordsource... does not exist) that the data does not exist (it does) when I try to set a query as the recordsource for a subform in a subform on a main form. Any suggestions? Thx.

'Main form
Set frm = Forms(strFORM)

' Subform1 on Mainform
Set ctl1 = frm(strSUBFORM1)

' Subform2 on Subform1
Set ctl2 = ctl1.Form(strSUBFORM2)

' Error returned on next line.
ctl2.Form.RecordSource = strRECORDSOURCE

 

[MajP]

'Main form
Set frm = Forms(strFORM)

' Subform1 on Mainform
Set ctl1 = frm.controls(strSUBFORM1)

' Subform2 on Subform1
Set ctl2 = ctl1.Form.controls(strSUBFORM2)

' Error returned on next line.
ctl2.Form.RecordSource = strRECORDSOURCE