@set @n=0;/* & echo off & setlocal enabledelayedexpansion
md "reg" 2>nul
pushd "reg\"
(for %%a in (HKLM HKCU HKCR HKU HKCC) do (
        set "n="
        for /f "delims=" %%b in ('reg query "%%a" /s /f "txt" /k') do (
                set /a n+=1
                reg export "%%b" %%a_!n!.reg
        )
)) 2>nul
dir /b *.reg | cscript -nologo -e:jscript "%~0"
start "" ".\"
pause & exit/b & rem */

fso = new ActiveXObject("Scripting.FileSystemObject");
while (!WScript.StdIn.AtEndOfstream) {
        file = WScript.StdIn.ReadLine();
        f = fso.OpenTextFile(file, 1, false, -1);
        txt= f.Readall();
        f.Close();
        txt= /[\s\S]*?^\[[\s\S]*?(?=^\[)/m.exec(txt + "\r\n[")[0];
        fso.OpenTextFile(file, 2, true, -1).write(txt);
}
复制代码

@echo off
(echo Windows Registry Editor Version 5.00
echo/)>"%~dp0\1_new.reg"
(for /f "delims=[" %%i in ('type "%~dp0\1.txt"^|findstr/i "hkey_"') do (
echo=[-%%i
echo/
))>>"%~dp0\1_new.reg"
pause
复制代码

cscript -nologo context.js -iegoc -f /^\[/ 'msouc.exe' -t +0 Z:\a.txt
复制代码

context.exe -iegoc -f /^\[/ 'msouc.exe' -t +0 Z:\a.txt
复制代码

ncontext.exe -iegoc -f /^\[/ 'msouc.exe' -t +0 Z:\a.txt
复制代码