Sub Main Dim sParam$ Dim sReadable$ ' Decode a URL parameter value as it would arrive in an HTTP GET request. sParam$ = "Caf%E9+Br%FBl%E9" sReadable$ = Web2Text(sParam$) Debug.Print"Original parameter: "; sParam$ Debug.Print"Decoded value: "; sReadable$ EndSub