[新手上路]批处理新手入门导读[视频教程]批处理基础视频教程[视频教程]VBS基础视频教程[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动[批处理精品]CMD命令50条不能说的秘密[在线下载]第三方命令行工具[在线帮助]VBScript / JScript 在线参考
返回列表 发帖
本帖最后由 77七 于 2024-3-15 15:16 编辑

执行代码前 手动创建一个空白页的pdf文件,命名为 空白页.pdf

  1. @echo off
  2. rem 批处理保存为ansi编码格式
  3. rem 下载pdftk http://bcn.bathome.net/tool/PDFtk.rar
  4. cd /d "%~dp0"
  5. setlocal enabledelayedexpansion
  6. for /f "delims=" %%i in ('dir /b /a-d *.pdf ^|find /v /i "空白页.pdf"') do (
  7. pdftk "%%i" dump_data |findstr /rbec:"NumberOfPages:.*[13579]" 1>nul && (
  8. set str=!str! "%%i" 空白页.pdf
  9. ) || (
  10. set str=!str! "%%i"
  11. )
  12. )
  13. set str=!str!$$
  14. set "str=!str:空白页.pdf$$=!"
  15. set "str=!str:$$=!"
  16. for %%i in (.) do (
  17. echo 合并 !str!
  18. pdftk !str! cat output "%%~nxi.pdf"
  19. )
  20. endlocal
  21. pause
复制代码
1

评分人数

bat小白,请多指教!谢谢!

TOP

返回列表