advpl-stomp:TOTVS ADVPL STOMP协议实现

advpl-stomp 实现STOMP消息传递协议的ADVPL库（ ）。 目标 这些是该库的最初目标 构建并验证消息； 发送消息到STOMP服务器； 解析STOMP服务器响应； 学习ADVPL编程； 致富 :money_bag: ; 如何使用它 使用此版本，您可以构建和发送基本的STOMP客户端框架。 订阅STOMP队列目前无法正常工作。 # include 'totvs.ch' # include 'stomp.ch' USER FUNCTION STOMP LOCAL oStompClient , oLogger oLogger := Logger (): New ( 'ADVPL-STOMP' ) oStompClient := TStompClient (): new ( "127.0.0.1" , 61613 , "user" , "password" , "vhost"