如何在 VBA 中传递身份验证凭据

Question

我正在尝试编写一个 VBA 宏，它将我的凭据传递到一个地址并获取一些内容（用于 JIRA 的 REST API），但是我在将我的代码从 Java 转换为 VBA 时遇到了一些困难。目前，这是我的java代码：

        String username = "myUser";
        String password = "myPassword";

        String authString = username + ":" + password;
        byte[] authEncBytes = Base64.encodeBase64(authString.getBytes());
        String authStringEnc = new String(authEncBytes);
        System.out.println("Base64 encoded auth string: " + authStringEnc);

        URL url = new URL(address);
        URLConnection urlConnection = url.openConnection();
        urlConnection.setRequestProperty("Authorization", "Basic "
                + authStringEnc);
        InputStream is = urlConnection.getInputStream();
        InputStreamReader isr = new InputStreamReader(is);

我正在尝试将其转换为 VBA，我不完全确定如何处理它，或者是否有一些库可以促进这一点。

Answer 1

对于基本身份验证，您可以简单地：

Dim response As String

With CreateObject("Microsoft.XMLHTTP")
  .Open "GET", address, false, username, password
  .Send
  response = .responseText
End With

Msgbox response