DIY编程器网

标题: 装上驱动就蓝屏是怎么回事呢? [打印本页]

作者: chuang    时间: 2015-10-13 20:37
标题: 装上驱动就蓝屏是怎么回事呢?
装上驱动就蓝屏是怎么回事呢?
作者: liyf    时间: 2015-10-13 22:29
你做的是哪个版本的,装的是哪个驱动,还有系统环境?
不然你这问题就和“我拉肚子“一回事了
作者: jeasonking    时间: 2015-11-12 09:44
我也遇到類似問題
作業系統: win7 32bit 繁體中文
USB2LTP版本: 第三版
驅動程式版本: 1.6.2013.524
驅動程式日期: 2013/5/24
我寫了一段VB6小程式,我會引用到IO.DLL這個通用函示庫
我只會用到LPT的D0~D7腳,一個INIT腳(C2),還有ACK腳(S6),下面這一段程式主要是送出給LPT設備,
它會回應我一個ACK,當我用實體的LPT都沒問題,但是用了USB2LPT就會出現藍屏接著重開機,
不知道哪位先進有方法可以解決?謝謝!

Public Declare Sub SetPortBit Lib "IO.DLL" (ByVal Port As Integer, ByVal Bit As Byte)
Public Declare Sub ClrPortBit Lib "IO.DLL" (ByVal Port As Integer, ByVal Bit As Byte)
Public Declare Sub NotPortBit Lib "IO.DLL" (ByVal Port As Integer, ByVal Bit As Byte)
Public Declare Function GetPortBit Lib "IO.DLL" (ByVal Port As Integer, ByVal Bit As Byte) As Boolean

Public Const DataReg = &H278
Public Const StatusReg = &H279
Public Const CtlReg = &H27A
    ClrPortBit CtlReg, 3     
    SetPortBit CtlReg, 2
    ClrPortBit CtlReg, 5            '將DataPort設定為輸出
    PortOut DataReg, Value      '輸出命令
'    For j = 1 To 20      '100
'    Next j
    '3向交握<以下>
    Dim Ack As Boolean
    '提出Request
    ClrPortBit CtlReg, 2
ChkAck: '等待回應Ack
    Ack = GetPortBit(StatusReg, 6)
    If Ack = True Then GoTo ChkAck

作者: liyf    时间: 2015-11-12 09:50
jeasonking 发表于 2015-11-12 09:44
我也遇到類似問題
作業系統: win7 32bit 繁體中文
USB2LTP版本: 第三版

软件包中有常使用的最新接口api,更新下
win7的接口模式与xp,2003不同,需要更新到最新的接口
有些接口api需要对应32,64版本的,请注意,要是软件包里没有的需要找官网下载,或者留言我





欢迎光临 DIY编程器网 (http://diybcq.com/) Powered by Discuz! X3.2