Sending HTTP requests with VBA from Word

Question

I am trying to send data from a Word document to a web page. I have found some code, pasted it into a new module, and saved it. When I run it I get "compile error, user defined type not defined"

My code:

Sub http()    Dim MyRequest As New WinHttpRequest      MyRequest.Open "GET", _     "http://www.google.com"      ' Send Request.     MyRequest.Send      'And we get this response     MsgBox MyRequest.ResponseText  End Sub 

Answer 1

A potential alternative to avoid having to select the library is to use an object i.e.

Sub http() Dim MyRequest As Object      Set MyRequest = CreateObject("WinHttp.WinHttpRequest.5.1")     MyRequest.Open "GET", _     "http://www.google.com"      ' Send Request.     MyRequest.Send      'And we get this response     MsgBox MyRequest.ResponseText  End Sub 

Answer 2

You need to set a reference to Microsoft WinHTTP Services in your VBA Project (Tools -> References).

Here's what it would look like:

Also, you can read more about the Microsoft WinHTTP Services, version 5.1 here.