[文本处理] [已解决]批处理怎样调用reg2inf.com直接生成精简inf文件？

temp

论坛版规要求每个问题单独发一个帖子，我这个帖子的标题不知是否合适？因为用批处理调reg2inf.com生成inf文件所遇到的问题都解决了，精简的合理组装代码不知怎样更简洁完美，故此趁热打铁，请朋友们帮忙完善
谢谢！
注册表转换成inf文件部分的代码[成功]：

@echo off
title=  注册表文件自动为转换"*.inf"
%~d1
cd %~p1
rem 文件名+后缀
set "file=%~nx1%"
rem 后缀名
set "hole=%~x1%"
rem 后缀名前面加0 防止后缀名为空的情况。也可以加其他的
if 0%hole% equ 0.reg goto run
:run
"%~dp0reg2inf.com" "%file%">nul
复制代码

删除inf文件累赘内容部分[部分成功，需要完善处]:
(需要删除包含下列字符的行：";" "_DelReg" "Provider=kajaa@eastday.com, 2002" "[DestinationDirs]")
（"Provider=kajaa@eastday.com, 2002"行最好是空行，不然还需要打开手工加入空行）

(for /f "delims=" %%i in (***.reg.inf) do if not "%%i"=="[;]" if not "%%i"=="[****_DelReg]" if not "%%i"=="Provider=kajaa@eastday.com, 2002" if not "%%i"=="[DestinationDirs]" echo %%i)>temp.inf


rem 删除带";"的行
setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir /b/s/a-d "%~dp0*.inf"') do (
findstr /b /i /v ";" "%%i">"%%~dpni.new"
del /q "%%i"
ren "%%~dpni.new" "%%~ni.inf"
endlocal
rem 删除空行
setlocal enabledelayedexpansion
for /f "delims=" %%b in ('dir /b/s/a-d "%~dp0*.inf"') do (
findstr /r /c:"[^ ]" "%%b">%%~dpi__%%~nxi
del /q "%%b"
ren "%%~dpi__%%~nxi" "%%~nxi")
endlocal
... ...
复制代码

去掉inf文件名中多余的字符[Batcher和hanyeguxing分别写了两个成功的方案]：

setlocal enabledelayedexpansion
for %%a in (*.reg.inf) do (
for %%h in ("%%~na") do (
ren "%%a" "%%~nh.inf"
rem (@echo off&setlocal enabledelayedexpansion
for %%a in (*.reg.inf) do (
        set a=%%a
        ren "%%a" "!a:~0,-7!inf"
)
复制代码

附reg2inf.com

temp

原帖由 hanyeguxing 于 2010-12-19 12:49 发表
@echo off&setlocal enabledelayedexpansion
title=注册表文件%~nx1自动为转换%~n1.inf
if /i not "%~x1%"==".reg" echo 错误&pause&exit
reg2inf.com "%~nx1">nul
(for /f "usebackq delims=" %%a in ("%~n1.re ...

衷心感谢hanyeguxing,您写的代码短小精悍,处理速度极快,完全满足了我的设想!谢谢!谢谢!

同时也感谢批处理之家论坛的所有管理者和技术组的各位朋友们,谢谢!

hanyeguxing

@echo off&setlocal enabledelayedexpansion
title=注册表文件%~nx1自动为转换%~n1.inf
if /i not "%~x1%"==".reg" echo 错误&pause&exit
reg2inf.com "%~nx1">nul
(for /f "usebackq delims=" %%a in ("%~n1.reg.inf") do (
        set "a=%%a"
        set n=保留
        if "!a!"=="Provider=kajaa@eastday.com, 2002" set n=空行
        if "!a!"=="[DestinationDirs]" set n=删除
        if "!a:~0,1!!a:~-8!"=="[_DelReg]" set n=删除
        if "!n!"=="保留" (echo !a!) else if "!n!"=="空行" echo/
))>"%~n1.inf"
del /q "%~n1.reg.inf"
复制代码

[ 本帖最后由 hanyeguxing 于 2010-12-19 13:14 编辑 ]