我正在使用以下代碼打開使用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