Как я могу использовать формулу Excel (без VBA) для получения части данных в ответе HTTP POST? - PullRequest
2 голосов
/ 12 октября 2010

Есть ли способ создать формулу гиперссылки Excel, которая бы отправляла HTTP POST по щелчку мыши и анализировал ответ для заполнения другой ячейки?

Ответы [ 2 ]

0 голосов
/ 10 января 2019
Public Function HttpPOST(ByVal URL As String) As String
    Set objHTTP = CreateObject("WinHttp.WinHttpRequest.5.1")
    objHTTP.Open "POST", URL, False
    objHTTP.setRequestHeader "User-Agent", "Mozilla/4.0 (compatible; MSIE 6.0; Windows NT 5.0)"
   objHTTP.send ("")
   myText = objHTTP.responseText
   getHTTP2 = myText

End Function
0 голосов
/ 20 июля 2011

[EDIT] Извините, я не вижу " no vba " в вашем заголовке.Но я не понимаю, как бы вы поступили.

Вы можете сделать это с помощью vba и найти ценную информацию по следующим темам:

Вот пример кода:

'Send the request
Set objHTTP = CreateObject("WinHttp.WinHttpRequest.5.1")
   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 ("")

'Get the result
myText = objHTTP.responseText

'Set it in the current cell
ActiveCell.Value = myText

С уважением,

...