做个批处理，或vbs，把文件夹里指定日期的文件 移动到 新建的以日期为名称的文件夹里

szmsys

求助大家，做个批处理，或者VBS，每天运行，把文件夹里指定日期的文件 移动到 新建的以日期为名称的文件夹里，比如：

C:\sample\ 里面有按日期生成的文件：
2023-09-01-1.txt
2023-09-01-2.txt
。。。
2023-09-02-1.txt
2023-09-02-2.txt
。。。
2023-09-03-1.txt
2023-09-03-2.txt
。。。

批处理，或vbs，在 C:\sample\ 里面生成一个 以昨天的日期为名称的文件夹，比如，今天是2023年9月4日，则生成一个名称是 2023-09-03 的文件夹，然后，把 C:\sampke 文件夹里 生成日期为 2023-09-03 全部文件移动到这个文件夹里，不是此日期生成的文件，不移动。

水泊蓝山

感觉把逻辑搞复杂了，既然是天天都要运行，在每晚23：59 把当天的文件放到今天日期目录下不就好了。。

ppll2030

szmsys 发表于 2023-9-9 07:15
大佬，能不能加一个判断句？如果没有符合条件的文件，就不新建文件夹，以免每天运行时，产生大量空文件夹 ...

1. @echo off
   
2. 
   
3. (echo d=Date(^)-1
   
4. echo yd=Right(DatePart("yyyy",d^),4^)^&"-"^&Right("0"^&DatePart("m",d^),2^)^&"-"^&Right("0"^&DatePart("D",d^),2^)
   
5. echo wscript.echo yd
   
6. ) > yd.vbs
   
7. 
   
8. for /f %%a in ('cscript yd.vbs') do set yd=%%a
   
9. del /q yd.vbs
   
10. echo.&echo 即将把%yd%的文件全部转移到%yd%文件夹下。
    
11. echo.&pause
    
12. 
    
13. set p=c:\sample
    
14. ::md "%p%\%yd%" >nul 2>nul
    
15. FOR /f "delims=" %%a IN ('dir /b /a:a %p% ^| FINDSTR /ilc:%yd%') DO (
    
16.         if not exist %p%\%yd% md %p%\%yd%
    
17.         move "%p%\%%a" "%p%\%yd%" )>nul
    
18. cls&echo.&if not exist %p%\%yd% (echo %yd%没有发现任何文件。) else echo %yd%的文件转移完成。
    
19. timeout /t 2 >nul

复制代码

ppll2030

szmsys 发表于 2023-9-9 06:24
这个可行。只是，需要用任务计划每天定时运行，所以，还得一个批处理才行。因为昨天的文件夹名称每天都在 ...

1. @echo off
   
2. title: 根据文件的修改日期移动自身到对应修改日期命名的文件夹下
   
3. 
   
4. for /f "tokens=3" %%i in ('reg query "HKCU\Control Panel\International" ^| findstr /ilc:"sShortDate"') do set sShortDate=%%i
   
5. for /f "tokens=2,*" %%j in ('reg query "HKCU\Control Panel\International" ^| findstr /ilc:"sTimeFormat"') do set sTimeFormat=%%k
   
6. reg add "HKCU\Control Panel\International" /f /v "sShortDate" /t REG_SZ /d "yyyy/MM/dd" >nul
   
7. reg add "HKCU\Control Panel\International" /f /v "sTimeFormat" /t REG_SZ /d "HH:mm:ss" >nul
   
8. 
   
9. set p=c:\sample
   
10. for /f "tokens=1,3,*" %%i in ('dir /a-d %p% ^| findstr /ilc:"/" ^| findstr /ilvc:"%date%"') do call :filing %%i "%%k"
    
11. 
    
12. reg add "HKCU\Control Panel\International" /f /v "sShortDate" /t REG_SZ /d "%sShortDate%" >nul
    
13. reg add "HKCU\Control Panel\International" /f /v "sTimeFormat" /t REG_SZ /d "%sTimeFormat%" >nul
    
14. 
    
15. cls&echo.&echo 所有文件整理完成。
    
16. timeout /t 3 >nul
    
17. start %p%
    
18. exit
    
19. 
    
20. :filing
    
21. set f=%1
    
22. set f=%f:/=-%
    
23. echo %f%
    
24. if not exist %p%\%f% md %p%\%f%
    
25. move %p%\%2 %p%\%f%
    

复制代码

szmsys

ppll2030 发表于 2023-9-4 10:43
两个关键点，一个昨天日期，一个关键字搜索。
刚好有空，嘚瑟一下。各位大佬轻喷。

大佬，能不能加一个判断句？如果没有符合条件的文件，就不新建文件夹，以免每天运行时，产生大量空文件夹。谢谢

szmsys

ppll2030 发表于 2023-9-9 00:06
那你用上一个把非当天文件转移到昨天文件夹的脚本一起用呗。
先把昨天以前的转移到昨天文件夹，再用这个 ...

这个可行。只是，需要用任务计划每天定时运行，所以，还得一个批处理才行。因为昨天的文件夹名称每天都在变化。

ppll2030

szmsys 发表于 2023-9-8 23:45
使用中，又发现新问题，能不能只归类昨天及以前的文件，不要归类今天的文件。因为今天的还没完全准备好。 ...

那你用上一个把非当天文件转移到昨天文件夹的脚本一起用呗。
先把昨天以前的转移到昨天文件夹，再用这个脚本把里面的文件整理归类就好了。

szmsys

ppll2030 发表于 2023-9-7 23:40
吃完饭练练手。试试看吧。

使用中，又发现新问题，能不能只归类昨天及以前的文件，不要归类今天的文件。因为今天的还没完全准备好。

谢谢！

ppll2030

helloman 发表于 2023-9-8 21:42
去掉6-7行，把指定目录下昨日及以前的创建的文件移动到以昨日为文件名的文件夹，也挺方便的

去掉保护，在输入的时候，就要谨慎一点，要有心里准备可能引发不可知的结果。

ppll2030

szmsys 发表于 2023-9-8 21:09
那你根据提点，弄个稳定普适版

我那个就是普适版啊。适用于不同个性设置的机子。

helloman

跟着楼主蹭批处理整理桌面，挺好！

helloman

ppll2030 发表于 2023-9-7 23:40
吃完饭练练手。试试看吧。

去掉6-7行，把指定目录下昨日及以前的创建的文件移动到以昨日为文件名的文件夹，也挺方便的

helloman

nttwqz 发表于 2023-9-7 22:05

按照修改日期归档到以修改日期命名的文件夹，挺好！

szmsys

ppll2030 发表于 2023-9-8 21:04
大佬只是提点。具体需求还是要自己要动手滴。

那你根据提点，弄个稳定普适版

ppll2030

szmsys 发表于 2023-9-8 20:54
算了 还是你的靠谱

大佬只是提点。具体需求还是要自己要动手滴。

szmsys

ppll2030 发表于 2023-9-8 20:37
有局限性，不过完成你那个修改日期的需求足够了。前提也是你要修改过日期显示不能出现"/"。不然会出错找 ...

算了 还是你的靠谱

ppll2030

szmsys 发表于 2023-9-8 19:50
就这一行代码就行？连个文件夹路径都没有

有局限性，不过完成你那个修改日期的需求足够了。前提也是你要修改过日期显示不能出现"/"。不然会出错找不到文件夹路径。

szmsys

水泊蓝山 发表于 2023-9-8 16:54
win7 不知道有没有 forfiles 命令

就这一行代码就行？连个文件夹路径都没有

szmsys

ppll2030 发表于 2023-9-8 17:17
还是大佬厉害啊。又学到一招

只有这一行代码就行？连个文件夹路径都没有

ppll2030

水泊蓝山 发表于 2023-9-8 16:54
win7 不知道有没有 forfiles 命令

还是大佬厉害啊。又学到一招

水泊蓝山

win7 不知道有没有 forfiles 命令

1. forfiles /m *.txt /c "cmd /c md @fdate&copy @path @fdate"

复制代码

不用理它建目录的出错信息。

什么年代了还在用win7啊！

ppll2030

szmsys 发表于 2023-9-8 12:17
把第 06 07 两行的 if 语句去掉，测试成功，不知道这两行干嘛的？

防止直接回车，和输入错误格式比如后尾带空格等，造成运行失败。

szmsys

ppll2030 发表于 2023-9-7 23:40
吃完饭练练手。试试看吧。

把第 06 07 两行的 if 语句去掉，测试成功，不知道这两行干嘛的？

szmsys

ppll2030 发表于 2023-9-7 23:40
吃完饭练练手。试试看吧。

win7测试失败，麻烦检查一下

szmsys

ppll2030 发表于 2023-9-7 23:40
吃完饭练练手。试试看吧。

辛苦了，我试试

ppll2030

szmsys 发表于 2023-9-7 11:13
老大给个成品批处理试试啊

吃完饭练练手。试试看吧。

1. @echo off
   
2. title: 根据文件的创建日期移动其到对应创建日期命名的文件夹下
   
3. 
   
4. :begin
   
5. echo.&set /p p=  请输入需整理的文件夹路径（例如：c:\sample ）：
   
6. if not defined p echo 没发现文件夹路径 &pause&cls&goto :begin
   
7. if "%p:~1,2%"==":" (if "%p:~-1%"==" " (set p=%p:~0,-1%)) else (echo 你输入的路径不正确 &pause&cls&goto :begin)
   
8. for /f "tokens=3" %%i in ('reg query "HKCU\Control Panel\International" ^| findstr /ilc:"sShortDate"') do set sShortDate=%%i
   
9. for /f "tokens=2,*" %%j in ('reg query "HKCU\Control Panel\International" ^| findstr /ilc:"sTimeFormat"') do set sTimeFormat=%%k
   
10. reg add "HKCU\Control Panel\International" /f /v "sShortDate" /t REG_SZ /d "yyyy/MM/dd" >nul
    
11. reg add "HKCU\Control Panel\International" /f /v "sTimeFormat" /t REG_SZ /d "HH:mm:ss" >nul
    
12. for /f "tokens=1,3,*" %%i in ('dir /a-d /tc %p% ^| findstr /ilc:"/"') do call :filing %%i "%%k"
    
13. reg add "HKCU\Control Panel\International" /f /v "sShortDate" /t REG_SZ /d "%sShortDate%" >nul
    
14. reg add "HKCU\Control Panel\International" /f /v "sTimeFormat" /t REG_SZ /d "%sTimeFormat%" >nul
    
15. cls&echo.&echo 所有文件整理完成。
    
16. timeout /t 3 >nul
    
17. start %p%
    
18. exit
    
19. 
    
20. :filing
    
21. set f=%1
    
22. set f=%f:/=-%
    
23. echo %f%
    
24. if not exist %p%\%f% md %p%\%f%
    
25. move %p%\%2 %p%\%f%
    

复制代码

nttwqz

说起来，现代操作系统都支持文件分组显示，且支持文件名、文件类型、文件大小、文件修改时间等多种分组方式，所以个人感觉，楼主根本就没有归类的必要，直接分组显示即可。

nttwqz

1. @echo off
   
2. setlocal enabledelayedexpansion
   
3. set title=按文件日期归类
   
4. title %title%
   
5. 
   
6. ::需要归类的目录
   
7. pushd %~dp0\test
   
8. 
   
9. for /f %%a in ("%date:/=-%") do set "today=%%a"
   
10. for /f %%a in ('dir /b *.txt 2^>nul') do (
    
11.         for /f %%b in ("%%~ta") do (
    
12.                 set "filedate=%%b"
    
13.                 set "filedate=!filedate:/=-!"
    
14.                 if not "!filedate!"=="%today%" (
    
15.                         set /a n+=1
    
16.                         set "list_!n!_file=%%~nxa"
    
17.                         set "list_!n!_date=!filedate!"
    
18.                 )
    
19.         )
    
20. )
    
21. 
    
22. if !n! EQU 0 (
    
23.         color 4f
    
24.         echo;无文件可归类！
    
25. ) else (
    
26.         for /l %%a in (1 1 !n!) do (
    
27.                 title %title% %%a/!n!
    
28.                 echo 正在移动 !list_%%a_file!
    
29.                 if not exist "!list_%%a_date!" mkdir "!list_%%a_date!"
    
30.                 move !list_%%a_file! !list_%%a_date!\ >nul
    
31.         )
    
32.         echo;
    
33.         echo;
    
34.         echo;文件按日期归类完毕！
    
35.         color 2f
    
36. )
    
37. echo;
    
38. pause

复制代码

szmsys

ppll2030 发表于 2023-9-7 10:43
确实。根据自身日期自动归类更方便了。可以一段时间，或是需要查看的时候，整理一次即可。

老大给个成品批处理试试啊

ppll2030

nttwqz 发表于 2023-9-6 23:39
我觉得楼主的需求描述把人带到了误区，既然每天运行，都要把所谓昨天日期的文件移动到昨天日期的文件夹里面 ...

确实。根据自身日期自动归类更方便了。可以一段时间，或是需要查看的时候，整理一次即可。