LotusScript:通过 POST 方法 HTTP 发送数据

LotusScript : Sending data via the POST method HTTP

我想通过 POST 请求将数据发送到服务器。 在我的例子中,我有一个代理将从打开的电子邮件中检索信息以将此数据发送到服务器。但是对于数据传输(HTTP POST),我需要在参数中提供JSON格式的数据。

然而,我没有在任何地方找到关于如何使用数据创建 JSON 的明确信息。我可以轻松地从电子邮件中检索数据,但我不知道如何将其转换为 JSON。是否可以轻松地做到这一点?有人有解决办法吗?

这个简单的例子应该能帮到你。

Dim session As New NotesSession
Dim url As String
Dim jsonBody As String

url="https://example.com"
jsonBody="{'param 1:'value 1'}"

Dim http As NotesHTTPRequest
Set http=session.CreateHTTPRequest()

Call http.SetHeaderField("ContentType","application/json")
Call http.Post(url,jsonBody)

示例中的 json 内容是使用名为 jsonBody 的字符串构建的。这是一个使用其他变量构建字符串的示例:

Dim lastname As String
lastname="Richards"
jsonBody="{'param 1':'" + lastname + "'}";