身份证15位转换成18位代码(vbscript)

今天论坛上有人要这个代码，有人转贴了个vb的，图方便就随便改写成了vbs的,并取消了1900年前的判断，希望原vb作者不要见怪。 如下： <" CODEPAGE="936"%> &lt

1using System; 2using System.Collections; 3 4public class MyClass 5{ 6 public static void Ma

一个将15的身份证号升为18位的函数(VB) 一个将15的身份证号升为18位的函数(VB) 在新旧身份证同时并存使用的情况下，最好将升位后的18位方式保存在数据库中

根据〖中华人民共和国国家标准 GB 11643-1999〗中有关公民身份号码的规定，公民身份号码是特征组合码，由十七位数字本体码和一位数字校验码组成。排列顺序从左至右依次为：六位数字地址码，八位数字出

<SCRIPT LANGUAGE="JavaScript"> <!-- var lastNumber; var id = "15位身份证号码"//15位身份证号码 var getNu

18位身份证标准在国家质量技术监督局于1999年7月1日实施的GB11643-1999《公民身份号码》中做了明确的规定。 GB11643-1999《公民身份号码》为GB11643-1989《社会保障号

身份证号码15位升18位 身份证18位验证 18位身份证标准在国家质量技术监督局于1999年7月1日实施的GB11643-1999《公民身份号码》中做了明确的规定。 GB11643-199

'将身份证从15位升级为18位的函数 Function GetNewIDCard(ByVal IDCard As String) As String Dim i, S

public static final String getNewId(String id) { final int [] W = { 7, 9, 10,

根据〖中华人民共和国国家标准 GB 11643-1999〗中有关公民身份号码的规定，公民身份号码是特征组合码，由十七位数字本体码和一位数字校验码组成。排列顺序从左至右依次为：六位数字地址码，八位数字出