二代身份证读卡器二次开发代码.pdf

二代身份证读卡器二次开发代码（通用）
本开发代码用 vb 编写经测试可以兼容现有的大部份二代身份证读卡器，使用本控件前请先安装二代身份证读卡器的驱程，
本控件用于网页开发。

进入 vb 新建工程 activex 控件，需要下图部件，这个是 ftp 部件。



做法右击左面工具 选部件就可以出现上图。

本控件只提供两个对外函数接口
（1）hx_IDname( ) 读身份证主函数接口没有参数，有返回值。
（2）toftp(urln, file) 上传照片到 ftp 服务器，照片以身份证号保存，参数 1 服器的 url，参数 2 上传后的文件名称。
没有返回值。



Private Declare Function GetBmp Lib "c:\windows\system32\" (ByVal photo As String, ByVal xk As Integer) As Long
Private Declare Function SDT_OpenPort Lib "c:\windows\system32\" (ByVal usbport As Long) As Long
Private Declare Function SDT_ClosePort Lib "c:\windows\system32\" (ByVal usbport1 As Long) As Long
Private Declare Function SDT_StartFindIDCard Lib "c:\windows\system32\" (ByVal X1 As Long, ByVal mf1 As String,
ByVal Y1 As Long) As Long
Private Declare Function SDT_SelectIDCard Lib "c:\windows\system32\" (ByVal X2 As Long, ByVal mf2 As String,
ByVal Y2 As Long) As Long
Private Declare Function SDT_ReadBaseMsg Lib "c:\windows\system32\" (ByVal X As Integer, ByRef mf As Byte,
ByRef ml As Long, ByRef pf As Byte, ByRef pl As Long, ByVal Y As Integer) A