以文本方式查看主题

-  Foxtable(狐表)  (http://foxtable.net/bbs/index.asp)
--  专家坐堂  (http://foxtable.net/bbs/list.asp?boardid=2)
----  [讨论] Ukey 设置问题  (http://foxtable.net/bbs/dispbbs.asp?boardid=2&id=85539)

--  作者:倪惠明
--  发布时间:2016/5/27 17:02:00
--  [讨论] Ukey 设置问题
我购置了贵公司的Ukey 通过设置后,将ID拷贝到用户表的ID字段中,在使用本电脑时正常,但在其他电脑上却提示要插入用户Ukey,是不是有什么问题?
--  作者:大红袍
--  发布时间:2016/5/27 17:05:00
--  

你判断的代码是什么?写在哪里?


--  作者:倪惠明
--  发布时间:2016/5/27 17:10:00
--  
代码写在登录窗口的登录按钮中,代码为:
Dim UID As String = dr("UID")
If UID > "" Then
    If UKey.Start = False OrElse UID <> UKey.UID  Then
        MessageBox.show("请插上登录用户的UKey!","提示",MessageBoxButtons.OK,MessageBoxIcon.Information)
        Return
    End If
End If


--  作者:大红袍
--  发布时间:2016/5/27 17:12:00
--  

弹出下面的值看看

 

msgbox(ukey.start)

msgbox(uid & " " & ukey.uid & " ")

 


--  作者:倪惠明
--  发布时间:2016/5/27 17:14:00
--  
谢谢,先试试再请教。