设为首页 | 收藏本页
登陆您的帐号 | 免费注册帐号
全部栏目 > 计算机 > 软件 > 人工智能
下一篇上一篇 首页图文展示(无图)

把包含日期之类字符的文本替换成昨天的日期,并保存

发布人:hy58
发布日期:2015-06-06 09:52:39
刷新日期:2015-06-06 09:52:39
回复或评论:0
阅览:231
@echo off&setlocal enabledelayedexpansion   
    if exist "123.bat" del /q /f /a "123.bat"   
    if exist "123.txt" del /q /f /a "123.txt"   
    mode con: cols=53 lines=10&color 0e   
    set YE=%date:~0,4%   
    set MO=%date:~5,2%   
    set DA=%date:~8,2%   
    set DG=1   
    set/a vY1=%YE% %% 400   
    set/a vY2=%YE% %% 4   
    set/a vY3=%YE% %% 100   
    if %vY1%==0 (set var=true) else (if %vY2%==0 (if %vY3%==0 (set var=false) else (set var=true)) else (set var=false))   
    set LY=%YE%   
    set LM=%MO%   
    if %DA:~0,1%==0 (set DA=%DA:~1,1%)   
    if %DA% GTR %DG% (set/a LD=%DA%-%DG%) else (   
    if %MO%==01 (set/a LY=%YE%-1) & (set/a LM=12+%MO%-1) & (set/a LD=31+%DA%-%DG%) else (   
    set/a LM=%MO%-1   
    if %MO%==03 (if %var%==false (set/a LD=28+%DA%-%DG%) else (set/a LD=29+%DA%-%DG%))   
    for %%a in (02 04 06 08 09 11) do (if "%MO%"=="%%a" (set/a LD=31+%DA%-%DG%))   
    for %%b in (05 07 08 10 12) do (if "%MO%"=="%%b" (set/a LD=30+%DA%-%DG%))))   
    if %LM% LSS 10 set LM=0%LM:~-1%   
    if %LD% LSS 10 set LD=0%LD:~-1%   
    for /l %%a in (0 1 9) do set #%%a=a   
    set /p file=请把你要处理的文本文件拖到本窗口或手动输入路径文件名:   
    set "str=%file%"   
    set "str=!str:"=!"   
    set file=!str!   
    for /f "delims=" %%i in ('type "%file%"') do (   
    set "str=%%i"   
    set "stra=%%i"   
    set "str=!str:,=!"   
    set "str=!str:;=!"   
    set "str=!str: =!"   
    set n=0&set "var="   
    for /l %%a in (0 1 9) do set str=!str:%%a= %%a !   
    for %%a in (!str!) do (   
    if defined #%%a (set var=!var!%%a&set /a n+=1) else set var=&set n=0   
    if !n! equ 8 echo !var!>>123.txt&set var=&set n=0   
    ))   
    for /f "delims=" %%a in ('type "%file%"') do (   
    set "str=%%a"   
    for /f "delims=" %%i in (123.txt) do (   
    set str=!str:%%i=%LY%%LM%%LD%!   
    )   
    echo !str!>>123.bat   
    )   
    del /q /f /a "123.txt"   
    start 123.bat   
    exit   
 
    我按你上面的日期格式给你修改。   
 
    这实在不是批处理干的事情,楼主硬要批处理,看在楼主的分的份上我只好给你了,就是太小气了才有5分。如果肯多加点分将不胜感激。如果日期格式不对记得给我说。
评论(0) 暂无回帖


打印 收藏 关闭窗口 下一篇上一篇