订阅本栏目 RSS您所在的位置: 深山工作室 > ASP > 正文

ASP版通过身份证信息获取对应的生日性别年龄

网络 2018/5/14 10:35:46 深山工作室 字体: 浏览 6968



<html xmlns="http://www.w3.org/1999/xhtml">
<head>
<meta http-equiv="Content-Type" content="text/html; charset=gb2312" />
<title>通过身份证识别生日和性别、年龄</title>
</head>

<%
'位数判断
Sno=request("Sno")

If Len(Sno)="15" Then
mm="15"
xxx=Right(Sno,1)
End If
If Len(Sno)="18" Then
mm="18"
yyy=Right(Sno, 2)
xxx=Left(yyy, 1)
End If
'性别判断
If xxx Mod 2=0 Then
nn="女"'女
Else If xxx Mod 2=1 Then
nn="男"'男
End If End if

Dim a, b, c, d, e
a = Sno
'新身份证号码的转换,老身份证号码雷同
If mm="18" Then
b = Left(a, 14) '取出生日日期字符串
d = Right(b, 8)
a = Left(d, 4) '取出年 18
b = Left(d, 6) '取出月
b = Right(b, 2)
c = Right(d, 2) '取出日
Else If mm="15" Then
b = Left(a, 12)
d = Right(b, 6)
a = 19&Left(d, 2) '取出年 15
b = Left(d, 4) '取出月
b = Right(b, 2)
c = Right(d, 2) '取出日
End If End If
e =a+"-"+b+"-"+c'生日字符串

%>

性别:<b><%=nn%></b><br>
生日:<b><%=e%></b><br>
年龄:<b><%=Year(now)-a%></b><br>
位:<b><%=mm%></b><br>
<body>
<form action="" method="post">
输入身份证号
<input name="Sno" type="text" value="320706198901033023" />
<input type="submit" name="Submit" value="读取信息=>" />
</form>
</body>
</html>

=========================== 分割线 ===========================

'以上是根据年份算的年龄,下面是根据生日计算年龄,并做成asp函数
function AgeResult(strCard)
        '根据身份证判断年龄
        If Len(strCard)="15" Then
        mm="15"
        xxx=Right(strCard,1)
        End If
        If Len(strCard)="18" Then
        mm="18"
        yyy=Right(strCard, 2)
        xxx=Left(yyy, 1)
        End If
        '性别判断
        If xxx Mod 2=0 Then
        nn="女"'女
        Else If xxx Mod 2=1 Then
        nn="男"'男
        End If End if
      
        Dim str_a, str_b, str_c, str_d, str_e
        str_a = strCard
        '新身份证号码的转换,老身份证号码雷同
        If mm="18" Then
        str_b = Left(str_a, 14) '取出生日日期字符串
        str_d = Right(str_b, 8)
        str_a = Left(str_d, 4) '取出年 18
        str_b = Left(str_d, 6) '取出月
        str_b = Right(str_b, 2)
        str_c = Right(str_d, 2) '取出日
        Else If mm="15" Then
        str_b = Left(str_a, 12)
        str_d = Right(str_b, 6)
        str_a = 19&Left(str_d, 2) '取出年 15
        str_b = Left(str_d, 4) '取出月
        str_b = Right(str_b, 2)
        str_c = Right(str_d, 2) '取出日
        End If End If
        str_e =str_a+"-"+str_b+"-"+str_c'生日字符串
      
        Age=Year(now)-str_a
        shengri1=""&str_b&"/"&str_c&""
        shengri2=""&month(date())&"/"&day(date())&""
        if datediff("d",shengri1,shengri2)>=0 then  Age=Age+1
        AgeResult=Age
end function

'调用方式
response.write AgeResult("320706198901033023")

=========================== 分割线 ===========================

居民身份证号码最后一位

大陆的身份证为18位,老的身份证是15位。

关于身份证第18是怎么计算的,原理如下:根据〖中华人民共和国国家标准 GB 11643-1999〗中有关公民身份号码的规定,公民身份号码是特征组合码,由十七位数字本体码和一位数字校验码组成。排列顺序从左至右依次为:六位数 字地址码,八位数字出生日期码,三位数字顺序码和一位数字校验码。

地址码(身份证前六位)表示编码对象常住户口所在县(市、旗、区)的行政区划代码。(所有区域的编码可以到这个网站http://www.stats.gov.cn/tjsj/tjbz/tjyqhdmhcxhfdm/

查询到最新的县及县以上的行政编码资料。

生日期码(身份证第七位到第十四位)表示编码对象出生的年、月、日,其中年份用四位数字表示,年、月、日之间不用分隔符。例如:1981年05月11日就用19810511表示。

顺序码(身份证第十五位到十七位)为同一地址码所标识的区域范围内,对同年、月、日出生的人员编定的顺序号。其中第十七位奇数分给男性,偶数分给女性。

校验码(身份证最后一位)是根据前面十七位数字码,按照ISO 7064:1983.MOD 11-2校验码计算出来的检验码。

第十八位数字的计算方法为:

1、将前面的身份证号码17位数分别乘以不同的系数。从第一位到第十七位的系数分别为:7 9 10 5 8 4 2 1 6 3 7 9 10 5 8 4 2

2、将这17位数字和系数相乘的结果相加。

3、用加出来和除以11,看余数是多少?

4、余数只可能有0 1 2 3 4 5 6 7 8 9 10这11个数字。其分别对应的最后一位身份证的号码为1 0 X 9 8 7 6 5 4 3 2。

5、通过上面得知如果余数是2,就会在身份证的第18位数字上出现罗马数字的Ⅹ。如果余数是10,身份证的最后一位号码就是2。

例如:某男性的身份证号码是34052419800101001X。我们要看看这个身份证是不是合法的身份证。

首先:我们得出,前17位的乘积和是189

然后:用189除以11得出的结果是17 + 2/11,也就是说余数是2。

最后:通过对应规则就可以知道余数2对应的数字是x。所以,这是一个合格的身份证号码。
相关阅读
网页小键盘/软键盘
ASP留言板IP或IP段限制与限制留言次数
一行两列的CSS设置代码
巧妙运用CSS样式表立刻改变鼠标的样式
关于SQL2008 “不允许保存更改。您所做的更改要求删除并重新创建以下表。您对无法重新创建的标进行了更改或者启用了‘阻止保存要求重新创建表的更改’” 解决方案
ASP.NET 2.0跨网页提交的三法
阳光丽江客栈
深山工作室
共有0条关于《ASP版通过身份证信息获取对应的生日性别年龄》的评论
发表评论
正在加载评论......
返回顶部发表评论
呢 称:
表 情:
内 容:
评论内容:不能超过 1000 字,需审核,请自觉遵守互联网相关政策法规。
验证码: 验证码 
网友评论声明,请自觉遵守互联网相关政策法规。

您发布的评论即表示同意遵守以下条款:
一、不得利用本站危害国家安全、泄露国家秘密,不得侵犯国家、社会、集体和公民的合法权益;
二、不得发布国家法律、法规明令禁止的内容;互相尊重,对自己在本站的言论和行为负责;
三、本站对您所发布内容拥有处置权。

更多信息>>栏目类别选择
百度小程序开发
微信小程序开发
微信公众号开发
uni-app
asp函数库
ASP
DIV+CSS
HTML
python
更多>>同类信息
ASP中Utf-8与Gb2312编码转换乱码问题的解决方法页面编码声明
asp显示随机密码
通过阿里云服务接口获得ip地址详细信息
iis点开后任务栏上有显示,但是窗口看不到的解决办法
RSA加密解密插件
微软Encoder加密解密函数
更多>>最新添加文章
python通过代码修改pip下载源让下载库飞起
python里面requests.post返回的res.text还有其它的吗
aliyun阿里云续费域名优惠口令(注册、续费都可以使用)
windows7环境下安装配置jdk
python对微信操作要用到这两个库wxpy与itchat
ASP中Utf-8与Gb2312编码转换乱码问题的解决方法页面编码声明
DW设置之后更好用 DreamweaverCS编辑GB2312与UTF-8文件在代码视图中点击鼠标错位问题的解决办法
解决国内 github.com 打不开的准确方法
更多>>随机抽取信息
深山留言板教师节效果
asp简易论坛制作教程(三)——数据库的设置
页面文字变色、变大、还原
旅行社网站模板3
IIS上传文件大小解处限制的方法
JavaScript:iframe自动适应高度