chaging a subreport's source object at runtime

[markjkubicki]

I have a report that, depending on..., wil require 1 of several different footers
So, in the page footer, I've placed an unbound subreport (child283) (to be remnamed later...)
and have added this code (as a starting point in the Report,s load event)

srptAB = InputBox("A or B?")
If srptAB = "A" Then
Me.Child283.SourceObject = "srpt_FOOTA"
Else
Me.Child283.SourceObject = "srpt_FOOTB"


End If

but am getting this error...
'2191'
"... can't set the Source Object property in the print preview or after printing has started" (?)


Q.
Am I even in the right direction ?

With much appreciation in advance,
Mark

[ItsMe]

You need to determine If srptAB = "A" in the OnLoad or OnOpen event. You can create some DAO or do a Dlookup in the OnLoad or pass the value of srptAB to the report in the OpenArgs.

[markjkubicki]

a bit confused..

the above code is in the report's on_load event

[ItsMe]

What is srptAB? Is it a variable? How is it determined what the value of the variable is? Maybe you can create a recordset to query one or more of the tables to determine the value of your variable. In the OnLoad event, you can create a DAO object or sue a DLookup function to retrieve data from tables. The report's controls and or Recordsource is empty at the time of the Onload event.

Certain Data will be available during certain OnFormat events. However, OnFormat will likely be too late for the assignment of a subquery.

[markjkubicki]

sorry for the late follow-up

determining the value of srptAB was not an issue (all of that code hadn't yet been written, but was to be...)
the problem's solution turned out to be very simple:

the the Source Object for a subReport needs to be changed in the parent report's OnOpen event; attempting to do so in the OnLoad event (as I had been) was too late...

problem solved (thnx for all the insight),
Mark