ASP汉字日期显示-年月日星期

今天是：<%=year(now())%>年<%=month(now())%>月<%=day(now())%>日 <%
select case Weekday(Date)
case "1"
response.write"星期日"
case "2"
response.write"星期一"
case "3"
response.write"星期二"
case "4"
response.write"星期三"
case "5"
response.write"星期四"
case "6"
response.write"星期五"
case "7"
response.write"星期六"
case else
response.write"很抱歉！我也不知道是星期几"
end select
%>