怎样从刷卡器上读取磁卡中得信息
解决方案 »
- vb 打印整个窗体的问题
- TReeView问题请教
- Intelement 在 VB 非技术类论坛发表的散分帖子(13)
- 刚才看了一篇文章"理解圆号在条件语句中的用途",其中写到if (aa>=21) and Lcheck 和if aa>21 and Lcheck二种写法有区别,我感觉都一样,
- VB如何实现对硬件的控制,或者实现和VxD的连接?
- 这样的菜单效果怎么做啊!!
- 缺少 MSWINSCK.OCX 安装自动注册
- leonfeni,问题已解决,答应给分!
- 怎样使下面单选的4个选项随机出现?最好帮忙弄一下代码!先谢谢啦!
- ★★★快来抢300分★★★:打开一个recordset(ado)对象后,如何再更改其中某个字段的值?
- 大侠如何写访问服务器数据呢(SQL)?
- 请教,如何让vb6中的datareport打印的时候每行打印2列啊???
如果你以有了! 那就很方便!他会给你一段程序让我知道如何使用的! 我的也是这么操作的!
如果你还没买我劝你还是用IC卡的吧! 这东西太老土了! 都成化石了! 真用自己宝贵的时间学点有用的! 我们作程序的要像艺术家一样具有学习新知识的意识与能力
用vc写的那个在测试时都没有反应
他有写的函数,还有读的!
分别用就行了! 读有读有设备,写有写的设备!
用VC的也可以的! 因为给你的是DLL程序,可以调用 的! 把调用程序写在一个模块里!
看看你VC程序怎么调用这个函数的就行了! 把VC调用DLL的方法写成VB 的就可以了。因为DLL VB 不用生成可以通用的! 所以你的DLL程序一定是用VC或C\C++写的,VB 是可以调用 的! 只要方法对就行了! 你还是问问厂家要VB版的程序。
Declare Function writecard Lib "ghc715.dll" (ByVal nPort As Long, ByVal nTrack As Long, ByVal sData1 As String, ByVal sData2 As String, ByVal nModel As Long) As Long
///////////////// 以是是模块里的 //////////////ghc715.dll 放在也.EXE 文件的 app.path 下即可! Err = writecard(1, 2, s1, s2, 1)
If Err = 0 Then
MsgBox "写卡成功 "////////// 以上是写的。。 S1 and S2 是你的变量 ! 其余是不用变的!!!
有的设备只有S1 没有S2 这是正常的! 功能不不需要S2也可以是 “” or NULL 我也就只能帮你这些了,情况不明怕指错路!!!