解决向web服务器提交数据拒绝访问的问题（常见于webservice调用等）
Set h = New MSXML2.ServerXMLHTTP40
\’向指定的URL发送Post消息。这里的webservice地址为需要引用的地址
h.Open “POST”, END_POINT_URL, False, XI_LOGIN_USER, XI_LOGIN_PSW
h.setRequestHeader “Content-Type”, “text/xml”
sendXML = strxml
h.send (strxml)
当运行到 h.send (strxml) 的时候，可能报错误：
=========================
拒绝访问2147024891
==========================
=========================
原因：
系统的安全问题
解决：
把要SEND的web地址HTTP://地址 加入到受信任站点，并将相关的安全启用即可。
需要启用的安全：启用 —-提交非加密的表单数据
==========================
版权声明：本文为Liunsh原创文章，遵循 CC 4.0 BY-SA 版权协议，转载请附上原文出处链接和本声明。