<% dt = Date dtM = DatePart("m", dt) dtM = MonthName(dtM) Response.Write dtM & " " dtD = DatePart("d", dt) Response.Write dtD &", " dtY = DatePart("yyyy", dt) Response.Write dtY %>