This is for POS software. I can open the cash drawer but I want to know how can I detect if the drawer is already onep? Anyone know please help!

Thanks

Hi,

Can You please send me the code to open the Cash Drawer for VB if you have one working for you.

I am using the TM-U295 Printer and Xc19 Cash Drawer.

I tried different ESC Sequences like

MSComm1.Output = Chr$(&H1B) + "p" + "0" + "zz"
MSComm1.Output = Chr$(&H1B) + "p" + Chr$(0) + Chr$(100) + Chr$(250)
MSComm1.Output = Chr$(27) & Chr$(112) & Chr$(0) & Chr$(25) & Chr$(250)
MSComm1.Output = Chr$(27)& Chr$(112) & Chr$(48) & Chr$(55) & Chr$(121)
MSComm1.Output = Chr(27) + Chr(33) + Chr(1) + Chr(112) ' + Chr(0)

None of the Above Worked for me.

Please reply ASAP.

Thanx in Advance.

Dhaval

Hello,

This exanple is for an epson TM-T88 printer Opening a Cashbases cash drawer. I hope it helps

If Option1.Value = True Then
    MSComm1.CommPort = 1
    ElseIf Option2.Value = True Then
    MSComm1.CommPort = 2
    End If
MSComm1.PortOpen = True
MSComm1.Output = Chr$(27) & "p" & 0 & vbCrLf
MSComm1.Output = Chr$(27) & "@"
MSComm1.PortOpen = False
End Sub
'Draw Kick Pin 2