web-services - 如何在 Lotus Notes 中使用 RESTful Web 服务

Question

有没有人在 Lotus Notes 中编写客户端来使用 RESTful Web 服务？如果是这样，您使用过哪些代码示例？我不确定从哪里开始，因为目前网络上似乎没有很多例子。

我的最终目标是拥有一些 Lotusscript（或者 Java 甚至 @Formula），Notes 客户端应用程序可以使用它来执行对 RESTful Web 服务的常规 GET、POST、PUT 和 DELETE 调用。我会将结果存储在客户端计算机上的 .xml 文件中。

谢谢！

Answer 1

此处的 Geocoding 类并未实现所有动词，但它为您提供了基于 COM 的方法的基础，假设我们谈论的是 Windows 客户端。

操作编辑（示例）：

Dim httpObject As Variant
Dim httpURL As String
Dim response As String
Dim returnCode As String

Set httpObject = CreateObject("MSXML2.ServerXMLHTTP")  ' use MSXML object
httpURL = "http://" & yourWebServiceURL      
Call httpObject.open("GET", httpURL, False)
response = Left$(httpObject.responseText,16000)
returncode = GetGeoValue("code")  ' e.g. 200 for success