<%
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())
%>