Foxtable(狐表)用户栏目专家坐堂 → 求助,从身份证号里提取生日


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

主题:求助,从身份证号里提取生日

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


加好友 发短信
等级:小狐 帖子:328 积分:2529 威望:0 精华:0 注册:2020/3/2 23:15:00
求助,从身份证号里提取生日  发帖心情 Post By:2020/5/14 10:40:00 [只看该作者]

'以下的代码是从"身份证号"里读取生日
If e.DataCol.Name = "身份证号" Then
    If e.DataRow.IsNull("身份证号") Then '如果没有输入身份证号
        e.DataRow("生日") = Nothing '则清空生日
    Else
        '否则计算生日
        e.DataRow("生日") = ReadBirthDay (e.DataRow("身份证号"))
    End If
End If


这代码错在哪里,求助

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


加好友 发短信
等级:超级版主 帖子:110738 积分:563610 威望:0 精华:9 注册:2015/6/24 9:21:00
  发帖心情 Post By:2020/5/14 10:53:00 [只看该作者]

判断身份证是否正确

If e.DataCol.Name = "身份证号" Then
    If e.DataRow.IsNull("身份证号") orelse ValidPIN(e.DataRow("身份证号")) = false Then '如果没有输入身份证号
        e.DataRow("生日") = Nothing '则清空生日
    Else 
        '否则计算生日
        e.DataRow("生日") = ReadBirthDay (e.DataRow("身份证号"))
    End If
End If

 回到顶部