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 변수에 값을 할당하는 부분을 수정하심 됩니다.
Posted by 귀찮은 여니씨
,