Hi

Can an expert PLEASE, PLEASE help?? I'll need detail as I'm relatively new to Access and have difficulty knowing where to place statements . . . codes, etc., if VBA is the solution, I need opening and ending statements.

I have a visitor database. Many visitors will have various start and end dates. We have a DAILY report that is generated at the end of each day with the next day's date entered as a prompt to open the report. This report is required to show individuals registered to visit each day.

My Visitor db has a start date and end date field. Example start date for visitor #1 could be 10/25/05 with an end date of 10/31/05. Visitor #2 might also have a start date of 10/25/05 but an end date of 11/20/05.

When I open my DAILY visitor report and enter the next day's date.I will need all visitors to appear on the DAILY report with an increment of 1 day added to each subsequent visit day but drop off the report once it is greater than the end date. Ex: when the original start date of 10/25/05 is entered, both visitors #1 and #2 appear on the report. When the second date arrives and I enter 10/26/05 as the report prompt date, these two visitors appear again and so on and so on until the start date is greater than the end date, at which time the appropriate visitor will drop off the report.

Hope I explained this clearly . . . not real familiar with the appropriate jargon.

Regards,
NB

Don't enter the date in the report. Enter the date in the FORM. When you do that, open the report (via a button, for example) with this on the button's ON CLICK event. Assuming the report date is a textbox called txtRptDate and the start and end dates are called dtmStartDate and dtmEndDate in the report's underlying table or query:

Dim strCriteria as String

strCriteria = "[dtmStartDate] <= #" & Me.txtRptDate & _
"# And [dtmEndDate] >= #" & Me.txtRptDate & "#"

DoCmd.OpenReport "Your Real Report Name Here", acPreview, , strCriteria


Greg Serrano
Michigan Dept. of Environmental Quality, Air Quality Division