带有自签名证书的 VBA ServerXMLHTTP https 请求

Question

我正在使用 ServerXMLHTTP 对象对 Excel 2007 vba 脚本发出一些 http 请求。

但我需要连接到使用自签名 SSL 证书的 https 服务器，因此默认情况下我收到消息“证书颁发机构无效或不正确”。有没有办法配置 ServerXMLHTTP 对象，使其不需要 CA 证书？

一些示例代码如下:

Set objHTTP = CreateObject("MSXML2.ServerXMLHTTP")
  objHTTP.Open "POST", "https://invernalia.homelinux.net", False, "user", "password"
  objHTTP.setRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"
  objHTTP.send ("")

Answer 1

我曾经有一段时间遇到这个问题，多亏了这个，我才成功解决了这个问题:

Set objHTTP = CreateObject("MSXML2.ServerXMLHTTP")
objHTTP.SetOption 2, objHTTP.GetOption(2)
objHTTP.Open "POST", "https://invernalia.homelinux.net", False, "user", "password"
objHTTP.setRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"
objHTTP.send ("")

我在这里找到了这个setOption Method和 getOption Method

在此代码中，我刚刚使用了 SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS，但您可以尝试使用其他更具体的代码:

• SXH_SERVER_CERT_IGNORE_WRONG_USAGE
• SXH_SERVER_CERT_IGNORE_CERT_CN_INVALID
• SXH_SERVER_CERT_IGNORE_CERT_DATE_INVALID
• SXH_SERVER_CERT_IGNORE_UNKNOWN_CA