带有自签名证书的VBA ServerXMLHTTP https请求 [英] VBA ServerXMLHTTP https request with self signed certificate
问题描述
我正在使用ServerXMLHTTP对象在excel 2007 vba脚本上发出一些http请求。
I'm using a ServerXMLHTTP object to make some http requests on an excel 2007 vba script.
但我需要连接到使用自我的https服务器签名SSL证书,因此默认情况下我收到消息证书颁发机构无效或不正确。有没有办法配置ServerXMLHTTP对象,使其不需要CA证书?
But I need to connect to an https server which uses a self-signed SSL Certificate, so by default I get the message "The certificate authority is invalid or incorrect". Is there a way to configure the ServerXMLHTTP object so that it doesn't requires a CA Certificate?
下面是一些示例代码:
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 ("")
推荐答案
我曾经有过这个问题,我只是设法过了它,这要归功于:
I used to have this problem for a while, and I only managed to get past it thanks to this:
Set objHTTP = CreateObject("MSXML2.ServerXMLHTTP")
objHTTP.SetOption(2, objHTTP.GetOption(2) - SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS)
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方法和 getOption方法
I have found this here setOption Method and getOption Method
在这段代码中我刚刚使用了 SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS
但你可以试试其他更具体:
Here in this code I have just used SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS
but you can try with others more specific:
-
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
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
这篇关于带有自签名证书的VBA ServerXMLHTTP https请求的文章就介绍到这了,希望我们推荐的答案对大家有所帮助,也希望大家多多支持IT屋!