[文本处理] [已解决]批处理如何把(当前路径)字符转为Unicode编码？

s = "𪚥"
WScript.Echo Hex(ToCodePoint(s))

'return code point of a character
Function ToCodePoint(s)
    Dim uni, uni2
    uni = CLng("&H" & Hex(AscW(s)))
    If (uni >= &HD800&) And (uni <= &HDBFF&) Then
        uni2 = Mid(s, 2, 1)
        If uni2 = "" Then
            Err.Raise 8732, "ToCodePoint", _
            "Invalid  surrogate pair"
        End If
        uni2 = CLng("&H" & Hex(AscW(uni2)))
        uni = &H10000 + (((uni - &HD800&) * 2 ^ 10) Or (uni2 - &HDC00&))
    End If
    ToCodePoint = uni
End Function
复制代码

function reconvert(str){
		str = str.replace(/(\\u)(\w{1,4})/gi,function($0){
			return (String.fromCharCode(parseInt((escape($0).replace(/(%5Cu)(\w{1,4})/g,"$2")),16)));
		});
复制代码

@echo off
powershell -NoProfile -NoLogo -command "& {$str='%~dp0';$str;$str=$str.ToCharArray();$result=@(foreach($char in $str){\"\u{0:x4}\" -f [int]$char});$result -join '';}"
pause
复制代码

C:\Users\CF\Desktop\
\u0043\u003a\u005c\u0055\u0073\u0065\u0072\u0073\u005c\u0043\u0046\u005c\u0044\u0065\u0073\u006b\u0074\u006f\u0070\u005c
复制代码

@set @n=0/*&@echo off
echo;%~dp0|cscript -nologo -e:jscript "%~f0"
pause&exit /b */

var line=WSH.StdIn.ReadLine();
var len=line.length;
var result='';
for(i=0;i<len;i++)
{
	var code=('000'+(line.charCodeAt(i)).toString(16)).slice(-4);	
	result+='\\u'+code;
}
WSH.Echo(result)
复制代码

for /f %%a in ('echo;%~dp0^|cscript -nologo -e:jscript "%~f0"') do (
    echo %%a
)
复制代码