双11狂欢大促

盲盒赢 定制羽绒服

开启惊喜盲盒,抽取你的专属好礼

— 惊喜奖品抢先看 —

如何实现HTTPS访问证书非法的网站?

xufxuf xufxuf 墨衍会员 · AI 创作全网分发 墨衍智能分发 通过墨衍一键同步至各平台 可同步平台 CSDN微信公众号微博知乎掘金百家号博客园抖音小红书 你的文章也可以这样分发 墨衍会员 ¥399起/年,写一次发全网 我也要 + 加入社区
目前需要向一个网站上下单,必须https+POST方式连接。PB的inet不支持HTTPS(错误码 -5 Unsupported secure (HTTPS) connection attempted),所以肯定不能用。
如果有合法证书,那么可以用Ole对象Microsoft.XMLHttp来解决,可以看文档:
http://blog.csdn.net/ldl22847/article/details/9662927

对此开发代码:

OleObject lole_tenyear //声明ole
lole_tenyear = CREATE oleobject
lole_tenyear.ConnectToNewObject("Microsoft.XMLHttp")
lole_tenyear.open ("POST",ls_url, false)
lole_tenyear.setRequestHeader ("Content-type", "application/x-www-form-urlencoded")
lole_tenyear.setRequestHeader('Content-Length',string(len(ls_data)))
lole_tenyear.send(ls_data) //对方不是合法证书,就崩溃
ls_response = lole_tenyear.responseText //返回结果
IF lole_tenyear.Status >= 300 THEN
MessageBox ("HTTP request failed:", lole_tenyear.StatusText ,Exclamation!,OK!)
END IF
destroy lole_tenyear


可是,那个网站没有合法证书,于是运行到“send(ls_data)”就崩溃了,原因就是证书不合法。那么还有什么办法可以忽略证书不合法,正常执行下去呢?请教高手指导。

...全文
评论 9
收藏 已收藏
分享
返回顶部
xufxuf
控件与界面 604 成员 12,294 内容