ThisDay=Date()
CurrentDayNum=WeekDay(ThisDay)
FirstDayNum=CurrentDayNum-2
EndDayNum=7-CurrentDayNum+1
FirstDay=Day(DateAdd("d",-FirstDayNum,ThisDay))
EndDay=Day(DateAdd("d",EndDayNum,ThisDay))
NowMonth=Month(Date())
NowDay=Day(Date())
Sql="Select * From User Where Month(BirthDay)="&NowMonth&" And ( Day(BirthDay) Between "&FirstDay&" And "&EndDay&")"