|
[广告] VBA代码宝 - VBA编程加强工具 · VBA代码随查随用 · 内置多项VBA编程加强工具 ★ 免费下载 ★ ★ 使用手册★
求助 同样是下面一段代码,在WIN10系统上运行没有问题,在WIN7系统上就报错,请问为什么?
With CreateObject("WinHttp.WinHttpRequest.5.1")
' .SetProxy 2, "127.0.0.1:8888"
.Open "POST", URL, False
.setRequestHeader "Host", "ec.com"
.setRequestHeader "Connection", "keep -alive"
.setRequestHeader "Content-Length", Len(POST_ECR_NO)
.setRequestHeader "sec-ch-ua", """ Not A;Brand"";v=""99"", ""Chromium"";v=""90"", ""Google Chrome"";v=""90"""
.setRequestHeader "DATABASE", "myprod_db"
.setRequestHeader "AUTHPASSWORD", "43E141D9C55DC67F14"
.setRequestHeader "TIMEZONE_NAME", "China Standard Time"
.setRequestHeader "CONTENT-TYPE", "text/xml; charset=UTF-8"
.setRequestHeader "User-Agent", "Mozilla/5.0 (Windows NT 10.0; Win64; x64) AppleWebKit/537.36 (KHTML, like Gecko) Chrome/90.0.4430.212 Safari/537.36"
.setRequestHeader "LOCALE", "undefined"
.setRequestHeader "SOAPAction", "ApplyItem"
.setRequestHeader "AUTHUSER", "CZ8"
.setRequestHeader "Origin", "https://ecm.gm.com"
.setRequestHeader "Accept", "*/*"
.setRequestHeader "Sec-Fetch-Dest", "empty"
.setRequestHeader "Referer", "https://cm.com/client/X-salt=12512_11.0.0.6549-X/scripts/Innovator.aspx"
.setRequestHeader "Accept-Language", "zh,en-US;q=0.9,en;q=0.8,zh-CN;q=0.7"
.setRequestHeader "Cookie", cook
.Send POST_NO
end with |
|