Are you actually using.... mydate= ConvertDate(FormatDateTime(Date(), 1))??
Because if you are.....
mydate= Date()
myday=Day(mydate)
mymonth=Month(mydate)
myyear=Year(mydate)
cutOffdate=myYear & "-" & myMonth & "-" & myDay
If you are stuck with this format Wednesday, May 05, 2004 then you might try this....
myDate = "Wednesday, May 05, 2004"
arrDate = split(myDate," ")
myDate = CDate(left(arrDate(2),2) & "-" & arrDate(1) & "-" & arrDate(3))
myday=Day(mydate)
mymonth=Month(mydate)
myyear=Year(mydate)
cutOffdate=myYear & "-" & myMonth & "-" & myDay