中控指纹认证

版本SDK5.0

       [DllImport("Match.dll")]
        static extern bool process(string a, string b);
        protected void Page_Load(object sender, EventArgs e)
        {
            if (!IsPostBack)
            {
                if (!string.IsNullOrEmpty(Request.Form["finger"]))
                {

                    
                    //var fpProcess = new FPCom.FPProcess();
                    foreach (var T in new BLL.UserFingerBLL().GetAllFinger())
                    {
                        //IntPtr fingerinfo = Marshal.StringToHGlobalAnsi(T.FingerTemplate);
                        Response.Write(process(T.FingerTemplate, Request.Form["finger"]) + "<br/>");
                    }
                    Response.Write(Request.Form["finger"]);
                }
            }
        }

  说明,Match.dll版本最后是在SDK包中提出,否则程序会出错。

转载于:https://www.cnblogs.com/yibinboy/p/3867944.html

  • 0
    点赞
  • 0
    收藏
    觉得还不错? 一键收藏
  • 0
    评论
VB 一对一 Attribute VB_Name = "Form1" Attribute VB_GlobalNameSpace = False Attribute VB_Creatable = False Attribute VB_PredeclaredId = True Attribute VB_Exposed = False Option Explicit Dim FTempLen As Integer Dim FRegTemplate As Variant Dim FingerCount As Long Dim FMatchType As Integer Private Declare Function MessageBox Lib "user32" Alias "MessageBoxA" (ByVal hwnd As Long, ByVal lpText As String, ByVal lpCaption As String, ByVal wType As Long) As Long Private Sub cmdEnroll_Click() If Trim(TextFingerName.Text) = "" Then MessageBox 0, "请输入指纹名称标识!", "错误", 0 Exit Sub End If ZKFPEngX1.BeginEnroll StatusBar.Caption = "开始登记" End Sub Private Sub cmdIdentify_Click() If ZKFPEngX1.IsRegister Then ZKFPEngX1.CancelEnroll End If StatusBar.Caption = "开始比对(1:N)" FMatchType = 2 End Sub Private Sub cmdInit_Click() If ZKFPEngX1.InitEngine = 0 Then MessageBox 0, "初始化成功!", "提示信息", 0 StatusBar.Caption = "指纹仪连接" TextSensorCount.Text = ZKFPEngX1.SensorCount & "" TextSensorIndex.Text = ZKFPEngX1.SensorIndex & "" TextSensorSN.Text = ZKFPEngX1.SensorSN cmdInit.Enabled = False FMatchType = 0 End If End Sub Private Sub cmdReadMemory_Click() Dim i, p1 As Long, p2 As Long Dim p As Variant Dim s As String p1 = 0 p2 = 23 ZKFPEngX1.DongleMemRead p1, p2, p s = "" For i = LBound(p) To UBound(p) s = s & Chr(p(i)) Next TextRead.Text = s End Sub Private Sub cmdSaveMemory_Click() Dim p1 As Long, p2 As Long Dim p() As Byte Dim i As Integer Dim s As String p1 = 0 p2 = Len(TextWrite.Text) s = TextWrite.Text ReDim p(Len(s)) For i = 0 To Len(s) - 1 p(i) = Asc(Mid(s, i + 1)) Next ZKFPEngX1.DongleMemWrite p1, p2, p End Sub Private Sub cmdSaveImage_Click() Dim sFileName As String sFileName = "C:\Fingerprint" If OptionBmp.Value Then ZKFPEngX1.SaveBitmap sFileName & ".bmp" Else ZKFPEngX1.SaveJPG sFileName + ".jpg" End If MessageBox 0, "文件保存成功(" + sFileName + ")!", "", 0 End Sub Private Sub cmdVerify_Click() If ZKFPEngX1.IsRegister Then ZKFPEngX1.CancelEnroll End If ZKFPEngX1.BeginCapture StatusBar.Caption = "开始比对(1:1)" FMatchType = 1 End Sub Private Sub Form_Load() FingerCount = 0 End Sub Private Sub ZKFPEngX1_OnCapture(ByVal ActionResult As Boolean, ByVal ATemplate As Variant) Dim fi As Long, i As Long Dim Score As Long, ProcessNum As Long Dim RegChanged As Boolean Dim sTemp As String sTemp = ZKFPEngX1.EncodeTemplate1(ATemplate) ATemplate = ZKFPEngX1.DecodeTemplate1(sTemp) StatusBar.Caption = "取得指纹特征" If FMatchType = 1 Then '1:1 If ZKFPEngX1.VerFinger(FRegTemplate, ATemplate, False, RegChanged) Then MessageBox 0, "指纹比对成功!", "信息提示", 0 Else MessageBox 0, "指纹比对失败!", "信息提示", 0 End If 'If ZKFPEngX1.VerRegFingerFile("c:\fingerprint.tpl", ATemplate) Then ' MessageBox 0, "文件指纹比对成功!", "信息提示", 0 'Else ' MessageBox 0, "文件指纹比对失败!", "信息提示", 0 'End If End If End Sub Private Sub ZKFPEngX1_OnEnroll(ByVal ActionResult As Boolean, ByVal ATemplate As Variant) Dim i As Long If Not ActionResult Then MessageBox 0, "指纹登记失败!", "警告", 0 Else MessageBox 0, "指纹登记成功!", "信息", 0 FRegTemplate = ATemplate ZKFPEngX1.SaveTemplate "c:\fingerprint.tpl", ATemplate FingerCount = FingerCount + 1 End If End Sub Private Sub ZKFPEngX1_OnFeatureInfo(ByVal AQuality As Long) Dim sTemp As String sTemp = "" If ZKFPEngX1.IsRegister Then sTemp = "登记状态: 还需要按压" & ZKFPEngX1.EnrollIndex & "次手指!" End If sTemp = sTemp & " 指纹质量" If AQuality <> 0 Then sTemp = sTemp & "不合格: " & AQuality Else sTemp = sTemp & "合格" End If StatusBar.Caption = sTemp End Sub Private Sub ZKFPEngX1_OnImageReceived(AImageValid As Boolean) ZKFPEngX1.PrintImageAt hDC, FrameCommands.Width + 6, FrameCommands.Top, ZKFPEngX1.ImageWidth, ZKFPEngX1.ImageHeight End Sub
评论
添加红包

请填写红包祝福语或标题

红包个数最小为10个

红包金额最低5元

当前余额3.43前往充值 >
需支付:10.00
成就一亿技术人!
领取后你会自动成为博主和红包主的粉丝 规则
hope_wisdom
发出的红包
实付
使用余额支付
点击重新获取
扫码支付
钱包余额 0

抵扣说明:

1.余额是钱包充值的虚拟货币,按照1:1的比例进行支付金额的抵扣。
2.余额无法直接购买下载,可以购买VIP、付费专栏及课程。

余额充值