Foxtable(狐表)用户栏目专家坐堂 → 提取身份证号码的年龄,性别,出生日期


  共有8132人关注过本帖树形打印复制链接

主题:提取身份证号码的年龄,性别,出生日期

帅哥哟,离线,有人找我吗?
狐狸爸爸
  1楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/9/15 22:14:00 [显示全部帖子]

自己做个表,输入各行政区域对应的号码。

不过据我理解,这个似乎没有意义,因为人的户籍会流动,但是身份证号码不变。


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  2楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2011/9/15 22:36:00 [显示全部帖子]

这里就有例子:

 

http://www.foxtable.com/help/topics/0625.htm

 


 回到顶部
帅哥哟,离线,有人找我吗?
狐狸爸爸
  3楼 | 信息 | 搜索 | 邮箱 | 主页 | UC


加好友 发短信
等级:管理员 帖子:47448 积分:251054 威望:0 精华:91 注册:2008/6/17 17:14:00
  发帖心情 Post By:2014/4/29 11:48:00 [显示全部帖子]

select case e.datacol.name
    case "证件类型","证件号码"
         if e.datarow("证件类型") = “身份证”Then
             If e.DataRow.IsNull("证件号码") Then '身份证号码是否为空
                   e.DataRow("出生日期") = Nothing '如果为空,则清除出生日期
             Else
                  '否则从身份证号码列中提取出生日期
                   e.DataRow("出生日期") = ReadBirthday(e.DataRow("证件号码"))
              End If
          end if
end select


 回到顶部