Dim dlg As New OpenFileDialog '定义一个新的OpenFileDialog
dlg.Filter = "图像文件|*.jpg" '设置筛选器
If dlg.ShowDialog = DialogResult.OK Then '如果用户单击了确定按钮
Dim IdCard As New Ocr_Driver_License
IdCard.AppCode = "0e97ae6d0a4d435883ba5a678f243da2"
Dim bit As New Bitmap(dlg.FileName)
Dim info As Ocr_Driver_License.Info = IdCard.Get(bit)
If info.success Then '识别流程是否出现异常, false表示识别失败,true表示识别成功, 类型为布尔型
With info
OutPut.Show(.name) '识别的驾驶证姓名, 类型为字符串
OutPut.Show(.num) '识别的身份证号码, 类型为字符串
OutPut.Show(.vehicle_type) '准驾车型, 类型为字符串
OutPut.Show(.start_date) '驾驶证有效期开始时间, 类型为字符串
OutPut.Show(.end_date) '驾驶证有效期截止时间/有效时长,具体由驾驶证内容决定, 类型为字符串
End With
End If
End If
| 属性名 |
描述 |
| name |
识别的驾驶证姓名， 类型为字符串 |
| num |
识别的身份证号码， 类型为字符串 |
| vehicle_type |
准驾车型， 类型为字符串 |
| start_date |
驾驶证有效期开始时间， 类型为字符串 |
| end_date |
驾驶证有效期截止时间/有效时长，具体由驾驶证内容决定， 类型为字符串 |
| success |
识别流程是否出现异常， false表示识别失败，true表示识别成功， 类型为布尔型 |
为了方便大家，特提供了2张虚拟的身份证照片，供大家测试使用
此主题相关图片如下：drive_license_example (1).jpg
加好友 
发短信
Post By：2016/11/12 14:08:00 [显示全部帖子]
