Мне трудно заставить мой TM-T70 печатать штрих-код программным способом. Я проверил справочник команд POS и не могу понять, что я делаю неправильно, насколько я могу судить, я правильно отправляю команды на принтер.
Мне даже удалось напечатать QR-код, отправив POS-команды на принтер аналогичным образом. Если я распечатываю тестовый штрих-код из Принтеров и Сканеров, он распечатывается идеально, поэтому с моим кодом должно быть что-то не так.
Вот код, который я использую, чтобы попытаться распечатать штрих-код. Каждый раз, когда я пытаюсь распечатать этот код, он печатает реальные команды, а не штрих-код:
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-командами, я был бы очень признателен.