[已解决]批处理按照顺序合并PDF 文件 - BAT求助&讨论 - 批处理之家 BAT,CMD,批处理,PowerShell,VBS,DOS - Powered by Discuz!

批处理之家 » BAT求助&讨论 » [已解决]批处理按照顺序合并PDF 文件

[新手上路]批处理新手入门导读	[视频教程]批处理基础视频教程	[视频教程]VBS基础视频教程	[批处理精品]批处理版照片整理器
[批处理精品]纯批处理备份&还原驱动	[批处理精品]CMD命令50条不能说的秘密	[在线下载]第三方命令行工具	[在线帮助]VBScript / JScript 在线参考

123 4 下一页

返回列表发帖

Rank: 1

帖子: 52
积分: 72
技术: 0
捐助: 0
注册时间: 2023-6-16

16楼 跳转到 »

发表于 2023-7-4 20:51 | 只看该作者

回复 14# 77七

77，能不能麻烦你在添加一个小功能呢，就是我给排序这些文件名，如果有一两个是实际上是不存在的，就是空有文件名，而实际没有这个文件，也可以忽视掉，直接合并。现在是如果文件夹少一个文件的话，就会提示无法合并。

Rank: 6 Rank: 6

帖子: 1699
积分: 2784
技术: 341
捐助: 50
注册时间: 2022-9-18

17楼

发表于 2023-7-5 07:13 | 只看该作者

本帖最后由 77七于 2023-7-6 14:32 编辑

回复 16# feiyan

@echo off
rem 站内下载pdftk，修改为实际路径
set "pdftk=C:\PDFtk\PDFtk\pdftk.exe"
for /d %%d in (*) do (
	pushd "%%d"
	setlocal enabledelayedexpansion
	for %%a in (S*.pdf) do set "str=!str! "%%a""
	for %%a in ("D C F*.pdf") do set "str=!str! "%%a""
	for %%a in ("D C S*.pdf") do set "str=!str! "%%a""
	for /f "delims=" %%a in ('dir /b /a-d *.pdf ^|findstr /rvb /c:"S" /c:"D C F" /c:"D C S" /c:"D P" /c:"D F"') do (
		set "str=!str! "%%a""
	)
	for %%a in ("D P*.pdf") do set "str=!str! "%%a""
	for %%a in ("D F*.pdf") do set "str=!str! "%%a""
	"%pdftk%" !str! cat output "%%~nxd.pdf"
	move /y "%%~nxd.pdf" ..
	endlocal
	popd
)
pause
复制代码

bat小白，请多指教！谢谢！

Rank: 1

帖子: 52
积分: 72
技术: 0
捐助: 0
注册时间: 2023-6-16

18楼

发表于 2023-7-5 15:17 | 只看该作者

回复 17# 77七
感谢77，想请你喝杯水，不知怎么操作

Rank: 6 Rank: 6

帖子: 1699
积分: 2784
技术: 341
捐助: 50
注册时间: 2022-9-18

19楼

发表于 2023-7-5 17:38 | 只看该作者

回复 18# feiyan

你的好意我心领了，谢谢。

bat小白，请多指教！谢谢！

Rank: 1

帖子: 52
积分: 72
技术: 0
捐助: 0
注册时间: 2023-6-16

20楼

发表于 2023-7-6 11:04 | 只看该作者

回复 19# 77七
77, 能麻烦修改下参数，把合并后文件输出到当前目录下，不用放到文件夹内，而且，如果当前目录已经存在相同的文件名的话，直接覆盖掉。

Rank: 6 Rank: 6

帖子: 1699
积分: 2784
技术: 341
捐助: 50
注册时间: 2022-9-18

21楼

发表于 2023-7-6 11:41 | 只看该作者

回复 20# feiyan

已在17楼修改。

bat小白，请多指教！谢谢！

Rank: 1

帖子: 52
积分: 72
技术: 0
捐助: 0
注册时间: 2023-6-16

22楼

发表于 2023-7-6 13:49 | 只看该作者

回复 21# 77七

提示框显示移动了一个文件，实际上没有移动，合并后的文件还是在文件夹内部，没有到和这个文件夹相同的这个目录下，也就是到文件夹外面来

Rank: 6 Rank: 6

帖子: 1699
积分: 2784
技术: 341
捐助: 50
注册时间: 2022-9-18

23楼

发表于 2023-7-6 14:03 | 只看该作者

回复 22# feiyan

16行末尾少写一个 .加上就行了。

bat小白，请多指教！谢谢！

Rank: 7 Rank: 7 Rank: 7

帖子: 2851
积分: 4173
技术: 430
捐助: 0
注册时间: 2016-2-20

24楼

发表于 2023-7-6 14:15 | 只看该作者

好像不行。因为第5行pushd后，在popd前，点代表pushd后的路径。
16行的.换成"%~dp0"试试。包括引号额。

Rank: 1

帖子: 52
积分: 72
技术: 0
捐助: 0
注册时间: 2023-6-16

25楼

发表于 2023-7-6 14:24 | 只看该作者

回复 24# qixiaobin0715

好像不行，提示系统找不到指定的文件

Rank: 1

帖子: 52
积分: 72
技术: 0
捐助: 0
注册时间: 2023-6-16

26楼

发表于 2023-7-6 14:29 | 只看该作者

回复 23# 77七
试了下，提示：遇到错误，系统未能创建输出，

Rank: 6 Rank: 6

帖子: 1699
积分: 2784
技术: 341
捐助: 50
注册时间: 2022-9-18

27楼

发表于 2023-7-6 14:32 | 只看该作者

本帖最后由 77七于 2023-7-6 14:33 编辑

回复 26# feiyan

已编辑，现在直接复制17楼代码，试试

bat小白，请多指教！谢谢！

Rank: 1

帖子: 52
积分: 72
技术: 0
捐助: 0
注册时间: 2023-6-16

28楼

发表于 2023-7-6 15:07 | 只看该作者

回复 27# 77七 [/b
非常感谢，我测试了一下，成功了，高手啊 :) :)

Rank: 1

帖子: 52
积分: 72
技术: 0
捐助: 0
注册时间: 2023-6-16

29楼

发表于 2023-10-2 14:07 | 只看该作者

回复 27# 77七 hi 77，我发现合并后的pdf 文件没有书签，但是我手动合并的PDF 文件是有书签的，能否在程序中加上书签功能，就是合并后的pdf 文件自动带书签的。

Rank: 6 Rank: 6

帖子: 1699
积分: 2784
技术: 341
捐助: 50
注册时间: 2022-9-18

30楼

发表于 2023-10-2 16:09 | 只看该作者

回复 29# feiyan

我测试合并后是带书签的，先用以下代码把pdf文件处理一遍，再合并试试

@echo off
for %%a in (*.pdf) do (
	pdftk "%%a" cat output $.pdf
	pdftk "%%a" dump_data output report.txt
	pdftk $.pdf update_info report.txt output $1.pdf
	move $1.pdf "%%a"
	del $.pdf;report.txt
)
pause
复制代码

bat小白，请多指教！谢谢！

123 4 下一页