티스토리 뷰
메인과 서브페이지에 제목과 같이 금액의 끝이 숫자 '0' 4개로 끝나면 한글로 '만원' 글자가 표기되고, 숫자 0이 4개 이하면 숫자를 다 보여주고 '원' 글자가 표기되도록 해달라는 업체 의뢰가 있어서 예전에 만든 ASP 함수입니다.
몇 군데 쓰이는 데가 있어서 함수로 한 것일 뿐이지 상당히 단순 무식한 방법입니다.
필요하신 분은 더 나은 방향으로 개선해서 쓰시면 좋겠습니다.
* 금액이 만원 단위일 경우 표기 처리함수
Function manwon_cut(str) dim len1 len1 = len(str) if len1=8 then manwon_cut = left(str,4) manwon_cut = manwon_cut & " 만원" elseif len1=7 then manwon_cut = left(str,3) manwon_cut = manwon_cut & " 만원" elseif len1=6 then manwon_cut = left(str,2) manwon_cut = manwon_cut & " 만원" elseif len1=5 then manwon_cut = left(str,1) manwon_cut = manwon_cut & " 만원" else manwon_cut = str manwon_cut = manwon_cut & " 원" end if End Function
'플밍' 카테고리의 다른 글
C# ReadKey 형변환 (0) | 2018.02.06 |
---|---|
[ASP] 어드민페이지에서 팝업 관리하기 (2) | 2016.03.21 |
[ASP] 웹에디터 선택의 폭과 예전에 쓰던 2가지 (10) | 2016.03.07 |
댓글