LotusScript NotesHTTPRequest 获取方法问题

Question

我正在尝试使用 REST 功能访问 API。但是我无法检索数据。

这里是代码

Dim Session As New NotesSession        
Dim ret As Variant
Dim URL As String
Dim headers As Variant
Dim webRequest As NotesHTTPRequest
Set webRequest = session.createhttprequest()

URL = "https://www.meteoblue.com/en/server/search/query3?query=basel"

ret  = webrequest.Get(URL)

Messagebox ret

我已经用这个解决了我之前的问题，但我现在又遇到了另一个错误。当我运行此代码时，出现以下错误（问题出在“ret”）：

Type mismatch in method OP_CHECK_TOS_BYVAL : BYTE found, Unknown expected

有人知道问题出在哪里吗？

Answer 1

我像一张破唱片一样重复自己的话：将错误处理程序添加到每一行代码中。

在您的示例中，正好有 4 行代码可能会出错。尽管如此，如果您不使用错误处理，您仍然无法找出 4 行中的哪一行导致了错误（当然您可以使用调试器，但这是另一回事...）。

如果没有错误处理程序，我只能猜测，您的错误来自这一行：

Messagebox ret

ret 被定义为 Variant，help of the function 告诉你，它将 return 一个字节数组：

Return value Variant

Returns Variant content as JSON UTF8 byte array. Use the preferstrings property to return Unicode rather than UTF8 byte array.

但是 Messagebox 需要一个字符串作为参数 --> 类型不匹配...

LotusScript NotesHTTPRequest 获取方法问题

LotusScript NotesHTTPRequest Get Method Issue

lotus-notes

lotus-domino

lotusscript