 |
<%=FormatDateTime(Now(),1)&" "&FormatDateTime(Now(),4)%>
<%
Select Case WeekDay(now())
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
%>
|