批处理如何实现指定日期文件夹移动功能

不清楚你的实际文件/情况，仅以问题中的样例/说明为据；以下代码复制粘贴到记事本，另存为xx.bat，编码选ANSI
/*&cls
@echo off
rem 将一个指定目录里以指定日期格式命名并小于指定日期的文件夹剪切/移动到另一个新的目录里
mode con lines=3000
set #=Any question&set @=WX&set $=Q&set/az=0x53b7e0b4
title %#% +%$%%$%/%@% %z%
set specday=20210101
set "oldfolder=C:\a"
set "newfolder=D:"
if not exist "%oldfolder%" (echo;"%oldfolder%" not found&pause&exit)
if not exist "%newfolder%" md "%newfolder%"
if "%oldfolder:~-1%" equ "\" set "oldfolder=%oldfolder:~,-1%"
if "%newfolder:~-1%" equ "\" set "newfolder=%newfolder:~,-1%"
for /f "delims=" %%a in ('dir /ad-h/b "%oldfolder%\"^|cscript -nologo -e:jscript "%~f0"') do (
if "%%a" lss "%specday%" (
set "f="&echo;"%oldfolder%\%%~nxa"
xcopy "%oldfolder%\%%~nxa" "%newfolder%\%%~nxa\" /y /e /q /h /r||(set f=1)
if not defined f (rd /s /q "%oldfolder%\%%~nxa")
)
)
echo;%#% +%$%%$%/%@% %z%
pause
exit
*/
while(!WSH.StdIn.AtEndOfStream){
var it=WSH.StdIn.ReadLine();
if(/^\d{8}$/.test(it)){WSH.echo(it);}
}