B4X

Keeping Query Params in a Hashtable

Demonstrates how to use a Chilkat Hashtable to hold query params and re-emit as a query param string.

Note: The ToQueryString method was added in Chilkat v9.5.0.92.

B4X

Dim success As Boolean = False

Dim ht As ChilkatHashtable
ht.Initialize

'  Add name/value pairs from an existing query param string where the values are already URL encoded.
Dim qp As String = "txt=this%20is%20a%20test&color=blue&fruits=apples%26oranges"
success = ht.AddQueryParams(qp)

'  Add some additional name/value pairs.
ht.AddStr("name", "Jack Sparrow")
ht.AddStr("movie", "Pirates of the Carribean")

'  Iterate over the hash table to show what we have..

Dim keys As ChilkatStringTable
keys.Initialize
ht.GetKeys(keys)
Dim numKeys As Int = keys.Count
Dim key As String
Dim val As String
Dim i As Int = 0
Do While i < numKeys
    key = keys.StringAt(i)
    val = ht.LookupStr(key)
    Log(key & " = " & val)
    i = i + 1
Loop

'  Output for the above loop:

'  color = blue
'  name = Jack Sparrow
'  fruits = apples&oranges
'  txt = this is a test
'  movie = Pirates of the Carribean

'  Get all name/value pairs as a query parm string with values URL encoded
qp = ht.ToQueryString
Log(qp)

'  Result:
'  color=blue&name=Jack%20Sparrow&fruits=apples%26oranges&txt=this%20is%20a%20test&movie=Pirates%20of%20the%20Carribean