영삼넷IT 강국 = 김영삼 블로그에 오신걸 환영합니다.

<%

function weekFunc(today)
 
     '//-------1년 52주중 오늘은 몇번째 주인가?--------------------//
     wcountYear = datepart("ww", today)

    '날짜의 유효성 검사
     if isDate(today) = false then
     weekFunc = "유효한 날짜가 아닙니다."
     end if

    '//-------이번달중 오늘은 몇번째 주인가?----------------------//
    '이번달의 첫번째일
    firstdate = year(today) & "-" & month(today) & "-01"
    wcountMonth = datepart("ww", today) - datepart("ww", firstdate) + 1

     '리턴값
     weekFunc = "오늘은 1년중 " & wcountYear & "주 째이며 이번달 중 " & wcountMonth & "주 째입니다. "

end function

Response.Write weekFunc(date())

%>

<%

 '올해
 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>"

%>