MSComm Visual Basic LRC ?? 1

[MGjaltema]

Hello All,

I've a question. I'm using Visual Basic 6 to connect a PC to a payment terminal. I need to send info to the terminal using a serial connection. So i've used the MSComm control. Now I have a 'message' i need to send like <STX> 00 C1 00 <ETX> <LRC>, where <LRC> is a XOR of data + <ETX>. Can some one tell me how to do this...

I'm really stuck, so a little help is better then nothing...

Thanks !

 

[johnwm]

If you're looking for the <STX> and <ETX> codes then try the standard ASCII codes (all listed here):

http://www.asciitable.com/

To do the XOR just loop through the data using XOR (assuming your data is in an array aryData):

For a = lbound(aryData) to Ubound(aryData)
LRC = LRC xor aryData(a)
Next
LRC = LRC xor 3 ' 3 is ASCII for ETX
________________________________________________________________
If you want to get the best response to a question, please check out FAQ222-2244 first

'People who live in windowed environments shouldn't cast pointers.'