我可以访问API。API以XML post作为输入,然后返回带有相关数据的XML响应。
我也想
将HTTP发送到服务器(身份验证和请求将被发送给together)
我没有excel的编程背景,但对不同的web脚本语言、HTML、CSS、Javascript等都很满意。
有什么想法吗?
发布于 2009-11-30 18:26:46
Excel请求端可以使用此VBA代码进行处理。
Sub GetStuff()
Dim objXML As Object
Dim strData As String
Dim strResponse As String
strData = "Request"
Set objXML = CreateObject("MSXML2.XMLHTTP")
objXML.Open "POST", "www.example.com/api?" & strData, False
objXML.Send
strResponse = objXML.responsetext
MsgBox strResponse
End Sub
发布于 2009-12-02 14:03:14
如果您需要将您的输入xml作为消息体发送,下面是您可以这样做的方法。您可能需要添加更多的请求头或更改请求头,以使其为您工作。
使用DOMDocument对象可以轻松地处理xml文档。
添加对项目的引用;
示例:
Dim xmlInput As String
xmlInput = "<YourXmlRequest></YourXmlPayload>"
Dim oXmlHttp As MSXML2.XMLHTTP60
Set oXmlHttp = New MSXML2.XMLHTTP60
oXmlHttp.Open "POST", serviceURL, False, "UserName", "Password"
oXmlHttp.setRequestHeader "Content-Type", "application/x-www-form-urlencoded"
oXmlHttp.setRequestHeader "Connection", "Keep-Alive"
oXmlHttp.setRequestHeader "Accept-Language", "en"
oXmlHttp.send xmlInput
Debug.Print oXmlHttp.responseText
Dim oXmlReturn As MSXML2.DOMDocument60
Set oXmlReturn = New MSXML2.DOMDocument60
oXmlReturn.loadXML oXmlHttp.responseText
发布于 2009-12-18 21:47:48
这就是我最后使用的:
Set objHTTP = CreateObject("MSXML2.ServerXMLHTTP")
objHTTP.Open "POST", urlPath, False
objHTTP.setRequestHeader "Content-Type", "text/xml"
objHTTP.send (request)
https://stackoverflow.com/questions/1820345
复制相似问题