电气与电子工程技术系精品课建设---------模拟电子 | 今天是: <% dim week,myweek,n,y,r week=weekday(date) select case week case 1 myweek="星期日" case 2 myweek="星期一" case 3 myweek="星期二" case 4 myweek="星期三" case 5 myweek="星期四" case 6 myweek="星期五" case else myweek="星期六" end select n=year(now) y=month(now) r=day(now) response.write n&"年"&y&"月"&r&"日" response.write space(3)& myweek %> | |||||||||||||||||
|
||||||||||||||||||