I've tried a few things but nothing seems to be doing what I want.
Here's a stop gap solution that at least displays records but with the annoying popup:
Expand|Select|Wrap|Line Numbers
- Dim stDocName As String
- Dim stLinkCriteria As String
- StDocName = "HHI Register"
- StLinkCriteria = "[Media Date Range Start] = [Enter Date ie 09-Nov-11]"
- DoCmd.OpenForm stDocName,,,stLinkCriteria
- DoCmd.Close acForm, "Front Page"
This is only giving me a result for a single date of course.
What I want is to return a date range from the table "HHI Register" by using 2 text boxes with calender called "TxtDateStart" and "TxtDateEnd"
I tried:
Expand|Select|Wrap|Line Numbers
- stLinkCriteria between #" & Format(Me.TxtDateStart, "dd-mmm-yy") & "# AND #" & Format(Me.TxtDateEnd, "dd-mmm-yy") & "#"
Any one want to put me back on the straight and narrow.
Guy