(Excel) HTTP GET with utf-8 URL Encoded Query Params

Demonstrates how to build URLs where query param values can be either URL encoded from the utf-8 representation, or from another charset such as windows-1252.

Note: This example uses the new DecodeAndAppend method added in Chilkat v9.5.0.87.

Download Excel Class Modules Chilkat Excel Class Modules

' We have the string "MÆRSK".

' This is the URL encoding of the windows-1252 representation.

nameWindows1252UrlEncoded = "M%C6RSK"

Dim sb1 As Chilkat.StringBuilder
Set sb1 = Chilkat.NewStringBuilder

success = sb1.DecodeAndAppend(nameWindows1252UrlEncoded,"url","windows-1252")

Dim http As Chilkat.Http
Set http = Chilkat.NewHttp

' Here's how to send an HTTP GET where the param is the utf-8 representation that is URL encoded.
' For example:  https://www.chilkatsoft.com/something?name=M%C3%A6RSK

Dim sbUrl As Chilkat.StringBuilder
Set sbUrl = Chilkat.NewStringBuilder

Dim success As Boolean
success = sbUrl.Append("https://www.chilkatsoft.com/something?name=")
success = sbUrl.Append(sb1.GetEncoded("url","utf-8"))
Debug.Print sbUrl.GetAsString()


responseBody = http.QuickGetStr(sbUrl.GetAsString())

' Here's how to send an HTTP GET where the param is the windows-1252 representation that is URL encoded.
' For example:  https://www.chilkatsoft.com/something?name=M%E6RSK

sbUrl.Clear 
success = sbUrl.Append("https://www.chilkatsoft.com/something?name=")
success = sbUrl.Append(sb1.GetEncoded("url","windows-1252"))
Debug.Print sbUrl.GetAsString()

responseBody = http.QuickGetStr(sbUrl.GetAsString())