EPSON TM-T70条形码打印问题

时间:2019-01-10 17:47:22

标签: vb.net escaping barcode barcode-printing pos

我很难让TM-T70以编程方式打印条形码。我已经检查了POS命令参考,但我无法理解我做错了什么,据我所知,我已经正确地将命令发送到了打印机。

我什至设法通过以类似方式向打印机发送POS命令来打印QR码。如果我从打印机和扫描仪中打印测试条形码,则可以完美打印,因此我的代码一定有问题。

这是我用来尝试打印条形码的代码。每次我尝试使用此代码进行打印时,它都会打印出实际的命令,而不是条形码:

        getBarcodeStr = System.Text.Encoding.ASCII.GetString({29, 104, 80}) 'GS h

        getBarcodeStr += System.Text.Encoding.ASCII.GetString({29, 119, 3}) 'GS w

        getBarcodeStr += System.Text.Encoding.ASCII.GetString({29, 107, 4}) 'GS k

        getBarcodeStr += msg

        getBarcodeStr += System.Text.Encoding.ASCII.GetString({0})

        Return getBarcodeStr

这是我用来打印QR码的代码,效果很好:

    Dim storeLen As Integer = msg.Length + 3

    Dim storePL As Byte = CType((storeLen Mod 256), Byte)

    Dim storePH As Byte = CType((storeLen / 256), Byte)

    getQRCodeStr = System.Text.Encoding.ASCII.GetString({29, 40, 107, storePL, storePH, 49, 80, 48}) 'FUNCTION 180

    getQRCodeStr += msg

    getQRCodeStr += System.Text.Encoding.ASCII.GetString({29, 40, 107, 3, 0, 49, 69, 48}) 'FUNCTION 169

    getQRCodeStr += System.Text.Encoding.ASCII.GetString({29, 40, 107, 3, 0, 49, 67, 3}) 'FUNCTION 167

    getQRCodeStr += System.Text.Encoding.ASCII.GetString({29, 40, 107, 4, 0, 49, 65, 50, 0}) 'FUNCTION 165

    getQRCodeStr += System.Text.Encoding.ASCII.GetString({29, 40, 107, 3, 0, 49, 81, 48}) 'FUNCTION 181

    Return getQRCodeStr

以下是POS命令参考的链接:https://reference.epson-biz.com/modules/ref_escpos/index.php?content_id=128

如果比我有更多经验的热敏打印机和POS命令可以帮助我,我将不胜感激。

0 个答案:

没有答案