(VBScript) URL Decode
Demonstrates how to URL decode a string.
Dim fso, outFile
Set fso = CreateObject("Scripting.FileSystemObject")
'Create a Unicode (utf-16) output text file.
Set outFile = fso.CreateTextFile("output.txt", True, True)
' For versions of Chilkat < 10.0.0, use CreateObject("Chilkat_9_5_0.StringBuilder")
set sb = CreateObject("Chilkat.StringBuilder")
' Here we wish to URL decode the following string:
success = sb.Append("%D7%9E%D7%95%D7%A6%D7%A81.jpg")
' Notice the above string contains Hebrew chars using the utf-8 byte representation.
' See https://www.loc.gov/marc/specifications/codetables/BasicHebrew.html
' For example: D79E is the HEBREW LETTER MEM
' Therefore, when we decode to binary bytes, we must interpret the bytes as utf-8
' to get characters.
' Tell Chilkat to URL decode like this:
success = sb.Decode("url","utf-8")
' sb now contains the decoded string.
outFile.WriteLine(sb.GetAsString())
outFile.Close
|