SQL 의 datatime 포맷의 문자를 변형하는 함수입니다.
function view_date(target_date)
Dim yy,mm,dd,h,mi,result
yy= year(target_date)
mm = right("0" & month(target_date),2)
dd = right("0" & day(target_date),2)
h = right("0" & hour(target_date),2)
mi = right("0" & minute(target_date),2)
result = yy & "-" & mm & "-" & dd & " " & h & ":" & mi & ""
view_date = result
end function
위 함수는 target_date 란 datetime 형을 1997-12-16 10:22:43 과 같이 출력됩니다.
만약 출력 양식을 변형 시키고자 한다면 result 변수에 값을 할당하는 부분을 수정하심 됩니다.
function view_date(target_date)
Dim yy,mm,dd,h,mi,result
yy= year(target_date)
mm = right("0" & month(target_date),2)
dd = right("0" & day(target_date),2)
h = right("0" & hour(target_date),2)
mi = right("0" & minute(target_date),2)
result = yy & "-" & mm & "-" & dd & " " & h & ":" & mi & ""
view_date = result
end function
위 함수는 target_date 란 datetime 형을 1997-12-16 10:22:43 과 같이 출력됩니다.
만약 출력 양식을 변형 시키고자 한다면 result 변수에 값을 할당하는 부분을 수정하심 됩니다.