Rename files if they were modified within 20 minutes - China DOS Union Forum

Scan the D:\rec\ directory, excluding hidden/system-attribute files and excluding subdirectories:

@echo off&setlocal enabledelayedexpansion
set Date_D=%date:~0,10%
for /f "tokens=1,2 delims=:" %%a in ("%time%") do (
set Time_H=%%a&set Time_M=%%b
if "!Time_M:~0,1!"=="0" set Time_M=!Time_M:~1!
set/a Time_M-=20
if !Time_M! lss 0 set/a Time_H-=1,Time_M+=60
if !Time_H! lss 0 set Time_H=23&call:Date_D,1)
set Time_H=0%Time_H%&set Time_M=0%Time_M%&set Date_D=%Date_D% !Time_H:~-2!:!Time_M:~-2!&set Date_M=!Date_D::=-!
for %%a in ("D:\rec\*.*") do if "%Date_D%" leq "%%~ta" ren "%%a" "%%~na-%Date_M%%%~xa"
pause&exit
:Date_D
for /f "tokens=1-3 delims=-:/ " %%a in ("%date%") do (
set Date_Y=%%a&set Date_M=%%b&set Date_D=%%c
if "!Date_M:~0,1!"=="0" set Date_M=!Date_M:~1!
if "!Date_D:~0,1!"=="0" set Date_D=!Date_D:~1!)
set/a Date_D-=%1
if %Date_D% gtr 0 goto:Date_Y
:Date_M
set/a Date_M-=1
if !Date_M!==0 set/a Date_Y-=1,Date_M=12
set/a "Date_T=^!(Date_M-2)","Date_R=(^!(Date_Y%%4)&^!^!(Date_Y%%100))|^!(Date_Y%%400)","Date_C=^!(Date_M-4)|^!(Date_M-6)|^!(Date_M-9)|^!(Date_M-11)","Date_D=Date_T*(28+Date_R)+Date_C*30+(^!Date_T&^!Date_C)*31+Date_D"
if %Date_D% leq 0 goto:Date_M
:Date_Y
set Date_M=0%Date_M%&set Date_D=0%Date_D%&set Date_D=%Date_Y%-!Date_M:~-2!-!Date_D:~-2!

[ Last edited by Hanyeguxing on 2010-6-11 at 15:05 ]

Floor1　balihaha	Posted 2010-06-11 11:41
新手上路　Posts 1　Credits 1
Basically, scan all files in a folder. If a file is found to have been modified within 20 minutes, automatically rename it. Format: original filename + date + time How should the script be written? Thanks.

Floor2　Hanyeguxing	Posted 2010-06-11 15:02
银牌会员　Posts 897　Credits 1,039　From 在地狱中仰望天堂
Scan the D:\rec\ directory, excluding hidden/system-attribute files and excluding subdirectories: @echo off&setlocal enabledelayedexpansion set Date_D=%date:~0,10% for /f "tokens=1,2 delims=:" %%a in ("%time%") do ( set Time_H=%%a&set Time_M=%%b if "!Time_M:~0,1!"=="0" set Time_M=!Time_M:~1! set/a Time_M-=20 if !Time_M! lss 0 set/a Time_H-=1,Time_M+=60 if !Time_H! lss 0 set Time_H=23&call:Date_D,1) set Time_H=0%Time_H%&set Time_M=0%Time_M%&set Date_D=%Date_D% !Time_H:~-2!:!Time_M:~-2!&set Date_M=!Date_D::=-! for %%a in ("D:\rec\.") do if "%Date_D%" leq "%%~ta" ren "%%a" "%%~na-%Date_M%%%~xa" pause&exit :Date_D for /f "tokens=1-3 delims=-:/ " %%a in ("%date%") do ( set Date_Y=%%a&set Date_M=%%b&set Date_D=%%c if "!Date_M:~0,1!"=="0" set Date_M=!Date_M:~1! if "!Date_D:~0,1!"=="0" set Date_D=!Date_D:~1!) set/a Date_D-=%1 if %Date_D% gtr 0 goto:Date_Y :Date_M set/a Date_M-=1 if !Date_M!==0 set/a Date_Y-=1,Date_M=12 set/a "Date_T=^!(Date_M-2)","Date_R=(^!(Date_Y%%4)&^!^!(Date_Y%%100))\|^!(Date_Y%%400)","Date_C=^!(Date_M-4)\|^!(Date_M-6)\|^!(Date_M-9)\|^!(Date_M-11)","Date_D=Date_T(28+Date_R)+Date_C30+(^!Date_T&^!Date_C)31+Date_D" if %Date_D% leq 0 goto:Date_M :Date_Y set Date_M=0%Date_M%&set Date_D=0%Date_D%&set Date_D=%Date_Y%-!Date_M:~-2!-!Date_D:~-2! [ Last edited by Hanyeguxing on 2010-6-11 at 15:05* ]

Floor3　pdanniel66	Posted 2010-06-11 20:41
初级用户　Posts 64　Credits 68
create D:\rec\ folder and files test result as below: The system cannot find the path specified. Press any key to continue . . .