[文件操作] 【已解决】批处理如何命名utf-8格式 的html

zhanglei1371

如附件所示，我需要重命名网页为<title>真实名字</title>
里的名字，但是如何解决乱码？
查看源文件没问题，但是用记事本打开网页就会乱码。导致title部分也乱码

本帖由于apang大师的回复完美解决！

apang

试试

@set @n=0;/* & echo off
for /f "tokens=1*delims=/" %%a in ('dir /b *.htm^|cscript -nologo -e:jscript "%~0"') do (
         ren "%%a" "%%b%%~xa"
)
pause & exit/b & rem */

while (!WScript.StdIn.AtEndOfStream) {
        var file = WScript.StdIn.ReadLine();
        var ado = new ActiveXObject("Adodb.Stream")
        ado.Type = 2;
        ado.Mode = 3;
        ado.CharSet = "BIG5";
        ado.Open();
        ado.LoadFromFile(file);
        var name = ado.ReadText.match(/<title>(.*)<\/title>/i)[1];
        WScript.Echo(file + "/" + name);
        ado = null
}
复制代码