18位身份证校验算法
身份证校验码算法
身份证校验码产生思路方法:
∑(ai×Wi)(mod 11)
i: 表示号码
从由至左包括校验码在内
位置序号；ai 表示第i位置上
号码值；Wi 第i位置上
加权因子
其数值Wi=mod(power(2,(n-1)),11)i 18 17 16 15 14 13 12 11 10 9 8 7 6 5 4 3 2 1
Wi 7 9 10 5 8 4 2 1 6 3 7 9 10 5 8 4 2 1
相应
校验码:∑(ai×WI)(mod 11) 0 1 2 3 4 5 6 7 8 9 10
校验码
值ai 1 0 X 9 8 7 6 5 4 3 2下面是校验
:FUNCTION sfzjy(num)
len(num)=15 thencID = left(num,6)&\"19\"&right(num,9)
len(num)=17 or len(num)=18 thencID = left(num,17)
end
nSum=mid(cID,1,1) * 7
nSum=nsum+mid(cID,2,1) * 9
nSum=nsum+mid(cID,3,1) * 10
nSum=nsum+mid(cID,4,1) * 5
nSum=nsum+mid(cID,5,1) * 8
nSum=nsum+mid(cID,6,1) * 4
nSum=nsum+mid(cID,7,1) * 2
nSum=nsum+mid(cID,8,1) * 1
nSum=nsum+mid(cID,9,1) * 6
nSum=nsum+mid(cID,10,1) * 3
nSum=nsum+mid(cID,11,1) * 7
nSum=nsum+mid(cID,12,1) * 9
nSum=nsum+mid(cID,13,1) * 10
nSum=nsum+mid(cID,14,1) * 5
nSum=nsum+mid(cID,15,1) * 8
nSum=nsum+mid(cID,16,1) * 4
nSum=nsum+mid(cID,17,1) * 2
\'*计算校验位
check_number=12-nsum mod 11
If check_number=10 then
check_number=\"X\"
End
If check_number=12 then
check_number=\"1\"
End
If check_number=11 then
check_number=\"0\"
End
sfzjy=check_number
End function
其它校验:
性别和出生年月:
sfznum=身份证号码
lenx=len(sfznum)
lenx=15 then yy=\"19\"&mid(xian,7,2)
mm=mid(xian,9,2)
dd=mid(xian,11,2)
aa=mid(xian,15,1) \'15位身分证取第十 5位,能被2整除为女性
end
lenx=18 thenyy=mid(xian,7,4)
mm=mid(xian,11,2)
dd=mid(xian,13,2)
aa=mid(xian,17,1) \'18位身分证取第十 7位,能被2整除为女性
end
aa mod 2=0 then xb=\"女\"
xb=\"男\"
end
lenx=18 then mid(xian,18,1)<>cstr(sfzjy(xian)) then \'如果第十 8位校验码不等于计算出校验码则身份证号码有误.response.write \"提示:身份证校验位
!\"response.write \"结果:身份证号码校验为合法号码!\"
end
\'如果输入是十 5位号,则计算出十 8位新号response.write \"新身份证:\"&left(xian,6)&\"19\"&right(xian,9)&cstr(sfzjy(xian))
end
有关户籍判断则而要数据库.这里就不提供了.
最新评论