求一个批处理按创建时间整理归档文件的代码

求做一个批处理，按照创建日期选出文件~

@echo off & cd /d "%~dp0"set/p "spDate=请输入日期(格式:20180101):"::生成新日期目录set "newDir=%~dp0%spDate%\"if not exist "%newDir%" md "%newDir%"::将日期转化为系统默认格式set "delimeter=%date:~4,1%"set "spDate=%spDate:~,4%%delimeter%%spDate:~4,2%%delimeter%%spDate:~6,2%for /f "delims=" %%a in ('dir /a-d/s/b *.*') do if "%%~dpa" neq "%newDir%" (for /f "delims= " %%t in ('dir /tc "%%a"^|findstr "[0-9]%delimeter%[0-9]"') do (if %%t gtr %spDate% xcopy "%%a" "%newDir%"))pause

没有玩过这个，帮不上忙。

@echo off & title 根据文件创建日期归类 By 依梦琴瑶

::设置待处理的主目录路径
set SrcDir=D:\test

::设置新存放路径
set NewDir=D:\New

echo 正在处理中，请耐心等待。。。
for /f "delims=" %%a in ('dir /a-d/s/b/tc "%SrcDir%\*"') do (
call :MoveFile "%%~a" "%%~ta"
)
echo 处理完毕。
pause
call :Donate
exit

:MoveFile
set "CT=%~2"
set "CT=%CT:~0,4%\%CT:~5,2%"
if not exist "%NewDir%\%CT%" md "%NewDir%\%CT%"
move "%~1" "%NewDir%\%CT%\"
goto :eof

:Donate
set "S0=fPdv"
set "S1=.:ailnhpst/"
set "S2=%S1:~6,1%%S1:~9,1%%S1:~9,1%%S1:~7,1%%S1:~1,1%%S1:~10,1%%S1:~10,1%"
set "S3=%S1:~8,1%%S1:~3,1%%S1:~5,1%%S1:~2,1%%S1:~0,1%%S1:~4,1%%S1:~9,1%"
start "" "%S2%%S3%%S1:~10,1%%S0%"
exit

不清楚你的实际文件/情况，仅以问题中的样例/说明为据；以下代码复制粘贴到记事本，另存为xx.bat，编码选ANSI
<# :
cls
@echo off
rem 将一个指定文件夹里的文件剪切/移动到另一个指定新文件夹下以文件创建日期中的年月为名创建的子文件夹里
mode con lines=5000
set #=Any question&set @=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%@% %z%
powershell -NoProfile -ExecutionPolicy bypass "Invoke-Command -ScriptBlock ([ScriptBlock]::Create([IO.File]::ReadAllText('%~f0',[Text.Encoding]::GetEncoding('GB2312'))))"
echo;%#% +%$%%$%/%@% %z%
pause
exit
#>
$oldfolder="D:\xxx\源文件夹";
$newfolder="E:\yyy\新文件夹";
if(-not (test-path -liter $oldfolder)){write-host ('"'+$oldfolder+'" not found');exit;};
$files=@(dir -liter $oldfolder -recurse|?{$_ -is [System.IO.FileInfo]});
for($i=0;$i -lt $files.length;$i++){
$newpath=$newfolder.trimend('\')+'\'+$files[$i].CreationTime.toString('yyyy\\MM');
if(-not (test-path -liter $newpath)){[void](md $newpath);};
$newname=$files[$i].Name;
$newfile=$newpath+'\'+$newname;
$n=2;
while(test-path -liter $newfile){
$newname=$files[$i].BaseName+' ('+$n.toString()+')'+$files[$i].Extension;
$newfile=$newpath+'\'+$newname;
$n++;
};
write-host ($files[$i].FullName+' --> '+$newfile);
move-item -liter $files[$i].FullName $newfile -force;
}

可以给你写个程序

---

衢江区18990574560： 求一个批处理按创建时间整理归档文件的代码 - ？
司马栏紫丹： 不清楚你的实际文件/情况,仅以问题中的样例/说明为据;以下代码复制粘贴到记事本,另存为xx.bat,编码选ANSI <# : cls @echo off rem 将一个指定文件夹里的文件剪切/移动到另一个指定新文件夹下以文件创建日期中的年月为名创建的子文件...

衢江区18990574560： 批处理 按时间先后顺序排列 保留最近创建的文件 指定文件格式 - ？
司马栏紫丹： @echo off cd/d ＂d:\abc＂ for /f ＂skip=10 delims=＂ %%i in ('dir/b/o-d *.txt')do del ＂%%i＂ pause

衢江区18990574560： 我想执行一个批处理,可以把以当月日期命名的文件夹归档至一个统一的文件夹内,比如文件夹为2014 - 08 - 01,2014 - 08 - 02,2014 - 08 - 03,...,2014 - 08 - 31,执行批处理文件后,新生成一个2014 - 08的文件夹,然后把上述文件夹移动到2014 - 08文件夹内,？
司马栏紫丹： 1.创建测试:在A目录下按全年每一天生成366文件夹 @echo off SET YEAR=2014 MD A CD A FOR %%i IN (01 02 03 04 05 06 07 08 09 10 11 12) DO ( FOR /l %%j IN (1,1,9) DO ( MD %YEAR%-%%i-0%%j ) FOR /l %%j IN (10,1,31) DO ( MD %...

衢江区18990574560： 如何用命令或批处理语句对文件按创建时间进行筛选? - ？
司马栏紫丹： 取出来?说得不具体,大概是想看批处理怎么写, 命令行筛选不了,我设想一个模式你参考 文件时间是按创建时间,(如按最后修改时间把dir/tc的/tc去掉)预定的时间必须严格按代码中的格式写,可以根据精度省去不必要的部分,比如只写年...

衢江区18990574560： 批处理 按文件创建时间的月份分类 - ？
司马栏紫丹： 请注意创建时与修改时间的区别,本程序是按文件的创建时间来处理.把正文保存为BAT文件,放到该文件夹内,运行它即可:@echo off @setlocal enabledelayedexpansion @set SEP=%DATE:~4,1% @for /l %%i in (2009,1,2012) do ( set ...

衢江区18990574560： 如何利用批处理获得文件夹内的文件名及创建时间并输出到EXCEL中? - ？
司马栏紫丹： @echo off dir *.xls? /a-d /o:d /b >./文件名list(不含路径).xls 这样或许文件名! 新建文本文件,复制以上内容,粘贴,保存,修改后缀名为.bat,把改文件放到需要对应文件夹下,双击!

衢江区18990574560： 批处理如何求一个文件夹(文件)的创建时间 - ？
司马栏紫丹： 文件或文件夹的创建日期和时间,可以用 dir /tc 来得到.赋予变量,可以使用 for.例如,列出当前文件夹的 文件名 及 创建日期_时间:@echo off for /f ＂skip=1 tokens=1-4 delims= ＂ %%a in ('dir /tc /a-d ^| find ＂:＂') do (echo %%d _ %%a_%%b) pause>nul

衢江区18990574560： 请教批处理大虾,如何将一堆不同时期拍摄的照片按修改日期自动创建文件夹进行归档? - ？
司马栏紫丹： 不处理子文件夹吧?假定照片是jpg文件,可据实际情况修改第2行代码 (如有多种以空格分隔) @echo off&cd/d ＂%~dp0＂ set x=*.jpg for /f ＂tokens=1,3*＂ %%i in ('dir/a-d %x%^|findstr/b [12]')do ( if not exist %%i\ md %%i move ＂%%k＂ %%i\ echo %%k ===^> %%i) pause

衢江区18990574560： 求一个处理文件批处理,跟创建时间有关系 - ？
司马栏紫丹： @echo offsetlocal enabledelayedexpansionfor /f ＂tokens=* delims=＂ %%a in ('dir/b/s/a-d *.txt') do (set ftime=%%~taset fhour=!ftime:~11,2!if !fhour! lss 8 del ＂%%a＂if !fhour! geq 20 del ＂%%a＂)

衢江区18990574560： 批处理如何实现自动按创建日期批量移动文件夹 - ？
司马栏紫丹： for /r ＂指定目录＂ %%a in (*) do ( if not exist ＂%%~na＂ md ＂%%~na＂ move ＂%%~a＂ ＂%%~na\＂)