向其他用户发送消息 [英] Send Message To Another User

问题描述

我想知道如何使用Progress 4gl向其他用户发送消息.我们正在尝试减少我工作的PA扬声器的数量，并希望以某种方式将某些预定义的消息通知某些用户.我不确定使用Progress还是可以做到这一点，或者不确定是否可以使用消息队列.如果有人有任何样品，想法或曾经做过此事，请告诉我.谢谢！

I was wondering how to send messages to another user using Progress 4gl. We are trying to cut down on the PA speaker where I work and I want some way to notify a certain user/users of some predefined messages. I'm not sure if this is even possible with Progress, or if there is a message queue that can be used. If anyone has any samples, ideas or has done this before, please let me know. Thanks!!

推荐答案

您可能会发现这很有帮助:

You might find this helpful:

在波士顿和芬兰的演讲之后，dot.r是 很高兴宣布开源Stomp项目可用 立即.

Following on from presentations in Boston and Finland, dot.r is pleased to announce the open source Stomp project, available immediately.

从 http://www.dotr.com 下载或 https://bitbucket.org/jmls/stomp ，dot.r踩踏程序允许您 将您的进度会话连接到任何其他应用程序或服务 连接到同一消息代理的邮件.

Download from either http://www.dotr.com or https://bitbucket.org/jmls/stomp , the dot.r stomp programs allow you to connect your progress session to any other application or service that is connected to the same message broker.

开放源代码，支持Stomp的免费消息代理是:

Open source , free message brokers that support Stomp are :

保险丝(http://fusesource.com/products/fuse-mq-enterprise/)

Fuse (http://fusesource.com/products/fuse-mq-enterprise/)

[Red Hat inc现在拥有的Progress公司] Fuse MQ Enterprise是基于标准的开源消息传递平台 部署时占用的空间很小.缺乏执照 费用与高性能，可靠的消息传递相结合，可以 与任何开发环境一起使用可提供一种解决方案 支持无处不在的集成

[a Progress company now owned by Red Hat inc] Fuse MQ Enterprise is a standards-based, open source messaging platform that deploys with a very small footprint. The lack of license fees combined with high-performance, reliable messaging that can be used with any development environment provides a solution that supports integration everywhere

ActiveMQ (http://activemq.apache.org/)

ActiveMQ (http://activemq.apache.org/)

Apache ActiveMQ(tm)是最流行，功能最强大的开源消息传递 和集成模式服务器. Apache ActiveMQ速度很快， 支持许多跨语言客户端和协议，随附 易于使用的企业集成模式和许多高级功能 同时完全支持JMS 1.1和J2EE 1.4.

Apache ActiveMQ (tm) is the most popular and powerful open source messaging and Integration Patterns server. Apache ActiveMQ is fast, supports many Cross Language Clients and Protocols, comes with easy to use Enterprise Integration Patterns and many advanced features while fully supporting JMS 1.1 and J2EE 1.4.

Apache ActiveMQ是根据Apache 2.0许可发布的

Apache ActiveMQ is released under the Apache 2.0 License

RabbitMQ

RabbitMQ是消息代理.主要思想很简单:它 接受并转发消息.您可以将其视为帖子 办公室:当您将邮件发送到邮政信箱时，您可以确定 邮递员最终将邮件发送给您的收件人.使用这个 隐喻RabbitMQ是一个邮箱，一个邮局和一个邮递员.

RabbitMQ is a message broker. The principal idea is pretty simple: it accepts and forwards messages. You can think about it as a post office: when you send mail to the post box you're pretty sure that Mr. Postman will eventually deliver the mail to your recipient. Using this metaphor RabbitMQ is a post box, a post office and a postman.

RabbitMQ与邮局之间的主要区别在于事实 它不处理纸张，而是接受，存储和 转发数据的二进制Blob-消息.

The major difference between RabbitMQ and the post office is the fact that it doesn't deal with paper, instead it accepts, stores and forwards binary blobs of data - messages.

请随时在 https://bitbucket.org/jmls/stomp 发行系统，并将项目分叉到 以便重新提交要添加的所有这些新功能 ...

Please feel free to log any issues on the https://bitbucket.org/jmls/stomp issue system, and fork the project in order to commit back all those new features that you are going to add ...

dot.r Stomp使用许可的MIT许可证 (http://en.wikipedia.org/wiki/MIT_License)

dot.r Stomp uses the permissive MIT licence (http://en.wikipedia.org/wiki/MIT_License)

玩得开心，享受！

朱利安

我尝试过-代码非常简单，无法安装和运行.窥探消息源是一种乐趣.

I tried it -- the code is dead-simple to install and run. And peeking inside the source is a pleasure.

ApacheMQ几乎可以轻松上手.这是进行消息传递的一种非常非常简单的方法.

ApacheMQ is pretty much painless to get going. This is a really, really easy way to get going with messaging.

如果您是基于角色的古老化石(例如我本人)，则可能要跳过GUI示例.您可以使用以下方式发送消息:

If you are an old character-based fossil (such as myself) you might want to skip the GUI samples. You can send a message with:

/* stompQOut.p
 *
 */

dotr.Stomp.Helper.SendMessage:ToQueue("myQueue","a test message")

并通过以下方式接收消息:

And receive messages with:

/* stompQIn.p
 *
 */

define variable stompClient as dotr.Stomp.StompClient no-undo.

define variable msgTxt as character no-undo format "x(60)".

stompClient = new dotr.Stomp.StompClient().

stompClient:Subscribe( this-procedure ).
stompClient:SubscribeToQueue( "myQueue" ).

pause 0 before-hide.

wait-for close of this-procedure.

procedure NewStompMessage:
  define input parameter stompMessage as dotr.Stomp.StompMessage no-undo.
  message string( stompMessage:Body ).
end.

这篇关于向其他用户发送消息的文章就介绍到这了，希望我们推荐的答案对大家有所帮助，也希望大家多多支持IT屋！