Menu

#20 Bytes Messages

v1.0_(example)
open
core (14)
5
2003-02-04
2003-02-04
No

Hi,
I'm using Swift MQ to send Bytes Messages. The
function readBytesOnBytesMessages returns the
correct number of bytes read, but the array provided
contains nothing.

This is the piece of code:

Private Const MAXMSGLENGTH As Long = 4096
.
.
.

Dim arraybytes(MAXMSGLENGTH) As Byte
Dim i As Long
Dim n As Long
Dim cad As String

cad = ""
n = C.readBytesOnBytesMessage(messageId,
arraybytes, length)
For i = 0 To n - 1
bytes(i) = arraybytes(i)
cad = cad & Hex(arraybytes(i)) & "-"
Next i

msgbox "The message is: " & cad

It's returning:

The message is: 0-0-0-0-0-0-0-0-0-0-0-0-0-0-0-0-

Using a java program I am reading the message
correctly, including raw message.

Somebody knows how to use this function? Is the
second parameter correctly defined (arraybytes)?

Thanks

Javier.

Discussion


Log in to post a comment.