此主题相关图片如下：刷卡报错.jpg
我的开发平台：windows 10 64位
在会议管理软件中设置了会议前刷指纹钟签到，用开发电脑在现场测试无问题，用户在中控指纹钟刷卡，软件能响应出当前用户信息
现象：
但发布后，在另外一台 widows10 64 位的用户电脑上能正常启动刷卡功能；
但在别人的 Windows7 64位系统中运行，一启动刷卡功能就直接报告上图错误。
启动连接卡钟的事件代码如下：
Tables(e.Form.name & "_Table1").AllowEdit=False
Dim bst As WinForm.Button = e.Form.Controls("card_confim")
Dim dr As Row=Tables("dev_info").Current
Dim iMachineNumber As String=dr("dev_no")
If Vars("d_Key01")=0 Then '未启动刷卡
bIsConnected = axCZKEM1.Connect_Net(dr("dev_ip"), dr("dev_port")) '连接到IP地址所指的卡上
If bIsConnected=True Then
AxCZKEM1.ClearGLog(iMachineNumber) '先清除里面所有考勤记录
End If
Vars("d_Key01")=1
If bIsConnected=False Then '如果已经连接好,就把它断开
Else
If bIsConnected Then
e.Form.TimerEnabled=True '启动时时刷指纹
e.Form.TimerInterval=100
Tables(e.Form.name & "_Table1").AllowEdit=False
bst.text="...连机成功,正在签到中..."
bst.BackColor=Color.Lime
Else
bst.BackColor=Color.red
bst.text="设备连接失败"
messagebox.show("连接指纹器失败,请查相关设备连接状态!")
End If
End If
Else
Dim axCZKEM1 As New zkemkeeper.CZKEM
bst.text="签到结束"
Tables(e.Form.name & "_Table1").AllowEdit=True
bst.BackColor=Color.red
e.Form.TimerEnabled=False
Vars("d_Key01")=0
End If
[此贴子已经被作者于2020/1/14 13:35:56编辑过]
加好友 
发短信
Post By：2020/1/14 13:27:00 [显示全部帖子]
