End date parameter

=CDate(DateAdd(DateInterval.Day,7, DateAdd("d", 1-DatePart(DateInterval.WeekDay,Today(),FirstDayOfWeek.Sunday),Today())))

Hello Everyone,

I wrote this expression on end date parameter to get all items entered in  that week . But it is not giving me the whole data entered on the last date. For example If I give a parameter from 3/3/13 - 3/9/13, It will not give me the items added on 3/9/13. Can you tell me what is wrong with this query expression?

Thank you,