简介：在这一系列的博客中，物联网城市，我将探讨如何用VBA在Excel中使用RESTful Raylight Web服务。

上一个条目：登录/注销示例

好的，我们可以登录/注销，现在让我们试着得到宇宙的列表…

工作流

工作流是：

代码

我改进了以前的代码，我编写了一些用于登录、注销和错误管理的函数和过程。我使用全局变量来共享servername、RESTful基url和令牌。

我们调用REST url来获取universe列表，url类似于get：6405/biprws/sl/v1/universes？offset=&limit=50，其中x是列表中的位置，从中返回universe，什么是云计算和大数据，建站服务，limit是我们可以在一次调用中获得的universe数–50是最大值。

API仅适用于4.1 SP2及更高版本您也可以通过Web Intelligence REST API获得Universe列表。基本url不一样，云服务器租用，它是：6405/biprws/raylight/v1

因为我们不能在一个请求中获得所有的universe，我们需要有循环控制语句来使用增量偏移量调用url。当返回码为"WSR 00400"（偏移量太高）或响应体中没有数据时，我们停止

响应体的XML类似：

我们将响应的XML加载到一个XML对象中，搜索所有universe节点（XML路径中的universes/universe）。对于每个节点，我们复制工作表中的子节点（id、名称、类型…）的值。

文件夹

对于世界中的文件夹，我们只有一个文件夹id。我们需要调用另一个REST url，/infostore/从该id获取名称。函数getFolder完成了此操作。工作流程是一样的：调用REST url，检查返回代码，加载XML，找到好的节点并获取值。

例如，我们调用:6405/biprws/infostore/99，得到：

对于名称，我们需要找到属性，比如登录（见上一篇文章）…而不是使用位置（不整齐），让我们写一个函数来找到好的属性…

宇宙的名字是UTF-8，淘客猪，如果你有特殊的字符，比如重音符号，你必须解码它。我在网上找到函数，我复制/粘贴它们。感谢Cyberpat92.

如何测试：打开文档，在第一页中设置bi4 servername、login、password，然后单击按钮或调用宏refreshListUnivers（）。

待办事项列表：

获取universe的完整路径，而不仅仅是一级…在函数getAttribute中使用while而不是for循环

下一步：获取宇宙的内容

附件：liste通用.zip