分站 简化版 股指 日历 影视
携程 地图 计算器 行情 电脑
空位 空位 空位 空位 空位
首页 软件 编程 网络 窍门 笑话 知识 公告 注册 登录 用QQ登录本站
全部 综合数码金融娱乐服务报刊政府机构 推荐 申请 友情  
您现在的位置:首页 >> ASP >> 内容

根据身份证自动获取出生年月日

内容摘要:'根据身份证获取出生年月日Function GetBirthday(str)Dim dtif len(str) = 15 then'注意:需要区分2000年出生的、2000年后出生的dt = DateSerial('19'Mid(str,7,2),Mid(str,9,2),Mid(str,11,2))elseif len(str) = 18 thendt =......

  '根据身份证获取出生年月日

function getbirthday(str)

dim dt

if len(str) = 15 then

'注意:需要区分2000年出生的、2000年后出生的

dt = dateserial("19" & mid(str,7,2),mid(str,9,2),mid(str,11,2))

elseif len(str) = 18 then

dt = dateserial(mid(str,7,4), mid(str, 11, 2), mid(str, 13, 2))

else

dt = cdate("1900-01-01")

end if

getbirthday = dt

end function

  版权声明:本内容来源于互联网,如有侵犯您的版权,请联系站长,本站收到您的信息后将及时处理。


发布日期:2017-8-31 发布时间:9:16:40 点击:14 
  • 上一篇:asp 中文乱码问题解决方法
  • 下一篇:ASP 微信公共平台接口实现代码
  • 本类新增
    本类热门文章
    Baidu
    壹 家 软 件 工 作 室(YiJia SoftWare Workroom) 齐天大圣® 制 作 ©2000-2017

    YJCMS V2.2 Build 17.09.12(MSSQL)
    闽ICP备05000814号-1
    本空间由景安网络(VPS)提供

    创宇云安全提供加速防护