|
[广告] Excel易用宝 - 提升Excel的操作效率 · Excel / WPS表格插件 ★ 免费下载 ★ ★ 使用帮助★
感谢这么细致的指导,我把所有的参数都写进去了,还是没有返回想要的信息
看来得先学习一下再来请教了
With objXMLHTTP
.Open "POST", "http://10.60.20.30:8083/Default.aspx", False
.SetRequestHeader "Accept", "*/*"
.SetRequestHeader "Accept-Encoding", "gzip, deflate"
.SetRequestHeader "Accept-Language", "en-US, en; q=0.8, zh-Hans-CN; q=0.5, zh-Hans; q=0.3"
.SetRequestHeader "Cache-Control", "no-cache"
.SetRequestHeader "Connection", "Keep-Alive"
' .SetRequestHeader "Content-Length", "984"
.SetRequestHeader "Content-Type", "application/x-www-form-urlencoded; charset=utf-8"
' .SetRequestHeader "Cookie", "ASP.NET_SessionId=0dcaj4pnvcvcumhibw0jopov"
.SetRequestHeader "Host", "10.60.20.30:8083"
.SetRequestHeader "Referer", "http://10.60.20.30:8083/Default.aspx"
.SetRequestHeader "User-Agent", "Mozilla/5.0 (Windows NT 10.0; WOW64; Trident/7.0; Touch; rv:11.0) like Gecko"
.SetRequestHeader "X-MicrosoftAjax", "Delta=true"
.SetRequestHeader "X-Requested-With", "XMLHttpRequest"
.send "{'name': 'ctl00%24MainContent%24TxtItem','value': '20VH002JUS%0A'}"
Debug.Print .ResponseText
End With |
|