Set rstDynasetAppointmentCalendar = mdb.OpenRecordset("Select * From
Calendar where AppointmentDate = #" & Mh3dCalendar1.Date & "#")
Did this help?
greg
Quote:
>I get an "Object Required" error on the second ampersand in the
>following statement--any idea why?
>Set rstDynasetAppointmentCalendar = ("Select * From Calendar where
>AppointmentDate = #" & Mh3dCalendar1.Date & "#")
>Allen J. Bennett