[已解决]如何把文件夹下*.reg的ANSI编码格式文件，转换为UTF-16LE编码格式？

HANPP7

文件夹下有三个文件 1.reg,2.reg,3.reg,编码格式为ANSI，现在想要UTF-16LE的编码格式，有什么办法一次性全转换吗？

Batcher

回复 1# HANPP7


test.bat

1. @echo off
   
2. cd /d "%~dp0"
   
3. powershell -c "Get-ChildItem *.reg | ForEach-Object {$NewName = $_.Basename + 'New' + $_.Extension; Get-Content $_ | Out-File -Encoding unicode $NewName}"

复制代码

HANPP7

回复 2# Batcher


    可用，万分感谢！

HANPP7

回复 2# Batcher


    这个是不是只在Windows10及其以上才可以，我看到里面有使用power shell

Batcher

回复 4# HANPP7


    你需要在什么系统里面执行呢？

czjt1234

回复 4# HANPP7


   win7就有啊

hfxiang

可采用论坛went大神的原创工具coder转换（ 下载地址见： http://bbs.bathome.net/thread-57518-1-1.html ），参考脚本如下：

1. 
   
2. @echo off
   
3. rem 保存为ANSI格式
   
4. cd /d "%~dp0"
   
5. for /f "tokens=*" %%a in ('dir /s/b/a-d "*.reg"') do (
   
6.         coder -c auto UTF-16_LE -f "%%~fa">"%%~dpna__tmp__%%~xa"
   
7.         move /y "%%~dpna__tmp__%%~xa" "%%~fa">nul 2>&1
   
8. )
   

复制代码

terse

运行前备份 确定源文件编码为ANSI

1. 1>1/* :
   
2. @echo off
   
3. dir /b /a-d *.reg| cscript -nologo -e:jscript "%~f0"
   
4. pause&exit
   
5. */
   
6. while (!WSH.StdIn.AtEndOfStream){
   
7.        var file = WScript.StdIn.ReadLine();
   
8.        binRead( file );
   
9. }
   
10. function binRead( path ) {
    
11.        var stream, cont, content;
    
12.        stream = new ActiveXObject("ADODB.Stream");
    
13.        stream.Type = 2;
    
14.        stream.charset = 'gbk';
    
15.        stream.open();
    
16.        stream.loadFromFile(path);
    
17.        content = stream.ReadText();
    
18.        stream.Position = 0
    
19.        stream.SetEOS()
    
20.        stream.Type = 2;
    
21.        stream.charset = 'UTF-16';
    
22.        stream.writetext(content);
    
23.        stream.SaveToFile(path, 2);
    
24.        stream.Close
    
25. }

复制代码