progress-4gl - 如何在 Progress/OpenEdge ABL 中执行 HTTP GET 和 POST？

Question

Progress 文档在 SOAP 上有大量的墨水，但我无法找到带有 Progress ABL 的简单 HTTP GET/POST 的示例。

如何向/从 URL GET 和 POST 字符串？

URL 可以是 https://吗？

Progress 可以提供 HTTP Basic 或 HTTP Digest 身份验证吗？

Answer 1

对于这个问题的 future 旁观者:

Openedge 现在(我相信从 11.5.1 开始)已经内置了对调用基于 REST 的 Web 服务的支持。它们包含在提供的 .pl 存档中，默认情况下该存档不在您的 PROPATH 中，因此需要首先处理(或者可以将存档移动到“更好的位置”)。

propath 可以通过多种方式设置，init 文件、注册表、以编程方式等。这是在 ABL 中完成的方式(如果以这种方式完成，则必须为每个新 session 重复)。

PROPATH = PROPATH + ",c:\pathtoprogress\OpenEdge\gui\OpenEdge.Net.pl".

“tty”目录中还有一个版本，“src”目录中还有一个包含源代码的存档。

这是一个非常基本的例子:

USING OpenEdge.Net.HTTP.IHttpRequest.
USING OpenEdge.Net.HTTP.IHttpResponse.
USING OpenEdge.Net.HTTP.ClientBuilder.
USING OpenEdge.Net.HTTP.RequestBuilder. 

DEFINE VARIABLE oRequest  AS IHttpRequest NO-UNDO.
DEFINE VARIABLE oResponse AS IHttpResponse NO-UNDO.

oRequest = RequestBuilder:Get('http://stackoverflow.com/'):Request. 

oResponse = ClientBuilder:Build():Client:Execute(oRequest).

MESSAGE
    oResponse:StatusCode SKIP   
    oResponse:StatusReason SKIP
    VIEW-AS ALERT-BOX.

Documentation for 11.6 can be found here.