kisyan 发表于 2010-10-21 13:47:20

身份证判断

判断身份证号码的正确性，判断所输入的身份证ID年龄是否满18周岁，如果身份证号码正确且满18周岁则条件成立

希望各位帮助讨论

binghc 发表于 2010-10-21 14:11:47

这个我觉得用正则来判断应该不难,但是身份证号码长度好像不止一种。还请楼主说明一下身份证号码的特点

shano 发表于 2010-10-21 14:13:01

简单的写了一个   

$Hex = InputBox("input", "请输入身份证号码：", "********", "",50,50,780,500)
$number=StringLen ( $Hex)


If $number=18 Then
Else
        MsgBox(0,0,"请输入正确身份证号码")
EndIf


$YEAR = StringMid($Hex, 7, 4)

$YEAR=(@YEAR-$YEAR)

If $year>17 Then
Else
MsgBox(0,0,"未满18岁噢")
EndIf

binghc 发表于 2010-10-21 14:56:03

网上查了,好像身份证就18位的,那就太简单了,直接楼上那样如果刚好18,再检查月份然后是日,提取了生日就没什么问题了

xlcwxl 发表于 2010-10-21 19:02:43

同意楼上的，提取出生年月日

seshomaru 发表于 2010-10-21 20:04:16

可是以前的是15位。
怎么让15位输入完毕之后自动转成18位？   应该怎么完成？

性别识别。
第17位奇数，=男生
第17位偶数，=女生
得到这个结果应该怎么用命令来判断啊？

---------------
我也有和楼主相同的需求

shano 发表于 2010-10-21 20:10:11

回复 6# seshomaru


   15转18网上有规则自己找吧

判断男女 按我上面的代码改一下就行了

取第17为 然后比较是否等于1 3 5 7 9   
用AND

kisyan 发表于 2010-10-22 15:31:32

谢谢大家的热心帮助,论坛有高手写过身份证号码信息读取的例子 参考了下 最终没能移植到自己的代码中所以希望高手们帮助下,U盘丢了以前存的代码全部要重新整理

haodd 发表于 2010-11-15 14:14:15

首先是验证身份证 ID 是否合法就不过关了只要求输入18位就判断为正确！？？？


不是这样子的哦！~~~

在网上找找吧！

haodd 发表于 2010-11-15 20:07:09

http://zhidao.baidu.com/question/98487765.html?fr=ala0

看看这里

身份正验证 步骤
身份证号码位数
身份证号码出生日期超出范围或含有非法字符
身份证号码校验错误
身份证地区非法根据〖中华人民共和国国家标准 GB 11643-1999〗中有关公民身份号码的规定，公民身份号码是特征组合码，由十七位数字本体码和一位数字校验码组成。排列顺序从左至右依次为：六位数字地址码，八位数字出生日期码，三位数字顺序码和一位数字校验码。

地址码表示编码对象常住户口所在县(市、旗、区)的行政区划代码。生日期码表示编码对象出生的年、月、日，其中年份用四位数字表示，年、月、日之间不用分隔符。顺序码表示同一地址码所标识的区域范围内，对同年、月、日出生的人员编定的顺序号。顺序码的奇数分给男性，偶数分给女性。校验码是根据前面十七位数字码，按照ISO 7064:1983.MOD 11-2校验码计算出来的检验码。下面举例说明该计算方法。

15位的身份证编码首先把出生年扩展为4位，简单的就是增加一个19，但是这对于1900年出生的人不使用（这样的寿星不多了）

某男性公民身份号码本体码为34052419800101001，首先按照公式⑴计算：

∑(ai×Wi)(mod 11)……………………………………(1)

公式(1)中：
i----表示号码字符从由至左包括校验码在内的位置序号；
ai----表示第i位置上的号码字符值；
Wi----示第i位置上的加权因子，其数值依据公式Wi=2（n-1）(mod 11)计算得出。

i 18 17 16 15 14 13 12 11 10 9 8 7 6 5 4 3 2 1

ai 3 4 0 5 2 4 1 9 8 0 0 1 0 1 0 0 1 a1

Wi 7 9 10 5 8 4 2 1 6 3 7 9 10 5 8 4 2 1

ai×Wi 21 36 0 25 16 16 2 9 48 0 0 9 0 5 0 0 2 a1

根据公式(1)进行计算：

∑(ai×Wi) =（21+36+0+25+16+16+2+9+48++0+0+9+0+5+0+0+2) = 189

189 ÷ 11 = 17 + 2/11

∑(ai×Wi)(mod 11) = 2

然后根据计算的结果，从下面的表中查出相应的校验码，其中X表示计算结果为10：

∑(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
根据上表，查出计算结果为2的校验码为所以该人员的公民身份号码应该为 34052419800101001X。

a*7+a*9+a*10+a*5+a*8+a*4+a*2+a*1+a*6+a*3
+a*7+a*9+a*10+a*5+a*8+a*4+a*2
%11


when 0 then '1' when 1 then '0' when 2 then 'X' when 3 then '9'
when 4 then '8' when 5 then '7' when 6 then '6' when 7 then '5'
when 8 then '4' when 9 then '3' when 10 then '2'
页: [1]
查看完整版本: 身份证判断