Microsoft.XMLHTTP使用SSL客户端证书（或已经过身份验证的会话）

Question

我通过需要客户端证书进行身份验证的代理连接到服务器。我可以使用已在浏览器中建立的ssh隧道轻松地从我的脚本启动浏览器。当我尝试使用Microsoft.XMLHTTP打开连接时，收到错误

  

访问此资源所需的安全证书无效。

我正在寻找两种解决方案之一：

1. 利用已在浏览器中（手动）建立的会话
2. 通过脚本发送客户端证书（和PIN）。

我目前用于此功能的逻辑非常简单：

Dim xHttp: Set xHttp = CreateObject("Microsoft.XMLHTTP")
Dim bStrm: Set bStrm = CreateObject("Adodb.Stream")
xHttp.Open "GET", "https://localhost:63619/ap_detail.xml?id=3502", False
xHttp.Send

With bStrm
    .Type = 1 '//binary
    .Open
    .Write xHttp.responseBody
    .SaveToFile "C:\xml\3502.xml", 2 '//overwrite
End With