flyfox

On Windows 2003。

@echo off
@rem =========================================
@rem 備份前一天資料
@rem =========================================

@rem =========================================
@rem 設定各路徑變數
@rem =========================================
@set SDir=D:\flyfox\Log_
@set DDir=D:\bat\log
@set zz="C:\Program Files\7-Zip\7z.exe"
@set ZipData=D:\bat\

@rem =========================================
@rem 刪除舊目錄並建立新目錄
@rem =========================================
@rd /S /Q %DDir%
@mkdir %DDir%

@rem =========================================
@rem 擷取前一天日期
@rem =========================================
@echo wscript.echo dateadd("d",-1,date) > %tmp%\tmp.vbs
@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 d=%%k
@if %m% LSS 9 set m=0%m%
@if %d% LSS 9 set d=0%d%
@set yesterday=%y%%m%%d%

@rem =========================================
@rem 複製前一天資料
@rem =========================================
@xcopy /V /C /Y %SDir%%yesterday%* %DDir%

@rem =========================================
@rem 刪除舊檔並建立備份檔
@rem =========================================
@set file=Log_%date:~0,4%%date:~5,2%%date:~8,2%
@del %zipdata%%yesterday%.7z
@%zz% a -mmt=4 -mx=9 %zipdata%%file%.7z %DDir%

@echo on
@exit

C:\>cscript %tmp%\tmp.vbs
Microsoft (R) Windows Script Host Version 5.6
Copyright (C) Microsoft Corporation 1996-2001. All rights reserved.

2012/11/28

C:\>cscript /nologo %tmp%\tmp.vbs
2012/11/28