标题: [求助]生成62天前日期的P处理(已解决) [打印本页]
作者: tvzml 时间: 2008-4-23 16:48 标题: [求助]生成62天前日期的P处理(已解决)
公安部要求网吧服务器保留60天上网日志，如果日志不全可能被罚款，先前我维护的一个网吧被罚款一万，所以求助这里的朋友帮忙，日志记录文件可以打开我的FTP参考 ftp://218.75.61.101 里面有62天的记录文件，我想朋友帮助写个P，检查在以外情况下少了某天的日志文件名称，并且将这个文件名称记录到 err.txt中。
或者帮我写个日期往前退62天的P处理。
想请朋友帮助写个检查P处理，如今天是2008年04月23日
要求生成 20080223 到 20080423 的 62天作为 信息写入 1.txt 一行一个。
样本 1.txt
20080223
20080224
20080225
......
........
.........
以此类推，要求是以当前日期网前退62天。
[ Last edited by tvzml on 2008-4-24 at 07:01 PM ]
作者: terse 时间: 2008-4-23 19:43
是这个意思吗
@echo off&setlocal enabledelayedexpansion
SET/a TT=62
:start
set p1=%date:~0,4%
set p2=%date:~5,2%
set p3=%date:~8,2%
for /l %%a in (1,1,3) do (
for /f "delims=0 tokens=*" %%i in ("!p%%a!") do set p%%a=%%i
)
if %p3% gtr %TT% goto ppp
:nxt
set/a p2-=1
if %p2% equ 0 set/a p1-=1&&set p2=12
SET/a PN1=%p1%%%4
set PN2=28
if %PN1% EQU 0 set pN2=29
for /f "tokens=%p2%" %%i in ("31 %pN2% 31 30 31 30 31 31 30 31 30 31") do set/a p3=%p3%+%%i
if %p3% leq %tt% goto nxt
:ppp
set/a p3=%p3%-%tt%
set p2=0%p2%
set p2=%p2:~-2,2%
set p3=0%p3%
set p3=%p3:~-2,2%
echo %p1%%p2%%p3%
SET/a TT-=1
if %tt% neq 0 goto start
pause
SET/a TT=62
:start
set p1=%date:~0,4%
set p2=%date:~5,2%
set p3=%date:~8,2%
for /l %%a in (1,1,3) do (
for /f "delims=0 tokens=*" %%i in ("!p%%a!") do set p%%a=%%i
)
if %p3% gtr %TT% goto ppp
:nxt
set/a p2-=1
if %p2% equ 0 set/a p1-=1&&set p2=12
SET/a PN1=%p1%%%4
set PN2=28
if %PN1% EQU 0 set pN2=29
for /f "tokens=%p2%" %%i in ("31 %pN2% 31 30 31 30 31 31 30 31 30 31") do set/a p3=%p3%+%%i
if %p3% leq %tt% goto nxt
:ppp
set/a p3=%p3%-%tt%
set p2=0%p2%
set p2=%p2:~-2,2%
set p3=0%p3%
set p3=%p3:~-2,2%
echo %p1%%p2%%p3%
SET/a TT-=1
if %tt% neq 0 goto start
pause
作者: tvzml 时间: 2008-4-24 12:27
无话可说，无法用语言表达我的感激之情，下辈子投女人非得以身相许不可！