Appointments Database Aspid 1571 Future and Recent - Microsoft Access Forum


	Back to Access Forum Comments List

Upload Images @Reply Bookmark Link Email Next Unseen

Appointments Database Aspid 1571 Future and Recent

Howard Chapell

14 months ago

Hi have spent a few hours now trying to get the Future and Recent Appointmens to display  as per - Case 1 Code it does not pick up any records fitting the Case 1 Criteria in the VBA Code. I have created a Query with the same Criteria and it works fine. I can only assume my  SQL Code for the Record Source is wrong.

Case 1: ' Recent & Future Events
            Me.RecordSource = "SELECT * FROM AppointmentT " & _
                                "WHERE EndDateTime >= #" & Date - 3 & "# " & _
                                "ORDER BY StartDateTime;"

	Kevin Robertson @Reply 14 months ago
What results do you get when you run the code? Could be a problem with the date format. What format are you using? You could Format the date to U.S. standard (if not using that format). Or, ISO Date Format If this doesn't help, please post some screenshots.

	Sandra Truax @Reply 14 months ago
Try this: Me.RecordSource = "SELECT * FROM AppointmentT " & _ "WHERE EndDateTime >= #" & Format(Date - 3, "mm/dd/yyyy") & "# " & _ "ORDER BY StartDateTime;"

This thread is now CLOSED. If you wish to comment, start a NEW discussion in Access Forum.

Next Unseen

New Feature: Comment Live View