I am stuck can somebody help me please.
I am testing a very small portable barcode scanner.
After scanning I need to upload the scanned data.
I am in VB6 I am using the mscomm1 control
I tell the scanner to send the data.
I have a OnCom procedure that reads the data and sends it to the
As you can see this output goes to the Text1 box
Case comEvReceive ' Received RThreshold # of chars.
InBuff = MSComm1.Input
Sub HandleInput(InBuff As String)
' This is where you will process your input. This
' includes trapping characters, parsing strings,
' separating data fields, etc. For this case, you
' are simply going to display the data in the TextBox.
Text1.SelStart = Len(Text1.Text)
Text1.SelText = InBuff
The text in the text box looks like this:-
I need help to list just the barcodes in a list or place all the data in an array
In the above 13734G 2229KP are the barcodes.
This is what the documentation tells me about the data string
Output: A multi-byte string (see below).
Purpose: Read all barcodes data stored in KDC100 internal flash memory. Does not erase the stored barcodes.
The format of the output is as follows:
N C0 Y0 D0 T0 C1 Y1 D1 T1 . . . . . . . . . . . . . . . . . . . Cn Yn Dn Tn
N : Total number of bytes to be sent(3 bytes)
C0, C1,…, Cn : Total number of each barcode data(1 byte)
Y0,Y1,…, Yn : Type of each barcode(1 byte)
D0,D1,…,Dn : Actual barcode data of each barcode(variable size)
T0, T1,…,Tn : Timestamp of each barcode(4 bytes)
The first 3 bytes specify the total number of bytes being sent. Then the entire populated contents of the internal flash memory are sent as is.
I have attached my text box text, it might have lost its correct format in the copy process .
I would be very pleased for some help,