VB6 MSXML2“证书中的主机名无效或不匹配。”

此代码适用于2台不同的WIN7机器，但未能在2台不同的XP机器：VB6 MSXML2“证书中的主机名无效或不匹配。”

公共功能GetLocationTemperature（urlString作为字符串，为ByRef千帕为单人间）单

对错误转到errHandler

Dim website As Object 
Set website = CreateObject("MSXML2.ServerXMLHTTP.6.0") 

'website.setOption(2) = (website.getOption(2) = SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS 

Call website.open("GET", urlString, False) 
Call website.send("") 
........

在XP运行时，website.send报告错误“证书中的主机名无效或不匹配”

SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS不是必需的d在WIN7中并没有帮助XP。

有什么建议吗？谢谢。

来源

2014-09-28 Harvard

固定与website.setOption 2，13056，不知道为什么，但我不在乎。

来源

2014-09-29 00:35:23 Harvard

来自MSDN：'SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS = 13056' – wqw 2014-09-29 11:32:21

VB6 MSXML2“证书中的主机名无效或不匹配。”

回答

相关问题