char to UTF code in vbscript

Question

我想创建一个.properties文件以用于来自VBScript的Java程序。我将在使用ASCII映射外的字符的语言中使用一些字符串。所以，我需要替换这些字符的UTF代码。这将是\ u0061为a，\ u0062fro b等等。

有没有办法在VBScript中获取char的UTF代码？

Answer 1

VBScript具有返回指定字符串中第一个字符的Unicode（宽）代码的AscW函数。

请注意AscW返回字符代码作为十进制数，所以如果你需要它在一个特定的格式，你将不得不编写一些额外的代码（并且问题是，VBScript没有体面的字符串格式化功能）。例如，如果您需要格式为\unnnn的代码，则可以使用类似下面的函数：

WScript.Echo ToUnicodeChar("✈") ''# \u2708 

Function ToUnicodeChar(Char) 
    str = Hex(AscW(Char)) 
    ToUnicodeChar = "\u" & String(4 - Len(str), "0") & str 
End Function