• Home
 · 
• Miscellaneous
 · 
• Open Cash Drawer For (POINT OF SALE SOFTWARE) Linked On LPT,Com Port

Open Cash Drawer For (POINT OF SALE SOFTWARE) Linked On LPT,Com Port

by Adnan Shazal (Bahawal Nagar Pakistan) (1 Submission)
Category: Miscellaneous
Compatability: Visual Basic 5.0
Difficulty: Unknown Difficulty
Originally Published: Fri 11^th February 2005
Date Added: Mon 8^th February 2021
Rating: (1 Votes)

Open Cash Drawer For (POINT OF SALE SOFTWARE) Linked On LPT,Com Port

API Declarations


Sub FunOpenCashDrawerLPT1()
Dim iFile As Integer
Dim arrbData() As Byte
iFile = FreeFile
'For Com Port Open "COM1"
Open "LPT1" For Binary Access Write As #iFile
ReDim arrbData(1 To 4)
arrbData(1) = &H1B '27 in hexadecimal
arrbData(2) = &H70 '112 in hexadecimal
arrbData(3) = &H0 '0 in hexadecimal
arrbData(4) = &H30 '48 in hexadecimal
Put #iFile, , arrbData
arrbData(3) = &H1
arrbData(4) = &H31
Put #iFile, , arrbData
Close #iFile
End Sub



Download this snippet    Add to My Saved Code

Open Cash Drawer For (POINT OF SALE SOFTWARE) Linked On LPT,Com Port Comments

No comments have been posted about Open Cash Drawer For (POINT OF SALE SOFTWARE) Linked On LPT,Com Port. Why not be the first to post a comment about Open Cash Drawer For (POINT OF SALE SOFTWARE) Linked On LPT,Com Port.

Post your comment