그주의 시작일과 마지막일을 구하는 함수
- Posted at 2007/10/15 18:23
- Filed under 일함서/함수바리
function Re_Date(dates, s_date, e_date)
s = int(s_date) '구하려는 시작일 1-일, 2-월, 3-화, 4-수, 5-목, 6-금, 7-토
e = int(e_date) '구하려는 끝일 1-일, 2-월, 3-화, 4-수, 5-목, 6-금, 7-토
w = DatePart("w",dates)
dates = CDate(dates)
re_s = DateAdd("d", dates , s - w)
re_e = DateAdd("d", dates , e - w)
Re_Date = "시작일 : " & re_S & "<br>끝일 : " & re_e
end function
Response.Write Re_Date("2007-09-13",1,7)
Posted by web20korea
- Tag
- web20korea
,
날자,
함수 - Response
- No Trackback , No Comment
