-
-
2个批处理简单 修改
-
发表于:
2015-12-1 12:38
3968
-
1、
修改为
从c:\Temp\，到f:\a\，包含子文件夹
自动复制doc、jpg、txt几种指定后缀文件,后台运作，不显示窗口
set a=WScript.CreateObject("WScript.Shell")
a.run "%Comspec% /c echo y|xcopy /s /e c:\Temp\*.* f:\a\",0
2、
修改为
支持文件夹拖拽
拖拽文件夹到窗口，然后清理文件夹下所有空文件夹
@echo off
echo.
echo 说明此工具会删除指定目录所在空文件夹及其子目录下的空文件夹，以节省空间．
echo.
echo.
echo 本例只限删除１０层内父子目录关系的所有空文件夹。
echo １０层以上请更改下面代码(1 1 10)中的１０数字即可．
echo.
set /p par=请输入空文件夹所在的盘符或目录（如d:\或d:\a\）,输入确认无误后请按回车：
echo.
echo 当前工作目录为： %par%
echo 任意键 开始删除空文件夹
pause>nul
echo -----------------------------------------------------------------------------
for /l %%i in (1 1 10) do (
for /f "delims=" %%a in ('dir /b/s/ad %par%') do (
2>nul rd "%%a\"&&echo 成功删除空文件夹：%%a
)
)
echo -----------------------------------------------------------------------------
echo 按任意键退出
pause>nul
exit
谢谢
[注意]传递专业知识、拓宽行业人脉——看雪讲师团队等你加入！
