주민등록번호 검증 ASP 함수.

function juminCheck_function(jumin)
  dim checkN : checkN="234567892345"
  dim sum : sum=0

  for j=0 to 11
    sum=sum+CINT(MID(jumin,j+1,1))*CINT(MID(checkN,j+1,1))
  next

  sum=11-(sum mod 11)

  if sum mod 10 = CINT(RIGHT(checkN,1)) then jumin_check=0 else jumin_check=1

  juminCheck_function = jumin_check

end function


인터넷 돌아댕기는게 잘 안되서 약간 수정 했다는...

계산 값을 11로 나눈 나머지 값을 11에서 빼서 주민번호 마지막 수와 비교하면 되는데
약간 이상한 부분을 수정 완료.