holley

回复 6# fzp070
晚上测试发现一个问题，，当我需转换的压缩包一多的时候，会出现zip包里 好几个其它包的文件都有的现象

fzp070

改进一版，解决了7z处理完仍继续跑完密码。
转换过的7z将其移动了"已转换的7z"文件夹内，你可以自行修改下 移动到其它位置或删除或改后缀名 都行。

@echo off
mkdir "%~dp0已转换的7z"

echo. 读取文本密码
for /f "delims=" %%x in ('TYPE pw.txt')do (set pw=%%x &call :chpw)

echo 运行结束
rd ~Tmp /s /q >nul 2>nul
pause
exit


:chpw
echo. 7z转换zip
path "%ProgramFiles%\7-Zip";%path%
setlocal enabledelayedexpansion
for /f "delims=" %%i in ('dir /b /a-d *.7z') do (set zf=%%i
7z x "!zf!" -p!pw! -o"%~dp0~Tmp" -aoa &&7z a "%%~dpni.zip" "%~dp0~Tmp\*" -y -sdel &&goto pass
)
goto :eof


:pass
move "!zf!" "%cd%\已转换的7z\"
rd ~Tmp /s /q >nul 2>nul

(for /f "delims=" %%a in ('dir /b /a-d *.7z') do set zf2=%%a)>nul 2>nul
if "%zf2%"=="" goto ok
goto :eof


:ok
echo 【7z转换zip已完成】
pause
exit
复制代码

fzp070

看了下，你的读取密码变量!pw!，只获取到了文本中的最后一个密码，所以会不正确，导致解密并打包zip失败。
我试了下这样子是可以的，但是有个弊端，就是已解压转zip成功，也会将文本所有密码跑完，建议增加一个检查转换成功就切换。

@echo off
echo. 读取文本密码
for /f "delims=" %%x in ('TYPE pw.txt')do (set pw=%%x &call :chpw)

echo 转换zip完成
pause
exit

:chpw
setlocal enabledelayedexpansion
echo. 7z转换zip
path "%ProgramFiles%\7-Zip";%path%
for /f "delims=" %%i in ('dir /b /s /a-d *.7z') do (
    7z x "%%i" -o"%~dp0~Tmp" -r -y -aos -p!pw! &&7z a "%%~dpni.zip" "%~dp0~Tmp\*" -y -sdel
rd ~Tmp /s /q
)
goto :eof
复制代码

flashercs

@echo on
setlocal enabledelayedexpansion
:pw
echo. 读取文本密码
for /f "delims=" %%x in ('TYPE pw.txt')do (
	set pw=%%x
)
:chpw
echo. 7z转换zip
path "%ProgramFiles%\7-Zip";%path%
(
for /f "delims=" %%i in ('dir /b /s /a-d *.7z') do (
    7z x "%%i" -o"%~dp0~Tmp" -r -y -aos
    7z a "%%~dpni.zip" "%~dp0~Tmp\*" -y -sdel
)
)<pw.txt
rd ~Tmp /s /q
复制代码

holley

回复 2# fzp070


    我测试 单个密码只传递一次没问题 多个密码貌似就没法正常转换了

fzp070

刚刚试了下，有密码也没问题啊！
建议你看下转换失败的，到底有没有解压成功？"%~dp0~Tmp"这个目录有没有解压的文件