专家坐堂-红袍大师~！！！Foxtable(狐表) - 新一代数据库软件，完美融合Access、Foxpro、Excel、vb.net之优势，人人都能掌握的快速软件开发工具!

以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.com/bbs/index.asp)
--  专家坐堂  (http://foxtable.com/bbs/list.asp?boardid=2)
----  红袍大师~！！！  (http://foxtable.com/bbs/dispbbs.asp?boardid=2&id=72377)

--  作者：bestorange
--  发布时间：2015/7/29 13:22:00
--  红袍大师~！！！

大师大师，之前我发的那个实例按您说的用visual studio 打开以后就是这些代码

我就一段一段改成狐表的语言就行是吧？

在项目中是不是要先更改些设置什么的？？？就比如说我现在的这个项目，用指纹代替教师签到那个窗口，我该怎么代入呢？？

指纹识别这个东东真不是想象中那么简单。。。~

Public Class Form1
    Inherits System.Windows.Forms.Form

    Dim FRegTemplate As Object
    Dim FMatchType As Integer
    Dim FID As Integer
    Dim fpcHandle As Integer

#Region " Windows 窗体设计器生成的代码 "

    Public Sub New()
        MyBase.New()

        \'该调用是 Windows 窗体设计器所必需的。
        InitializeComponent()

        \'在 InitializeComponent() 调用之后添加任何初始化

    End Sub

    \'窗体重写 dispose 以清理组件列表。
    Protected Overloads Overrides Sub Dispose(ByVal disposing As Boolean)
        If disposing Then
            If Not (components Is Nothing) Then
                components.Dispose()
            End If
        End If
        MyBase.Dispose(disposing)
    End Sub

    \'Windows 窗体设计器所必需的
    Private components As System.ComponentModel.IContainer

    \'注意: 以下过程是 Windows 窗体设计器所必需的
    \'可以使用 Windows 窗体设计器修改此过程。
    \'不要使用代码编辑器修改它。
    Friend WithEvents AxZKFPEngX1 As AxZKFPEngXControl.AxZKFPEngX
    Friend WithEvents btnInit As System.Windows.Forms.Button
    Friend WithEvents btnEnroll As System.Windows.Forms.Button
    Friend WithEvents btnVerify As System.Windows.Forms.Button
    Friend WithEvents btnIdentify As System.Windows.Forms.Button
    Friend WithEvents Button1 As System.Windows.Forms.Button
    Friend WithEvents TextBox1 As System.Windows.Forms.TextBox
    Friend WithEvents StatusBar1 As System.Windows.Forms.StatusBar
    Friend WithEvents PictureBox1 As System.Windows.Forms.PictureBox
    <System.Diagnostics.DebuggerStepThrough()> Private Sub InitializeComponent()
        Dim resources As System.Resources.ResourceManager = New System.Resources.ResourceManager(GetType(Form1))
        Me.AxZKFPEngX1 = New AxZKFPEngXControl.AxZKFPEngX
        Me.btnInit = New System.Windows.Forms.Button
        Me.btnEnroll = New System.Windows.Forms.Button
        Me.btnVerify = New System.Windows.Forms.Button
        Me.btnIdentify = New System.Windows.Forms.Button
        Me.Button1 = New System.Windows.Forms.Button
        Me.TextBox1 = New System.Windows.Forms.TextBox
        Me.StatusBar1 = New System.Windows.Forms.StatusBar
        Me.PictureBox1 = New System.Windows.Forms.PictureBox
        CType(Me.AxZKFPEngX1, System.ComponentModel.ISupportInitialize).BeginInit()
        Me.SuspendLayout()
        \'
        \'AxZKFPEngX1
        \'
        Me.AxZKFPEngX1.Enabled = True
        Me.AxZKFPEngX1.Location = New System.Drawing.Point(504, 24)
        Me.AxZKFPEngX1.Name = "AxZKFPEngX1"
        Me.AxZKFPEngX1.OcxState = CType(resources.GetObject("AxZKFPEngX1.OcxState"), System.Windows.Forms.AxHost.State)
        Me.AxZKFPEngX1.Size = New System.Drawing.Size(24, 24)
        Me.AxZKFPEngX1.TabIndex = 0
        \'
        \'btnInit
        \'
        Me.btnInit.Location = New System.Drawing.Point(376, 56)
        Me.btnInit.Name = "btnInit"
        Me.btnInit.Size = New System.Drawing.Size(80, 24)
        Me.btnInit.TabIndex = 1
        Me.btnInit.Text = "初始化"
        \'
        \'btnEnroll
        \'
        Me.btnEnroll.Location = New System.Drawing.Point(376, 120)
        Me.btnEnroll.Name = "btnEnroll"
        Me.btnEnroll.Size = New System.Drawing.Size(80, 24)
        Me.btnEnroll.TabIndex = 2
        Me.btnEnroll.Text = "登记指纹"
        \'
        \'btnVerify
        \'
        Me.btnVerify.Location = New System.Drawing.Point(376, 192)
        Me.btnVerify.Name = "btnVerify"
        Me.btnVerify.Size = New System.Drawing.Size(96, 24)
        Me.btnVerify.TabIndex = 3
        Me.btnVerify.Text = "比对指纹 1:1"
        \'
        \'btnIdentify
        \'
        Me.btnIdentify.Location = New System.Drawing.Point(488, 192)
        Me.btnIdentify.Name = "btnIdentify"
        Me.btnIdentify.Size = New System.Drawing.Size(96, 24)
        Me.btnIdentify.TabIndex = 4
        Me.btnIdentify.Text = "比对指纹 1:N"
        \'
        \'Button1
        \'
        Me.Button1.Location = New System.Drawing.Point(512, 56)
        Me.Button1.Name = "Button1"
        Me.Button1.TabIndex = 5
        Me.Button1.Text = "释放设备"
        \'
        \'TextBox1
        \'
        Me.TextBox1.Location = New System.Drawing.Point(488, 120)
        Me.TextBox1.Name = "TextBox1"
        Me.TextBox1.TabIndex = 6
        Me.TextBox1.Text = "TextBox1"
        \'
        \'StatusBar1
        \'
        Me.StatusBar1.Location = New System.Drawing.Point(0, 336)
        Me.StatusBar1.Name = "StatusBar1"
        Me.StatusBar1.Size = New System.Drawing.Size(648, 22)
        Me.StatusBar1.TabIndex = 7

--  作者：大红袍
--  发布时间：2015/7/29 14:15:00
--

1、vs里面的项目，先运行成功；

2、拷贝vs项目debug里面的dll文件出来，在foxtable引用 http://www.foxtable.com/help/topics/1936.htm

3、看懂form各个功能的代码，放到foxtable来测试。

--  作者：狐狸爸爸
--  发布时间：2015/7/29 14:32:00
--
为啥不用系统自带的指纹识别功能？

--  作者：bestorange
--  发布时间：2015/7/29 14:34:00
--
未处理System.InvalidOperationException
Message=创建窗体时出错。有关详细信息，请参阅 Exception.InnerException。错误为: 没有注册类 (异常来自 HRESULT:0x80040154 (REGDB_E_CLASSNOTREG))
Source=VB.Net
StackTrace:
       在 VB.Net.My.MyProject.MyForms.Create__Instance__[T](T Instance) 位置 17d14f5c-a337-4978-8281-53493378c1071.vb:行号 190
       在 VB.Net.My.MyProject.MyForms.get_Form1()
       在 VB.Net.Form1.Main() 位置 F:\\oldfile\\uruSDK\\uru4000B\\zbd\\Biokey SDK3.8 标准版\\Biokey SDK3.8 标准版\\VB.Net\\VB.Net\\VB.Net\\Form1.vb:行号 1
       在 System.AppDomain._nExecuteAssembly(Assembly assembly, String[] args)
       在 Microsoft.VisualStudio.HostingProcess.HostProc.RunUsersAssembly()
       在 System.Threading.ExecutionContext.Run(ExecutionContext executionContext, ContextCallback callback, Object state)
       在 System.Threading.ThreadHelper.ThreadStart()
InnerException: System.Runtime.InteropServices.COMException
       ErrorCode=-2147221164
       Message=没有注册类 (异常来自 HRESULT:0x80040154 (REGDB_E_CLASSNOTREG))
       Source=System.Windows.Forms
       StackTrace:
            在 System.Windows.Forms.UnsafeNativeMethods.CoCreateInstance(Guid& clsid, Object punkOuter, Int32 context, Guid& iid)
            在 System.Windows.Forms.AxHost.CreateWithoutLicense(Guid clsid)
            在 System.Windows.Forms.AxHost.CreateWithLicense(String license, Guid clsid)
            在 System.Windows.Forms.AxHost.CreateInstanceCore(Guid clsid)
            在 System.Windows.Forms.AxHost.CreateInstance()
            在 System.Windows.Forms.AxHost.GetOcxCreate()
            在 System.Windows.Forms.AxHost.TransitionUpTo(Int32 state)
            在 System.Windows.Forms.AxHost.CreateHandle()
            在 System.Windows.Forms.Control.CreateControl(Boolean fIgnoreVisible)
            在 System.Windows.Forms.Control.CreateControl(Boolean fIgnoreVisible)
            在 System.Windows.Forms.AxHost.EndInit()
            在 VB.Net.Form1.InitializeComponent() 位置 F:\\oldfile\\uruSDK\\uru4000B\\zbd\\Biokey SDK3.8 标准版\\Biokey SDK3.8 标准版\\VB.Net\\VB.Net\\VB.Net\\Form1.vb:行号 148
            在 VB.Net.Form1..ctor() 位置 F:\\oldfile\\uruSDK\\uru4000B\\zbd\\Biokey SDK3.8 标准版\\Biokey SDK3.8 标准版\\VB.Net\\VB.Net\\VB.Net\\Form1.vb:行号 16
       InnerException:

--  作者：大红袍
--  发布时间：2015/7/29 14:37:00
--
添加引用，引用debug里面的dll文件。

--  作者：bestorange
--  发布时间：2015/7/29 14:49:00
--

不是没有考虑过，跟客服咨询过一次，费用成本太高了。

我费尽写这个管理软件是用来赠送给下面的门店客户。客户数量有些多，So...

--  作者：狐狸爸爸
--  发布时间：2015/7/29 14:51:00
--
这根本就不是你能搞定的问题，你还差个十万八千里，还是踏踏实实用官方的指纹识别功能吧

--  作者：大红袍
--  发布时间：2015/7/29 14:52:00
--
要自己开发，肯定有难度。认认真真看人家给你的开发文档，一步一步做，做不了就花钱找别人帮你做

--  作者：bestorange
--  发布时间：2015/7/29 14:54:00
--
。。。红袍大师。我都服我自己了，在哪里添加引用？。。我
此主题相关图片如下：qq图片20150729145414.png
挨个看了一遍。。。还是不明白怎么操作。。。

--  作者：bestorange
--  发布时间：2015/7/29 14:56:00
--

下载信息  [文件大小：   下载次数： ]
点击浏览该文件:vb.net.rar

如果不是很麻烦的话，您能帮我弄到可以用FOXTABLE引用的程度吗？，然后我自己慢慢看教程参考自己导入