[文本处理] [已解决]批处理怎样替换winrar压缩文件txt中的某些字符？

@Echo Off&SetLocal EnableDelayedExpansion
If NOT Exist temp Md temp
Set "Name=你的RAR文件名"
Set "Hpath=C:\Program Files\WinRAR" Rem 这里改为你电脑中RAR的实际路径
%Hpath%\Rar.exe x "%~dp0\Name" "%~dp0\temp"
Del "%~dp0\Name"
For /R temp %%I IN (*.txt) Do (
  (For /F "Usebackq Delims=" %%J IN ("%%I") Do (
     Set "Str=%%J"&Echo !Str:原内容=现在的内容!
  ))>"%%~dpI\tem"
  move "%%~dpI\tem" "%%I"
  %Hpath%\Rar.exe a -ep -dw "%%~dp0\Name" "%%I"
)
Rd temp
复制代码

@Echo Off&SetLocal EnableDelayedExpansion
If NOT Exist temp Md temp
Set "Hpath=C:\Program Files\WinRAR" Rem 这里改为你电脑中RAR的实际路径
For %%A IN (*.rar) Do (
  "%Hpath%\Rar.exe" x "%~dp0\%%A" "%~dp0\temp"
  Del "%~dp0\%%A"
  For /R temp %%I IN (*.txt) Do (
    (For /F "Usebackq Delims=" %%J IN ("%%I") Do (
       Set "Str=%%J"&Echo,!Str:原内容=现在的内容!
    ))>"%%~dpI\tem"
    Move "%%~dpI\tem" "%%I"
    "%Hpath%\Rar.exe" a -ep -dw "%~dp0\%%A" "%%I"
  )
)
Rd temp
复制代码

@Echo Off&SetLocal EnableDelayedExpansion
If NOT Exist temp Md temp
Set "Hpath=C:\Program Files\WinRAR" Rem 这里改为你电脑中RAR的实际路径
For %%a IN (*.rar) Do (
   If Not Defined %%~na (
      "%Hpath%\Rar.exe" x "%~dp0\%%A" "%~dp0\temp"
      Del "%~dp0\%%A"
      For /R temp %%I IN (*.txt) Do (
        (For /F "Usebackq Delims=" %%J IN ("%%I") Do (
           Set "Str=%%J"&Echo,!Str:原内容=现在的内容!
        ))>"%%~dpI\tem"
        Move "%%~dpI\tem" "%%I"
        "%Hpath%\Rar.exe" a -ep -dw "%~dp0\%%A" "%%I"
      )
      Set "%%~na=a"
  )
)
Rd temp
复制代码

@Echo Off&SetLocal EnableDelayedExpansion
If NOT Exist temp Md temp
Set "Hpath=C:\Program Files\WinRAR" Rem 这里改为你电脑中RAR的实际路径
For %%A IN (*.rar) Do (
   If Not Defined %%~NA (
      "%Hpath%\Rar.exe" x "%~dp0\%%A" "%~dp0\temp"
      Del "%~dp0\%%A"
      For /R temp %%I IN (*.txt) Do (
        (For /F "Usebackq Delims=" %%J IN ("%%I") Do (
           Set "Str=%%J"&Echo,!Str:原内容=现在的内容!
        ))>"%%~dpI\tem"
        Move "%%~dpI\tem" "%%I"
        "%Hpath%\Rar.exe" a -ep -dw "%~dp0\%%A" "%%I"
      )
      Set "%%~NA=A"
  )
)
Rd temp
复制代码

rar e -inul -n*.txt "1.rar" $$$\
复制代码

@Echo Off&SetLocal EnableDelayedExpansion
If NOT Exist temp Md temp
Set "RpStr=原内容1-现在内容1 原内容2-现在内容2 原内容3-现在内容3 原内容4-现在内容4"
For /F tokens^=2delims^=^" %%A In ('Ftype winrar') Do Set "Mrar=%%A" 
For /F "delims=" %%A IN ('Dir /a-d /b /s *.rar') Do (
  "%Mrar%" x "%~dp0\%%A" "%~dp0\temp"
  Del "%~dp0\%%A"
  For /R temp %%I IN (*.txt) Do (
    (For /F "Usebackq Delims=" %%J IN ("%%I") Do (
       Set "Str=%%J"
       For %%K In ("%RpStr%") Do (
         For /F "tokens=1,2 delims=-" %%L In ("%%K") Do Set "Str=!Str:%%L=%%M!"
       )
       Echo,!Str!
    ))>"%%~dpI\tem"
    Move "%%~dpI\tem" "%%I"
    "%Mrar%" a -ep -dw "%~dp0\%%A" "%%I"
  )
)
Rd temp
复制代码