<%
'올해
yearTemp = year(date)
'이번달
monthTemp = month(date)
'오늘
dayTemp = day(date)
'오늘날짜
today = date()
'오늘날짜시간분초
iday = now()
'오늘은 무슨요일인가?
wday = weekday(now())
select case wday
case "1" wday = "일요일"
case "2" wday = "월요일"
case "3" wday = "화요일"
case "4" wday = "수요일"
case "5" wday = "목요일"
case "6" wday = "금요일"
case "7" wday = "토요일"
end select
Response.Write "올해:" & yearTemp & "<br>"
Response.Write "이번달:" & monthTemp & "<br>"
Response.Write "오늘:" & dayTemp & "<br>"
Response.Write "오늘날짜:" & today & "<br>"
Response.Write "오늘날짜시간분초:" & iday & "<br>"
Response.Write "무슨요일:" & wday & "<br>"
%>