求助——MSR605刷卡器接口程序开发?
时间:2011-12-25
来源:互联网
厂家提供了DLL接口动态链接库,在调用读取数据函数时,为什么一直没有返回信息呢?
刷卡成功,灯也显示正常,但是就是没有内容!
Private Sub Timer1_Timer()
Dim TK1Dat(10), TK2Dat(10), TK3Dat(10), temp(256) As String
Dim str, ch As String
Dim TrackLen As Integer
Dim stu, i, j As Integer
Dim tk1, tk2, tk3 As String
stu = 0
If CmdType = 1 Then
stu = MSR_Get_Read_Data(TK1Dat(10), TK2Dat(10), TK3Dat(10))
If stu <> 48 Then
MsgBox "A" & stu
Else
tk1 = tk1 + TK1Dat(10)
tk2 = tk2 + TK2Dat(10)
tk3 = tk3 + TK3Dat(10)
MsgBox "A" & tk1 & tk2 & tk3
CmdType = 0
End If
End If
刷卡成功,灯也显示正常,但是就是没有内容!
Private Sub Timer1_Timer()
Dim TK1Dat(10), TK2Dat(10), TK3Dat(10), temp(256) As String
Dim str, ch As String
Dim TrackLen As Integer
Dim stu, i, j As Integer
Dim tk1, tk2, tk3 As String
stu = 0
If CmdType = 1 Then
stu = MSR_Get_Read_Data(TK1Dat(10), TK2Dat(10), TK3Dat(10))
If stu <> 48 Then
MsgBox "A" & stu
Else
tk1 = tk1 + TK1Dat(10)
tk2 = tk2 + TK2Dat(10)
tk3 = tk3 + TK3Dat(10)
MsgBox "A" & tk1 & tk2 & tk3
CmdType = 0
End If
End If
作者: gmb_km1 发布时间: 2011-12-25
接口是串口的还是USB接口的?建议你但不调试,看看stu的值
作者: Veron_04 发布时间: 2011-12-25
相关阅读 更多
热门阅读
-
office 2019专业增强版最新2021版激活秘钥/序列号/激活码推荐 附激活工具
阅读:74
-
如何安装mysql8.0
阅读:31
-
Word快速设置标题样式步骤详解
阅读:28
-
20+道必知必会的Vue面试题(附答案解析)
阅读:37
-
HTML如何制作表单
阅读:22
-
百词斩可以改天数吗?当然可以,4个步骤轻松修改天数!
阅读:31
-
ET文件格式和XLS格式文件之间如何转化?
阅读:24
-
react和vue的区别及优缺点是什么
阅读:121
-
支付宝人脸识别如何关闭?
阅读:21
-
腾讯微云怎么修改照片或视频备份路径?
阅读:28