爱问知识人 爱问教育 医院库

请VB高手帮下忙!谢谢

首页

请VB高手帮下忙!谢谢

我再做VB编写读写IC卡的程序。调用的是dcic32.dll。其他所有的函数都可以正常调用但是再核对第一扇区卡密码的时候出错。我的代码如下:那位大侠可以告诉我错在哪里了?


Dim uckey(6) As Byte

uckey(0) = &HA0
uckey(1) = &HA1
uckey(2) = &HA2
uckey(3) = &HA3
uckey(4) = &HA4
uckey(5) = &HA5

st = IC_Load_Key(icdev, 0, 0, uckey(6))   '装载1扇区的密码到读写器,这和后面要
If st <> 0 Then                                        '校验1扇区的密码是相对应的
      List1.AddItem ("调用 IC_Load_Key()函数出错!")
     Exit Sub
End If
List1.AddItem ("调用 IC_Load_Key()函数成功!")

sector = 0
st = IC_Authentication(icdev, 0, sector) '核对卡密码
If st <> 0 Then
     List1.AddItem "调用 IC_Authentication()函数出错!"
     Exit Sub
End If
List1.AddItem "调用 IC_Authentication()函数成功!"

提交回答
好评回答
  • 2009-03-03 14:51:22
    Dim uckey(5) As Byte 
    uckey(0) = &HA0 
    uckey(1) = &HA1 
    uckey(2) = &HA2 
    uckey(3) = &HA3 
    uckey(4) = &HA4 
    uckey(5) = &HA5 
    st = IC_Load_Key(icdev, 0, 0, uckey(5)) 

    z***

    2009-03-03 14:51:22

  • 程序设计 相关知识

  • 电脑网络技术
  • 电脑网络

相关推荐

正在加载...
最新资料 推荐信息 热门专题 热点推荐
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200

热点检索

  • 1-20
  • 21-40
  • 41-60
  • 61-80
  • 81-100
  • 101-120
  • 121-140
  • 141-160
  • 161-180
  • 181-200
返回
顶部
帮助 意见
反馈

确定举报此问题

举报原因(必选):