Heh, heh... My point was that
dtNewDate = DatePart("m",rs("Scheduled_Review_Date")) & "/1/2007"
returns a STRING, whereas
dtNewDate = DateSerial(2007, Month(Me.Scheduled_Review_Date), 1)
returns a DATE. Isn't it a date you want?
Greg Serrano
Michigan Dept. of Environmental Quality, Air Quality Division
|