我正在使用以下代码打开使用lpt和com端口的钱箱。打开钱箱连接到USB端口
Dim intFileNo As Integer = FreeFile()
FileOpen(1, "c:\escapes.txt", OpenMode.Output)
PrintLine(1, Chr(27) & "p" & Chr(0) & Chr(25) & Chr(250))
FileClose(1)
Shell("print /d:com1 c:\escapes.txt", vbNormalFocus)
上面的代码很好用。但是,我的一位客户正在使用USB。
任何人都知道使用USB端口打开钱箱的任何代码?
谢谢
您是否尝试过寻找制造商的规范呢? – mellamokb 2012-07-11 14:38:55