그래도 안돼네요...
ㅠ..ㅠ
어떻게 해야지요...
알려 주세요....
김장우 님이 쓴 글입니다.
--------------------------------------------------------------------
:헉.. 잠깐 수정을 하려고 한사이에 올리셨군요.. ^^
:
:그런데 아랫분이 하시는 방법은 내일 음력 날짜도 틀리게 나옵니다. ^^;;
:
:제가 한것은 오늘만 해당이 됩니다.
:
:작년에도 이런 문제가 있었는데 해결이 안됐었군요..
:
:머.. 오늘 하루만 문제가 있는거긴 한데..
:
:일단 해결 하는 방법은
:
:
:/Mail/WebmailMain.asp, line 134
:
:위파일의 해당 위치에 있는
:
:
: If Ccur(firstMonth) = 2 and Ccur(firstDay) = 30 Then
: lunarDate = firstYear & "/" & "03/01"
: Else
: lunarNextDate = DateAdd("d", 6, lunarDate)
: End If
:
:부분을 아래로 수정하시면 됩니다.. 그런데..
:
:음력 29일이 4년에 한번씩 오는거 맞나요? ^^;; 대충 기억으로 한건데..
:
: dim limit_date
:
: if ccur(firstYear) mod 4 = 1 and Ccur(firstMonth) = 2 then
: limit_date = 29
: else
: limit_date = 30
: end if
: If Ccur(firstMonth) = 2 and Ccur(firstDay) = limit_date Then
: lunarDate = firstYear & "/" & "03/01"
: Else
: lunarNextDate = DateAdd("d", 6, lunarDate)
: End If