java_object('org.apache.activemq.ActiveMQConnectionFactory', [], ConnFactory),
ConnFactory <- createConnection returns Conn,
class('javax.jms.Session').'AUTO_ACKNOWLEDGE' <- get(AutoAcknowledge),
Conn <- createSession(false, AutoAcknowledge) returns Sess,
Sess <- createQueue('SampleQueue') returns Dest,
Sess <- createConsumer(Dest) returns Cons,
Conn <- start,
Cons <- receive returns Msg,
class('java.lang.System').out <- get(Out),
Out <- println(Msg),
Conn <- close.
How to Receive a Message from an Apache ActiveMQ Queue with tuProlog
百度 这样的筛选法，也普遍得到了家长的认可。
Simples Assim 
Leave a comment