婷婷综合国产,91蜜桃婷婷狠狠久久综合9色 ,九九九九九精品,国产综合av

主頁 > 知識庫 > vbscript和javascript版的15位, 18位的身份證號碼的驗證函數.以及根據身份證取省份,生日,性別

vbscript和javascript版的15位, 18位的身份證號碼的驗證函數.以及根據身份證取省份,生日,性別

熱門標簽:合肥高德地圖標注 拉薩外呼系統業務 外呼系統免費招代理 怎么看地圖標注 深圳外呼系統收費 百度地圖標注是什么意思 外呼線路中繼線是什么 外呼系統telrobot 廣州ai電銷機器人一般多少錢
工作中需要用到身份證驗證,還要支持檢查15位和18位。
我一時手懶,問同事有沒有現成的函數可用,同事google了一下,扔給我一個 asp-vbscript版本的函數。
可我這邊是客戶端javascript呀,于是用改 vbs-->js
改完發現蠻好用的,同時發現 vbscript真的很啰嗦,居然寫了50多行,我改成js 只用了11行。
當然,我并完全是指vbscript啰嗦,那個寫這段vbs代碼的無名氏也是個唐僧性格.....

先放出 vbscript代碼,   
復制代碼 代碼如下:

script language="vbscript"> 

'功能:檢查身份證號碼 
Function CheckCardId(e)  
    arrVerifyCode = Split("1,0,x,9,8,7,6,5,4,3,2", ",")  
    Wi = Split("7,9,10,5,8,4,2,1,6,3,7,9,10,5,8,4,2", ",")  
    Checker = Split("1,9,8,7,6,5,4,3,2,1,1", ",")  

    If Len(e)  15 Or Len(e) = 16 Or Len(e) = 17 Or Len(e) > 18 Then  
        CheckCardId= "身份證號共有 15 碼或18位"  
        CheckCardId = False  
        Exit Function  
    End If  

    Dim Ai  
    If Len(e) = 18 Then  
        Ai = Mid(e, 1, 17)  
    ElseIf Len(e) = 15 Then  
        Ai = e  
        Ai = Left(Ai, 6)  "19"  Mid(Ai, 7, 9)  
    End If  

    If Not IsNumeric(Ai) Then  
        CheckCardId= "身份證除最后一位外,必須為數字!"          
        Exit Function  
    End If  
    Dim strYear, strMonth, strDay  
    strYear = CInt(Mid(Ai, 7, 4))  
    strMonth = CInt(Mid(Ai, 11, 2))  
    strDay = CInt(Mid(Ai, 13, 2))  
    BirthDay = Trim(strYear) + "-" + Trim(strMonth) + "-" + Trim(strDay)  
    If IsDate(BirthDay) Then  
        If DateDiff("yyyy",Now,BirthDay)-140 or cdate(BirthDay)>date() Then          
            CheckCardId= "身份證輸入錯誤!"  
            Exit Function  
        End If  
        If strMonth > 12 Or strDay > 31 Then  
            CheckCardId= "身份證輸入錯誤!"  
            Exit Function  
        End If  
    Else  
        CheckCardId= "身份證輸入錯誤!"  
        Exit Function  
    End If  
    Dim i, TotalmulAiWi  
    For i = 0 To 16  
        TotalmulAiWi = TotalmulAiWi + CInt(Mid(Ai, i + 1, 1)) * Wi(i)  
    Next  
    Dim modValue  
    modValue = TotalmulAiWi Mod 11  
    Dim strVerifyCode  
    strVerifyCode = arrVerifyCode(modValue)  
    Ai = Ai  strVerifyCode   
    CheckCardId = Ai 

    If Len(e) = 18 And e > Ai Then  
        CheckCardId= "身份證輸入錯誤!"  
        Exit Function  
    End If  
End Function  
/script> 

再放出 javascript版本代碼
復制代碼 代碼如下:

function checkId(pId){ 
//檢查身份證號碼 Go_Rush(阿舜) from http://ashun.cnblogs.com 

    var arrVerifyCode = [1,0,"x",9,8,7,6,5,4,3,2]; 
    var Wi = [7,9,10,5,8,4,2,1,6,3,7,9,10,5,8,4,2]; 
    var Checker = [1,9,8,7,6,5,4,3,2,1,1]; 

    if(pId.length != 15  pId.length != 18)    return "身份證號共有 15 碼或18位"; 

    var Ai=pId.length==18 ?  pId.substring(0,17)   :   pId.slice(0,6)+"19"+pId.slice(6,16); 

    if (!/^\d+$/.test(Ai))  return "身份證除最后一位外,必須為數字!"; 

    var yyyy=Ai.slice(6,10) ,  mm=Ai.slice(10,12)-1  ,  dd=Ai.slice(12,14); 

    var d=new Date(yyyy,mm,dd) ,  now=new Date(); 
     var year=d.getFullYear() ,  mon=d.getMonth() , day=d.getDate(); 

    if (year!=yyyy || mon!=mm || day!=dd || d>now || year1940) return "身份證輸入錯誤!"; 

    for(var i=0,ret=0;i17;i++)  ret+=Ai.charAt(i)*Wi[i];     
    Ai+=arrVerifyCode[ret %=11];      

    return pId.length ==18  pId != Ai?"身份證輸入錯誤!":Ai;         
}; 

至于身份證算法的原理,請參閱:  http://www.google.com/

最后,根據身份證號碼取  省份,生日,性別就很簡單了
復制代碼 代碼如下:

script language="javascript"> 
var id="342201570202003"  

//根據身份證取 省份,生日,性別  Go_Rush(阿舜) from http://ashun.cnblogs.com/ 
function getInfo(id){ 
    var arr=[null,null,null,null,null,null,null,null,null,null,null,"北京","天津","河北","山西","內蒙古" 
             ,null,null,null,null,null,"遼寧","吉林","黑龍江",null,null,null,null,null,null,null,"上海" 
             ,"江蘇","浙江","安微","福建","江西","山東",null,null,null,"河南","湖北","湖南","廣東","廣西","海南" 
             ,null,null,null,"重慶","四川","貴州","云南","西藏",null,null,null,null,null,null,"陜西","甘肅" 
             ,"青海","寧夏","新疆",null,null,null,null,null,"臺灣",null,null,null,null,null,null,null,null 
             ,null,"香港","澳門",null,null,null,null,null,null,null,null,"國外"] 
    id=checkId(id) 
    if (isNaN(id)) return "錯誤的身份證號碼"     
    var id=String(id),  prov=arr[id.slice(0,2)]  ,  sex=id.slice(14,17)%2?  "男" : "女" 
    var birthday=(new Date(id.slice(6,10) , id.slice(10,12)-1 , id.slice(12,14))).toLocaleDateString()  
    return [prov,birthday,sex]   


alert(getInfo(id))  
/script> 

上面的代碼只能取到省份,要取到具體城市,請看我的另外一個隨筆,
代碼只拿我和幾個同事的身份證號碼測了一下,如果有Bug,請指出

您可能感興趣的文章:
  • JavaScript正則表達式驗證身份證號碼是否合法(兩種方法)
  • JS使用正則表達式驗證身份證號碼
  • Javascript使用正則驗證身份證號(簡單)
  • JS支持帶x身份證號碼驗證函數
  • js實現二代身份證號碼驗證詳解
  • javascript驗證身份證號
  • 15位和18位身份證JS校驗的簡單實例
  • 如何用javascript正則表達式驗證身份證號碼是否合法
  • JS正則表達式完美實現身份證校驗功能
  • javascript身份證驗證代碼
  • JS實現的檢驗身份證格式并輸出出生日期,年齡,性別,出生地示例

標簽:玉林 延安 六安 廣安 漳州 周口 嘉興 臺灣

巨人網絡通訊聲明:本文標題《vbscript和javascript版的15位, 18位的身份證號碼的驗證函數.以及根據身份證取省份,生日,性別》,本文關鍵詞  vbscript,和,javascript,版的,;如發現本文內容存在版權問題,煩請提供相關信息告之我們,我們將及時溝通與處理。本站內容系統采集于網絡,涉及言論、版權與本站無關。
  • 相關文章
  • 下面列出與本文章《vbscript和javascript版的15位, 18位的身份證號碼的驗證函數.以及根據身份證取省份,生日,性別》相關的同類信息!
  • 本頁收集關于vbscript和javascript版的15位, 18位的身份證號碼的驗證函數.以及根據身份證取省份,生日,性別的相關信息資訊供網民參考!
  • 推薦文章
    婷婷综合国产,91蜜桃婷婷狠狠久久综合9色 ,九九九九九精品,国产综合av
    91蜜桃网址入口| 99久久伊人精品| 成人夜色视频网站在线观看| 色综合av在线| 日韩亚洲欧美综合| 精品乱人伦小说| 天堂久久一区二区三区| 国产真实乱对白精彩久久| 色婷婷av一区二区三区gif| 久久国产麻豆精品| 91香蕉视频mp4| 制服丝袜中文字幕亚洲| 久久久精品天堂| 日韩无一区二区| 欧美体内she精视频| 日韩免费观看2025年上映的电影| 亚洲三级在线看| 99视频一区二区三区| 国产精品你懂的在线欣赏| 国产一区不卡精品| 久久免费电影网| 国产九色精品成人porny| 日本一区二区三区四区在线视频| 久久精品国产**网站演员| 精品女同一区二区| 国产精品一二三四| 国产精品久久久久永久免费观看 | 久久99久久精品| 欧美日韩国产一区二区三区地区| 国产**成人网毛片九色| 欧美日韩国产精品自在自线| 日韩中文字幕一区二区三区| 欧美国产1区2区| 久久久99精品免费观看不卡| 麻豆91在线播放| 久久免费看少妇高潮| 99re这里都是精品| 日韩—二三区免费观看av| 3d成人动漫网站| 欧美影视一区在线| 成人网页在线观看| 免费观看一级欧美片| 91精品国产手机| 93久久精品日日躁夜夜躁欧美| 国产一区二区三区高清播放| 偷拍自拍另类欧美| 一区二区三区高清| 综合分类小说区另类春色亚洲小说欧美| 欧美一个色资源| 色综合色狠狠综合色| 国产精品18久久久久久久久久久久 | 国产盗摄视频一区二区三区| 亚洲一区二区三区美女| 久久九九久精品国产免费直播| 在线欧美小视频| 不卡影院免费观看| 国产一区二区导航在线播放| 青青草伊人久久| 日韩高清国产一区在线| 亚洲乱码国产乱码精品精的特点 | 粉嫩蜜臀av国产精品网站| 国产精品天干天干在线综合| 国产大片一区二区| 成人黄色软件下载| 国产成人精品网址| 日本aⅴ免费视频一区二区三区| 国产日韩欧美制服另类| 欧美精品aⅴ在线视频| 在线亚洲高清视频| 欧美羞羞免费网站| 在线免费不卡视频| 在线精品视频一区二区三四| 99国产精品久久| 免费看欧美美女黄的网站| 日韩视频一区二区| 国产精品激情偷乱一区二区∴| 国产日韩成人精品| 亚洲欧洲精品成人久久奇米网| 国产很黄免费观看久久| 久久成人免费日本黄色| 粉嫩av一区二区三区| 成人黄色小视频| 日韩欧美一二三| 精品国产乱码久久久久久夜甘婷婷 | 国产精品区一区二区三| 亚洲狠狠丁香婷婷综合久久久| 秋霞午夜av一区二区三区| 成人午夜精品在线| 欧美丰满美乳xxx高潮www| 欧美精选一区二区| 国产嫩草影院久久久久| 亚洲电影欧美电影有声小说| 免费视频最近日韩| 91在线码无精品| 国产亚洲精品精华液| 日韩av在线发布| 欧美婷婷六月丁香综合色| 久久久国产综合精品女国产盗摄| 亚洲午夜激情网页| 成人免费看片app下载| 精品久久久久久综合日本欧美 | 日韩一区二区三区免费看| 国产精品视频yy9299一区| 国产一区二三区好的| 中文字幕第一区二区| 成人免费毛片aaaaa**| 亚洲主播在线播放| 精品婷婷伊人一区三区三| 亚洲国产精品精华液网站| 91亚洲精品久久久蜜桃| 国产精品美日韩| 日本高清不卡视频| 中文字幕在线不卡| 色久综合一二码| 一区二区三区欧美激情| 欧美肥妇free| 丁香婷婷综合色啪| 亚洲一区在线免费观看| 欧美日韩美少妇| 国产成人精品免费在线| 亚洲欧美日韩国产手机在线| 欧美色精品在线视频| 丝袜亚洲精品中文字幕一区| 精品久久一区二区| 中文字幕电影一区| 亚洲成av人片| 亚洲18女电影在线观看| 日本91福利区| 久久国产尿小便嘘嘘| 国产一区二区三区四区五区入口 | 亚洲成a人片综合在线| 亚洲欧美一区二区三区孕妇| 亚洲欧美偷拍另类a∨色屁股| 欧美一区二区三区四区高清 | 日韩精品视频网| 亚洲精选一二三| 风间由美一区二区av101| 成人h动漫精品一区二| 色婷婷综合久久| 欧美中文字幕不卡| 国产激情91久久精品导航 | 成人天堂资源www在线| 国产中文字幕精品| 日韩激情视频网站| 日韩成人av影视| 国产成人一区二区精品非洲| 日本色综合中文字幕| 看片的网站亚洲| 久久99精品国产.久久久久久| 日韩不卡在线观看日韩不卡视频| 亚洲成av人片一区二区三区| 亚洲国产精品自拍| 午夜久久久影院| 麻豆视频观看网址久久| 91黄色免费观看| 日韩免费高清av| 17c精品麻豆一区二区免费| 亚洲综合免费观看高清完整版在线| 亚洲一区二区av在线| 美腿丝袜亚洲三区| 波多野结衣亚洲| 久久品道一品道久久精品| 1区2区3区国产精品| 麻豆精品久久久| 91在线视频免费观看| 777a∨成人精品桃花网| 欧美国产日韩在线观看| 国产伦精品一区二区三区免费迷 | 亚洲综合图片区| 免费成人结看片| 日韩三级视频在线观看| 亚洲国产精品久久人人爱| 99视频精品免费视频| 久久久五月婷婷| 亚洲成人动漫精品| 色婷婷国产精品久久包臀 | 国产欧美精品一区二区色综合 | 蜜臀久久久久久久| 91尤物视频在线观看| 亚洲一区二区四区蜜桃| 国产激情视频一区二区三区欧美| 欧美日韩三级视频| 国产一区欧美日韩| 亚洲自拍都市欧美小说| 久久久一区二区三区捆绑**| 久久国产精品第一页| 国产精品美日韩| 欧美日韩五月天| 91在线观看美女| 美女免费视频一区二区| 国产精品久久久久久久久免费相片| 国产成人精品一区二| 日本一二三不卡| 欧美色视频在线| 成人成人成人在线视频| 亚洲一区二区三区三| 日本一区二区三区久久久久久久久不 | eeuss影院一区二区三区| 日韩精品视频网| 亚洲已满18点击进入久久|