<%=year(date)%>年<%=month(date)%>月<%=day(date)%>日 星期
<%
select case DatePart("w",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 "六"
end select
%>
北京万宣互联科技发展有限公司 京ICP证 050497 号