[ASP] 날짜/주/월 더한 날 구하기

Function TransAddDay(sdate, is_day)
 If isnull(is_day) or Not isnumeric(is_day) or len(is_day) < 1 Then
  is_day = 0
 End if

 TransEndDate = DATEADD("d",is_day, sdate)
End Function

Function TransAddWeek(sdate, is_day)
 If isnull(is_day) or Not isnumeric(is_day) or len(is_day) < 1 Then
  is_day = 0
 End if

 TransEndDate = DATEADD("w",is_day, sdate)
End Function


Function TransAddMonth(sdate, is_day)
 If isnull(is_day) or Not isnumeric(is_day) or len(is_day) < 1 Then
  is_day = 0
 End if

 TransEndDate = DATEADD("m",is_day, sdate)
End Function