如何在asp网页中识别使用身份证读卡器。CVR100U
发布网友
共5个回答
热心网友
软件安装过程 安装软件： 双击软件安装文件 CVR100U3.2_Setup.exe” ， “ 点击 ‘下一步’ ， 点击‘我接受’ ， 点击‘浏览’选择一个安装文件夹，默认安装目录是 C:\Program Files\CVR100U3.2\，然后点击‘安装’ ， 显示安装进度， 点击‘完成’ ，软件安装完毕。 软件自动在‘程序’组和桌面创建‘CVR-100U 阅读程序 V3.2 ’ 快捷方式。 安装 USB 阅读器驱动： （针对 CVR-100U） 首先接上 USB 二代证阅读器， 在桌面 ‘我的电脑’ 图标上点右键， 点‘属性’打开‘系统特性’窗口，从‘硬件’标签点‘设备管理器’ ， 在硬件列表中双击‘密码设备--SDT USB 设备’ ，若旁边显示感叹号则 双击设备重新安装驱动程序， 驱动程序默认在安装目录 C:\Program ‘ Files\CVR100U3.1\USB 阅读器驱动\ ’ 根据您的系统选择相应 .inf 下， 配置文件。 软件启动流程 首先将二代证阅读器连接计算机，并打开阅读器电源，电源指示 灯亮。双击桌面‘CVR-100U 3.2’软件快捷方式，出现阅读软件主界 面，软件自动检测二代证阅读器通讯接口类型，同时在状态栏显示阅 读器连接状态提示信息， 阅读器通讯指示灯不断闪烁， 等待用户放卡。 放卡后软件主界面显示第二代居民身份证内的个人身份信息； 软件启 动后，若自动连接阅读器失败，可以采用手动连接，按下工具栏的" 开始读卡"，软件将重新连接阅读器。本软件同时支持 USB 接口和 RS232 串口两种通讯接口类型的阅读器 。 !!!
热心网友
这是我自己在用的，一个身份证验证,不是用正值表达式的，不过也挺好用的，你试试看吧，直接调用就行了
<%
'验证身份证号是否正确的代码
Function IDCheck(e)
IDCheck = true
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
'IDCheck= "身份证号共有 15 码或18位"
IDCheck = 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
'IDCheck= "身份证除最后一位外，必须为数字！"
IDCheck = False
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
'IDCheck= "身份证输入错误！"
IDCheck = False
Exit Function
End If
If strMonth > 12 Or strDay > 31 Then
IDCheck = False
'IDCheck= "身份证输入错误！"
Exit Function
End If
Else
'IDCheck= "身份证输入错误！"
IDCheck = False
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
IDCheck = Ai
If Len(e) = 18 And e <> Ai Then
'IDCheck= "身份证号码输入错误！"
IDCheck = False
Exit Function
End If
End Function
%>
热心网友
要看看读卡器能读出点什么东西来，一般读卡器都有接口程序。
可以做成一个dll，加上数字签名后在web页面中调用。追问数字签名要再哪里下，官网没有啊。。。。
热心网友
身份证是磁卡，读卡怎么识别造假，不能识别造假，读卡又有何用 ，还是自己填吧，等到手机实名认证了，填手机号发确认短信就行了
热心网友
网页使用不了的！
