Using a list box for Critieria on report - then Not using it, unfilter

[wz]

I have a form in which the end user selects from a unbound list box, then clicks a cmdbutton to preview report. The report is based on a query which uses the list box (on the form) as the Criteria.

All works well.... However I also want the end-user to view the report showing all records (no criteria selected). How?

I don't want to have an addtional querry - is there code

 

[wz]

got - it, I found my answer - I was missing the last part..(Me.filter)..thanks, wz

Me.Filter = "Zip = Forms!frmZip!ZipCode"
Me.FilterOn = True

DoCmd.OpenReport "rptGrower", acViewPreview, , Me.Filter