pcl_test

@echo off
::实际改为读取注册表
(for /f "delims=" %%a in (测试.txt) do (
      for %%b in (%%a) do if "%%b" equ "REG_SZ" (
            echo;^|#
      ) else if "%%b" equ "REG_DWORD" (
            echo;^|#
      ) else if "%%b" equ "REG_BINARY" (
            echo;^|#
      ) else if "%%b" equ "REG_MULTI_SZ" (
            echo;^|#
      ) else if "%%b" equ "REG_EXPAND_SZ" (
            echo;^|#
      ) else if "%%b" equ "REG_QWORD" (
            echo;^|#
      ) else (set /p=%%b <nul)
echo;^|@
))>"%temp%\$"
for /f "tokens=1* delims=^|" %%b in ('findstr "|#$" "%temp%\$"') do echo;%%b
pause
复制代码

pcl_test

1>1/* :
@echo off
::实际改为读取注册表
(for /f "delims=" %%a in (测试.txt) do @echo;%%a)|cscript -nologo -e:jscript "%~f0"
pause&exit /b
*/
var txt = "";
while(!WScript.StdIn.AtEndOfStream){
var str = WScript.StdIn.ReadLine().replace(/\s+(REG_SZ|REG_MULTI_SZ|REG_BINARY|REG_DWORD|REG_QWORD|REG_EXPAND_SZ).*?$/,'');
txt+=str+"\r\n";
}
WSH.Echo(txt);
复制代码

pcl_test

回复 10# /zhqsystem/zhq
不用临时文件也是可以，然你在要求中提出不要延迟变量，想来也只好用临时文件了，另一种是采用bat+js混编的方式，在不借助第三方的情况下也是极好的，保存为bat文件运行，要求改的也只是bat代码部分即可

pcl_test

回复 12# /zhqsystem/zhq
举个栗子

1>1/* :
@echo off
::获取IE相关的注册表值项的名称
set "readREG='reg query "HKCU\Software\Microsoft\Internet Explorer\Main"'"
(for /f "delims=" %%a in (%readREG%) do @echo;%%a)|cscript -nologo -e:jscript "%~f0"
pause&exit /b
*/
var txt = "";
while(!WScript.StdIn.AtEndOfStream){
var str1 = WScript.StdIn.ReadLine();
var str2 = str1.replace(/\s+(REG_SZ|REG_MULTI_SZ|REG_BINARY|REG_DWORD|REG_QWORD|REG_EXPAND_SZ).*?$/,'');
if (str1!=str2)txt+=str2+"\r\n";
}
WSH.Echo(txt);
复制代码

pcl_test

回复 14# /zhqsystem/zhq

我晕，5楼没有主项，只是你提取出来假设的值项例子，看来你还没明白怎么套用代码

pcl_test

回复 16# /zhqsystem/zhq


    自行参考13楼代码修改主项