拷贝备份，以及 按日期删除文件

1.备份
@echo off
if "%1" == "h" goto begin
mshta vbscript:createobject("wscript.shell").run("%~nx0 h",0)(window.close)&&exit
:begin
@echo off
echo 正在拷贝到对应的目录文件，请稍等......
mkdir D:backup
xcopy "D:\test2" "D:\backup" /Y /E /X
del /f /s /q D:\test2
rd /s /q  D:\test2  & md D:\test2
xcopy "C:\Users\Administrator\Desktop\compare" "D:\test2" /Y /E /X
echo 拷贝北非完成！
echo. & pause


2.删除
@echo off
rem 指定待删除文件的存放路径
set SrcDir=D:\SQLBack\alm
rem 指定天数
set DaysAgo=7
::如果演示结果无误，把del前面的echo去掉，即可实现真正删除。
forfiles /p %SrcDir% /s /m *.* /d -%DaysAgo% /c "cmd /c  echo del /f /q /a @path"
exit