(Excel) Socket Convenience Method: BuildHttpGetRequest

Demonstrates the BuildHttpGetRequest method.

Download Excel Class Modules Chilkat Excel Class Modules

' The BuildHttpGetRequest method is a convenience method for building
' an HTTP GET request.  Normally, an application would use Chilkat's HTTP or REST API's
' for sending HTTP requests.  

Dim socket As Chilkat.Socket
Set socket = Chilkat.NewSocket


url = "http://www.chilkatsoft.com/test.asp?x=123&y=456"

reqStr = socket.BuildHttpGetRequest(url)
Debug.Print reqStr
Debug.Print "----"

' The result is:

' 	GET /test.asp?x=123&y=456 HTTP/1.1
' 	Accept: text/html,application/xhtml+xml,application/xml;q=0.9,*/*;q=0.8
' 	Connection: keep-alive
' 	User-Agent: Mozilla/5.0 (Windows NT 6.3; WOW64; rv:49.0) Gecko/20100101 Firefox/49.0
' 	Accept-Language: en-us,en;q=0.5
' 	Host: www.chilkatsoft.com

' The result is meant to look like a request from a browser.

' The same thing can be done using the Url and HttpRequest classes, but with more flexibility.

Dim req As Chilkat.HttpRequest
Set req = Chilkat.NewHttpRequest
req.SetFromUrl url
reqStr = req.GenerateRequestText()
Debug.Print reqStr
Debug.Print "----"

' The result is:

' 	GET /test.asp?x=123&y=456 HTTP/1.1
' 	Host: domain

' Add some headers..
req.AddHeader "Host","www.chilkatsoft.com"
req.AddHeader "Accept-Language","en-us,en;q=0.5"
req.AddHeader "Some-Other-Header","123456"

reqStr = req.GenerateRequestText()
Debug.Print reqStr

' The result is now:

' 	GET /test.asp?x=123&y=456 HTTP/1.1
' 	Host: www.chilkatsoft.com
' 	Accept-Language: en-us,en;q=0.5
' 	Some-Other-Header: 123456