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。
有什么建议吗?谢谢。
答
固定与website.setOption 2,13056,不知道为什么,但我不在乎。
来自MSDN:'SXH_SERVER_CERT_IGNORE_ALL_SERVER_ERRORS = 13056' – wqw 2014-09-29 11:32:21