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

[文件操作] [已解决]批处理如何删除一层文件夹把里面的pdf文件剪切出来放到上一层?

[复制链接]
发表于 2023-9-19 20:38:04 | 显示全部楼层 |阅读模式
本帖最后由 liaoguinan 于 2023-9-20 16:37 编辑

如何删除一层文件夹把里面的pdf文件剪切出来放到上一层?


E:\测试\001\001-1\1.pdf
E:\测试\001\001-2\2.pdf
E:\测试\001\001-3\5.jpg

E:\测试\002\002-1\1.pdf
E:\测试\002\002-2\2.pdf
E:\测试\002\002-3\5.jpg

结果
E:\测试\001\1.pdf
E:\测试\001\2.pdf
E:\测试\001\001-3\5.jpg

E:\测试\002\1.pdf
E:\测试\002\2.pdf
E:\测试\002\002-3\5.jpg


如图的路径在测试文件夹下遍历判断如果是pdf文件则把上一级文件夹删除,把文件剪切到上一级

评分

参与人数 1PB +2 收起 理由
Batcher + 2 感谢给帖子标题标注[已解决]字样

查看全部评分

发表于 2023-9-19 21:56:01 | 显示全部楼层
本帖最后由 pd1 于 2023-9-19 21:58 编辑
  1. @echo off
  2. set "path=E:\测试"
  3. for /f "delims=" %%a in ('dir /b/s /a-d %path%*.pdf') do call :m %%a
  4. for /f "delims=" %%a in ('dir /b/s /ad %path%') do rd %%a 2>nul
  5. pause&exit
  6. :m
  7. pushd %~dp1
  8. cd..
  9. move %1 %cd%
  10. popd
复制代码
发表于 2023-9-20 01:00:18 | 显示全部楼层
  1. @echo off
  2. rem 批处理保存为ansi编码格式
  3. cd /d "e:\测试" || exit
  4. (for /d %%d in (*) do (
  5.         for /d %%e in ("%%d\*") do (
  6.                 move /-y "%%e\*.pdf" "%%d"
  7.                 if errorlevel 0 (
  8.                         rd "%%e"
  9.                 )
  10.         )
  11. )) 2>nul
  12. pause
复制代码

评分

参与人数 1技术 +1 收起 理由
liaoguinan + 1 感谢

查看全部评分

发表于 2023-9-20 02:07:34 | 显示全部楼层
不知行否,放到  e:\测试  文件夹里运行

  1. @echo off
  2. for /d %%a in (*) do (
  3. for /f "delims=" %%b in ('dir /s /b "%%~fa\*.pdf"') do (
  4. if "%%~dpb" neq "%%~fa" (
  5. if not exist "%%~fa\%%~nxb" (
  6. move "%%b" "%%~fa"
  7. ) else (
  8. move "%%b" "%%~fa\%%~nb___%%~nxb"
  9. )
  10. )
  11. rd "%%~dpb" 2>nul
  12. ))
复制代码

评分

参与人数 1技术 +1 收起 理由
liaoguinan + 1 感谢

查看全部评分

 楼主| 发表于 2023-9-20 06:48:47 | 显示全部楼层
回复 4# Five66


    可以运行,但是有个问题是否能解决呢?就是文件名超出系统限定长度的pdf文件好像是不执行操作的
 楼主| 发表于 2023-9-20 06:48:53 | 显示全部楼层
回复 3# 77七


        可以运行,但是有个问题是否能解决呢?就是文件名超出系统限定长度的pdf文件好像是不执行操作的
发表于 2023-9-20 07:14:26 | 显示全部楼层
回复 6# liaoguinan


   
文件名有多长?
发表于 2023-9-20 08:10:53 | 显示全部楼层
这样的怎么处理
E:\测试\001\001-3\5.jpg
E:\测试\001\001-3\5.pdf
E:\测试\002\002-1\1.jpg
E:\测试\002\002-1\1.pdf
发表于 2023-9-20 08:31:27 | 显示全部楼层
本帖最后由 qixiaobin0715 于 2023-9-23 09:29 编辑

你可以举一个”文件名超出系统限定长度的pdf文件“例子,让大家看看。
  1. @echo off
  2. for /f "delims=" %%i in ('dir /s /b /a-d *.pdf') do (
  3.     move "%%i" "%%~dpi..">nul 2>nul
  4.     if not exist "%%~dpi.\*.pdf" rd "%%~dpi" 2>nul
  5. )
  6. pause
复制代码

评分

参与人数 1技术 +1 收起 理由
pd1 + 1 %%~dpi.. 学到了

查看全部评分

您需要登录后才可以回帖 登录 | 注册

本版积分规则

Archiver|手机版|小黑屋|批处理之家 ( 渝ICP备10000708号 )

GMT+8, 2026-3-18 12:07 , Processed in 0.025779 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

快速回复 返回顶部 返回列表