China DOS Union

### Step 1: Understanding the Overall Purpose
The overall goal of this batch script is to obtain the date that is 7 days prior to the current date and store it in the `nowdate` variable. It uses a combination of VBScript and batch processing to achieve this date calculation.

### Step 2: Breaking Down the `for /f` Command
The `for /f` loop is used for parsing the output of a command. Here's the breakdown of the specific line `for /f "tokens=1,2,3* delims=-" %%i in ('cscript /nologo %tmp%\tmp.vbs') do set d=%%k`:

- **`for /f`**: This is the for-loop command for parsing formatted text.
- **`"tokens=1,2,3* delims=-"`**:
- `delims=-` specifies that the hyphen (`-`) character is used as the delimiter to split the input string.
- `tokens=1,2,3*` means that it will extract the first, second, third, and any remaining tokens (after the third) from the string that has been split by the delimiter.
- **`('cscript /nologo %tmp%\tmp.vbs')`**: This is the command whose output will be parsed. It runs the VBScript located at `%tmp%\tmp.vbs` and suppresses the logo output of cscript using `/nologo`.
- **`do set d=%%k`**: For each iteration of the loop, it takes the third token (since `tokens=1,2,3*` and we are using `%%k` which corresponds to the third token) from the split string and assigns it to the variable `d`.

In summary, this line is extracting the day part of the date that was calculated as 7 days prior to the current date from the output of the VBScript and storing it in the `d` variable.

There are too many things to consider when operating dates, at least when using batch processing. Reply to the LZ, he combined VBS scripts and batch processing to complete it. The code hasn't been tested, and I'm going to write a batch processing about this. There are really too many things to consider, hehe................

Tested the principle code above:)

1. C:\TEMP\Q Get Date>type d.vbs
   
2. wscript.echo dateadd("d",-6,date)
   
3. wscript.echo date
   
4. 
   
5. C:\TEMP\Q Get Date>cscript /nologo d.vbs
   
6. 2006-11-19
   
7. 2006-11-25
   
8. 
   
9. C:\TEMP\Q Get Date>echo %date%
   
10. 2006-11-25 星期六
    
11. 
    
12. C:\TEMP\Q Get Date>date
    
13. Current date: 2006-11-25 星期六
    
14. Enter new date: (year month day)
    

2006-11-25 08:31

Test system version:
Name: Windows Server 2003, Enterprise Edition Version: 5.2 Build 3790

for /f "tokens=1,2,3* delims=-" %%i in ('cscript /nologo %tmp%\tmp.vbs') do set y=%%i
for /f "tokens=1,2,3* delims=-" %%i in ('cscript /nologo %tmp%\tmp.vbs') do set m=%%j
for /f "tokens=1,2,3* delims=-" %%i in ('cscript /nologo %tmp%\tmp.vbs') do set m=%%j其实可以改为：
for /f "tokens=1,2,3* delims=-" %%i in ('cscript /nologo %tmp%\tmp.vbs') do (set y=%%i
set m=%%j
set m=%%j)

forfiles /p "d:\test" /s /m *.* /d -7 /c "cmd /c del @path"

The command in 03 is just for the last modified time. To get the created time, it's better to use for + dir.

[ Last edited by vkill on 2006-11-25 at 11:53 PM ]

Help vkill brother post the help of FORFILES, a very convenient tool~:)
Built-in in Windows Server 2003 system~:)

FORFILES {yyyy-MM-dd | dd}] Description: Select a file (or a group of files) and execute a command on that file. This is helpful for batch jobs. Parameter list: /P pathname Indicates the path to start searching. The default folder is the current working directory (.). /M searchmask Search for files according to the search mask. The default search mask is '*'. /S Instructs forfiles to recurse into subdirectories. Like "DIR /S". /C command Indicates the command to be executed for each file. The command string should be enclosed in double quotes. The default command is "cmd /c echo @file". The following variables can be used in the command string: @file - Returns the file name. @fname - Returns the file name without the extension. @ext - Returns only the file extension. @path - Returns the full path of the file. @relpath - Returns the relative path of the file. @isdir - Returns "TRUE" if the file type is a directory; Returns "FALSE" if it is a file. @fsize - Returns the file size in bytes. @fdate - Returns the date when the file was last modified. @ftime - Returns the time when the file was last modified. To include special characters in the command line, use the hexadecimal code in the form 0xHH (for example, 0x09 is tab). Internal CMD.exe commands should start with "cmd /c". /D date Select files whose last modification date is greater than or equal to (+), or less than or equal to (-) the date specified in "yyyy-MM-dd" format; or select files whose last modification date is greater than or equal to (+) the current date plus "dd" days, or less than or equal to (-) the current date minus "dd" days. The valid "dd" days can be any number in the range 0 - 32768. If not specified, "+" is taken as the default symbol. /? Display help message. Examples: FORFILES /? FORFILES FORFILES /P C:\WINDOWS /S /M DNS*.* FORFILES /S /M *.txt /C "cmd /c type @file | more" FORFILES /P C:\ /S /M *.bat FORFILES /D -30 /M *.exe /C "cmd /c echo @path 0x09 was changed before 30. " FORFILES /D 2001-01-01 /C "cmd /c echo @fname was new as of January 1, 2001. " FORFILES /D +2006-11-25 /C "cmd /c echo @fname is new today. " FORFILES /M *.exe /D +1 FORFILES /S /M *.doc /C "cmd /c echo @fsize" FORFILES /M *.txt /C "cmd /c if @isdir==FALSE notepad.exe @file"

[ Last edited by redtek on 2006-11-25 at 11:28 AM ]

Just solved my problem, thank you!

:: DateDel2.bat - Delete files modified before a specified number of days in the specified path
:: Will Sort - 2005-9-2 - CMD@WinXP
:: Notes: Parameter %1 specifies the number of days, where yesterday is 1, the day before yesterday is 2, and so on
:: Parameter %1 specifies the file path, and if omitted, the current path will be processed
:: Core algorithm: Ritchie Lawrence, updated 2002-08-13. Version 1.1
:: Source: http://www.cn-dos.net/forum/viewthread.php?tid=16676

@echo off & setlocal ENABLEEXTENSIONS
call :Date2Day %date:~0,10% sdays
set /a sdays-=%1
call :Day2Date %sdays% difdate
echo The following files modified before %difdate% in %cd% will be deleted:
for /r %2 %%f in (*.*) do if "%%~tf" LEQ "%difdate%" echo "%%f"
goto :EOF

:Date2Day
setlocal ENABLEEXTENSIONS
for /f "tokens=1-3 delims=/-, " %%a in ('echo/%1') do (
set yy=%%a & set mm=%%b & set dd=%%c
)
set /a dd=100%dd%%%100,mm=100%mm%%%100
set /a z=14-mm,z/=12,y=yy+4800-z,m=mm+12*z-3,j=153*m+2
set /a j=j/5+dd+y*365+y/4-y/100+y/400-2472633
endlocal&set %2=%j%&goto :EOF

:Day2Date
setlocal ENABLEEXTENSIONS
set /a i=%1,a=i+2472632,b=4*a+3,b/=146097,c=-b*146097,c/=4,c+=a
set /a d=4*c+3,d/=1461,e=-1461*d,e/=4,e+=c,m=5*e+2,m/=153,dd=153*m+2,dd/=5
set /a dd=-dd+e+1,mm=-m/10,mm*=12,mm+=m+3,yy=b*100+d-4800+m/10
(if %mm% LSS 10 set mm=0%mm%)&(if %dd% LSS 10 set dd=0%dd%)
endlocal&set %2=%yy%-%mm%-%dd%&goto :EOF

Good post

Originally posted by qq43142691 at 2007-6-6 04:57 PM:
:: DateDel2.bat - Delete files modified before a specified number of days in the specified path
:: Will Sort - 2005-9-2 - CMD@WinXP
:: Notes: Parameter %1 specifies the number of days, yesterday is 1, the day before yesterday is 2, and so on
:: ...

Does this script only work in pure DOS? Why does Windows 2003 prompt that there is no operand?

It seems from the comments that there is no problem with 03. The problem usually occurs with command - line parameters. Carefully check whether the passed parameters are in accordance with the requirements