how to convert unicode characters to unicode escape sequences

[cdeb 3]

I have to convert strings with special characters to unicode escape sequences, how can I do?

Example:

input: questa è una prova
output: questa \u00e8 una prova

[Danp2 943]

Try searching the forum for "alnum". That should give you multiple threads to review.

[Malkey 231]

Try this.

Local $sInput = "questa è una prova"
Local $sOutput = Execute(StringRegExpReplace($sInput, '(.)', '(AscW("$1")>127?"\\u"&StringLower(Hex(AscW("$1"),4)):"$1")&') & "''")
MsgBox(0, "Result", "input: " & $sInput & @CRLF & "output: " & $sOutput & @CRLF)

 

[pixelsearch 261]

Hi all,
Thanks Malkey for the interesting solution using SRER. It took me a moment to understand the end of your $Output line ==>   &') & "''")   <== so I would like to share its meaning with our readers

Malkey used an interesting Replace pattern, based on the Ternary function, as shown in this image :

Each ampersand (&) is literally included in the updated string resulting from SRER, between the Ternary functions. As there is a final ampersand (circled in red), that's why he added "''" at the end of the string, so the Execute function won't generate an error when executed.

Well done !

Edited July 15, 2019 by pixelsearch

[cdeb 3]

Perfect!

thank you very much Malkey