Wednesday, July 26, 2017

Plugin: Escape certain characters

User question:
> I'm writing a plugin and need to escape certain characters in an 
> URL. Is there a function available to escape characters?

No, there's no built in function available.
Here's a small function that you can use as starting point to escape certain characters:

Function EscapeChars(s As String) As String
   Dim i, s2
   s2 = ""
   For i = 1 To Length(s)
      If Pos(LowerCase(s[i]), "abcdefghijklmnopqrstuvwxyz0123456789%.") > 0 Then
         s2 = s2 + s[i] 
         s2 = s2 + "%" + IntToHex(Ord(s[i]), 2)
      End If
   Return s2
End Function

s = EscapeChars("")

s =