[AccessD] Getting the start and end dates of the current week

I need a function that will determine the start and end dates of the
current week.  I'm hacking around with some code, but I'm not
producing enything useful.  Surely I'm not the first to have this
problem?

-Christopher-