activemq-dev mailing list archives

Site index · List index
Message view « Date » · « Thread »
Top « Date » · « Thread »
From donpwinston <>
Subject Tcl STOMP
Date Mon, 24 Mar 2014 12:45:56 GMT
Can anyone give me an example of how to receive a message from a queue using

I'm trying to use the tStomp package from
<>   but it's woeful. I can send but when I
subscribe the message gets removed but goes into the ether. How do I get the
message body? This is not working: ('messagebody' is not getting updated.
Sending is working and there are persistent messages in the queue.)

package require tStomp

#tStomp::setDebugCmd {}

puts "Enqueuing"

tStomp s stomp://admin:activemq@localhost:61613
s connect {set ::connected true}
vwait connected

puts "Dequeuing"

s subscribe /queue/Test1 {
	array set M $messageNvList
	set ::messagebody $M(messagebody)
vwait messagebody

puts $messagebody

s unsubscribe /queue/Test1

View this message in context:
Sent from the ActiveMQ - Dev mailing list archive at

View raw message