openform with new recordsource

[jerry23]

How can I open a form and assign it a new recordsource.
I have a form based on a query, but I also want to open it based on the same query but filtered.
docmd.openform ,me.recordsource = xxxx ??

any help greatly appreciated...

 

[Rhonin]

Are you looking to assign it a recordsource from another table(s) or a filtered version of the original query?

Rhonin
"Note: before seppuku, hire maid..."

 

[cmmrfrds]

Dim DocName As String, WhereClause As String
Dim QUOTE as String
QUOTE = $chr(34)

DocName = "TheFormToOpen"
WhereClause = " componentType = " & QUOTE & CBComponentType & QUOTE
'---- this opens with a new filter
DoCmd.OpenForm DocName, , , WhereClause

Also in the OnOpen Event of the Form you can replace the recordsource if you want.

Me.RecordSource = "Select * from table"

 

[jerry23]

thanks guys, worked out well