您的位置->>速创科技->>在线支持                                  

编号:2891 留言者名称:Clive 标题:PPLB in VB6
How can I output the PPLB command to our Agrox X-1000 printer through the LPT: port? I tried the following code but the printer did not response. Would you help us to solve this problem?
Sub Test()
Open "LPT1:" For Binary Access Write As #1
    strLabel = "123456"
    Put #1, , "q480"
    Put #1, , "Q40,30"
    Put #1, , "N"
    Put #1, , "B55,80,0,1,3,7,50,N," & strLabel
        Put #1, , "A110,140,0,3,1,1,N," & strLabel
        Put #1, , "P1"
    Close #1
End Sub
地区:广东    留言时间: 2003-12-4 17:57:30
专家解答:
请在Put #1, , "P1"<br>后加回车换行的命令
既然是用vb编程,建议使用我公司提供的library更方便

条码小知识:
   在利用这项专利技术对其进行不断改进的过程中,一位科幻小说作家Isaac-Azimov在他的“裸露的太阳”一书中讲述了使用信息编码的新方法实现自动识别的事例。那时人们觉得此书中的条码符号看上去象是一个方格子的棋盘,但是今天的条码专业人士马上会意识到这是一个二维矩阵条码符号。虽然此条码符号没有方向、定位和定时,但很显然它表示的是高信息密度的数字编码。