悬赏了，又来悬赏了，求一个批处理。微信红包！

xxnh

求一个批处理。要求是删除除指定文件夹外的所有文件夹。比如原位置有AD，AS，ZX，3个文件夹，一个软件运行后会自动生成另外一个文件夹，名称未知，要求保留AD，AS，ZX，，删除另外一个未知的。

nttwqz

免费赠送！

1. @echo off
   
2. pushd %~dp0\
   
3. for /f "delims=" %%a in ('dir /ad /b *.*') do if /i not "%%~a"=="AD" if /i not "%%~a"=="AS" if /i not "%%~a"=="ZX" rd /s /q "%%~fa"
   
4. pause

复制代码

nttwqz

我X，钱都这么好赚，这简直是撒人民币啊！

xxnh

速度回复啊

xxnh

果然强大，谢谢

xxnh

请加我微信号xxnh11

窄口牛

最好是先列表文件夹，运行程序，运行完再列表，对比出差文件夹，再删除。

xxnh

窄口牛 发表于 2017-12-9 07:37
最好是先列表文件夹，运行程序，运行完再列表，对比出差文件夹，再删除。

大侠，我正要提这个问题。算是增强要求。

zitiano

批处理不大了解，但易语言或Python写起来so easy

窄口牛

手机，获取链接不容易，:pe部分就是
这个帖子后半部分有最终成品。

窄口牛

1. @echo off
   
2. 
   
3. del /q temp.txt
   
4. dir 你的路径 /a /b /a:d >>temp.txt
   
5. start /wait 你的exe的路径和名字
   
6. for /f "delims=" %%j in ('dir 你的路径 /a /b /a:d^|findstr /i /v /g:temp.txt') do rd /s /q c:\%%j
   
7. exit
   

复制代码

lintrainwy

1. 
   
2. call :dirlist listPre
   
3. mkdir Dir2
   
4. call :dirlist listLater
   
5. 
   
6. rem 删除不同文件夹，删除相同文件夹使用：call :delDir true
   
7. call :delDir false
   
8. 
   
9. echo 运行前文件夹：%listPre%
   
10. echo 运行后文件夹：%listLater%
    
11. 
    
12. 
    
13. 
    
14. ::结束批处理
    
15. ::======================
    
16. goto :EOF
    
17. :dirlist
    
18. set listTemp=<nul
    
19. FOR /F "usebackq tokens=* delims=" %%i in (`dir *.*  /B /A:D`) do (
    
20.         set "listTemp=%%i/!listTemp!"
    
21. )
    
22. set "%~1=%listTemp%"
    
23. goto :EOF
    
24. ::======================
    
25. goto :EOF
    
26. :delDir
    
27. set listLaterloop=%listLater%
    
28. :delDir0
    
29. FOR /F "usebackq tokens=1* delims=/" %%i in ( `echo !listLaterloop!` ) do (
    
30.         if defined listLaterloop (
    
31.                 set "i=%%i"
    
32.                 set "j=%%j"
    
33.        
    
34.                 set "listPreloop=%listPre%"
    
35.                 set "found=false"
    
36.                 :delDir1
    
37.                 FOR /F "usebackq tokens=1* delims=/" %%k in ( `echo !listPreloop!` ) do (
    
38.                         if defined listPreloop (
    
39.                                 if !i!==%%k set "found=true"
    
40.                                 set "listPreloop=%%l" &goto :delDir1
    
41.                         )
    
42.                 )
    
43.                 if !found!==%~1 rd /s /q !i! && echo 已删除文件夹：!i!
    
44.                 set "listLaterloop=!j!" &goto :delDir0
    
45.         )
    
46. )
    
47. goto :EOF
    

复制代码