계좌번호를 4자리로 끊어서 출력 해주기 위해서 만들어 봤음
<%
 '계좌 번호 출력을 위한 함수
 Function conv_bank_num(bank)
     bank_size = len(bank)
  bank = Replace(bank, "-","")
  bank = Replace(bank, "ㅡ","")
     bank = Replace(bank, " ","")
  bank = Replace(bank, ".","")
  bank = trim(bank)
  res =""

  if bank_size > 4 then
   res = mid(bank,1,4)&"-"&mid(bank,5,4)&"-"&mid(bank,9,4)
  end if
  if bank_size > 12 then
   res = res & "-" & mid(bank,13,10)
  end if

  conv_bank_num = res
 end Function
%>