从Excel电子表格执行HTTP POST需要什么VBA代码?

最佳答案

Set objHTTP = CreateObject("MSXML2.ServerXMLHTTP")
URL = "http://www.somedomain.com"
objHTTP.Open "POST", URL, False
objHTTP.setRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"
objHTTP.send("")

另外,为了更好地控制HTTP请求,可以使用 WinHttp.WinHttpRequest.5.1 代替 MSXML2.ServerXMLHTTP

09-03 18:20