Forms Entry in Report

[webdevop]

I have a report that runs through a module and pulls data entries from temp tables. Here is the example:

Private Sub Preview_Customers_by_Month__Ship_Date__Click()
DoCmd.OpenReport &quot;customers by month (ship date)&quot;, acPreview, , &quot;[schd_date_start] <= [range].[to]&quot;
End Sub

I want to change the <= [range].[to] portion to readoff
of date field on a form equal to Form/Main/InpBegDate.

Can I change the code to reference the date box instead of the temp table within this code or on the report itself ?

Thanks for your time ...

 

[dhookom]

Webdevop,
You can try:
Private Sub Preview_Customers_by_Month__Ship_Date__Click()
Dim strWhere as String
strWhere =&quot;[schd_date_start] <=#&quot; & Forms.Main.InpBegDate & &quot;#&quot;
DoCmd.OpenReport &quot;customers by month (ship date)&quot;, acPreview, , strWhere
End Sub

If this code is running in form Main then you can use:
strWhere =&quot;[schd_date_start] <=#&quot; & Me.InpBegDate & &quot;#&quot;


Duane
MS Access MVP
Find out how to get great answers faq219-2884.

 

[webdevop]

Nice Duane, I'll give that a shot ....

forgot to mention between InpBegDate and InpEndDate, what would be the back end on that code ??

 

[dhookom]

strWhere would be
strWhere =&quot;[schd_date_start] Between #&quot; & Me.InpBegDate & &quot;# AND #&quot; & Me.inpEndDate & &quot;#&quot;

You also forgot to mention if the code is running on the form MAIN.


Duane
MS Access MVP
Find out how to get great answers faq219-2884.