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

[文件操作] [已解决]批处理检索一级子目录和一级子文件,名称中含有中文,就删除

[复制链接]
发表于 2024-9-29 16:24:52 | 显示全部楼层 |阅读模式
[已解决]检索某个目录的根目录下,一级子目录和一级子文件,名称中含有中文,就删除对应的子目录和子文件。
比如:c:\360用户文件,c:\360极速浏览器X下载,c:\360安全浏览器下载,c:\Windows_10_64位_中文专业版.iso,类似的子目录及其所有子目录全删除,类似的子文件也删除。。
比如:C:\Users,C:\Program Files,C:\Program Files (x86),C:\Windows,这种英文的就不修改。

评分

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

查看全部评分

发表于 2024-9-29 18:07:06 | 显示全部楼层
本帖最后由 aloha20200628 于 2024-9-29 18:34 编辑

回复 1# ygqiang

以下代码存为 test.bat 放在根目录下运行
当前代码用于实际删除前预览删除结果是否正确,若仅删除第9行前缀 REM 关键字,和删除整个第10行则变为实际删除

  1. @echo off &setlocal
  2. for /f "delims=" %%F in ('dir /b/a-d') do set "nF=%%~nF"&call :testHZ 1 "%%F"
  3. for /f "delims=" %%D in ('dir /b/ad') do set "nF=%%~nD"&call :testHZ 2 "%%D"
  4. endlocal&pause&exit/b
  5. :testHZ
  6.         if "%nF%"=="" (exit/b)
  7.         set "c=%nF:~,1%"
  8.         if "%c%" gtr "Z" (
  9.                 REM if %1 equ 1 (del /q "%~2") else (rd /s/q "%~2")
  10.                 if %1 equ 1 (echo,del /q "%~2") else (echo,rd /s/q "%~2")
  11.                 exit/b
  12.         )
  13.         set "nF=%nF:~1%" &goto :testHZ
  14.         exit/b
复制代码

评分

参与人数 1技术 +1 收起 理由
Batcher + 1 乐于助人

查看全部评分

 楼主| 发表于 2024-9-29 20:09:29 | 显示全部楼层
回复  ygqiang

以下代码存为 test.bat 放在根目录下运行
当前代码用于实际删除前预览删除结果是否正确 ...
aloha20200628 发表于 2024-9-29 18:07



    测试成功,感谢。
发表于 2024-9-30 08:59:17 | 显示全部楼层
  1. @echo off
  2. for /f "delims=" %%i in ('dir /b /ad^|findstr /r /c:"[^- '!-Z]"') do (
  3.     echo,rd /s /q /f "%%i"
  4. )
  5. for /f "delims=" %%i in ('dir /b /a-d^|findstr /r /c:"[^- '!-Z]"') do (
  6.     echo,del /f /q "%%i"
  7. )
  8. pause
复制代码
 楼主| 发表于 2024-9-30 18:59:43 | 显示全部楼层
qixiaobin0715 发表于 2024-9-30 08:59



前面加上cd /d d:\
这个代码有问题,各种非中文的子目录和子文件,都会显示。
您需要登录后才可以回帖 登录 | 注册

本版积分规则

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

GMT+8, 2026-3-17 18:21 , Processed in 0.019664 second(s), 8 queries , File On.

Powered by Discuz! X3.5

© 2001-2026 Discuz! Team.

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