@echo off&setlocal EnableDelayedExpansion
::Code by gool123456 @ 2010 On BBS.cn-DOS.net
echo ==========今天是:%date%=============
echo.
if exist dirlist.txt (goto :TXT) else (
set /p folder_=拖入要备份的文件夹并回车:
call :task
set folder=!folder_:"=!
set "mm=!folder:\=,!"
set "mm=!mm: =:!"
for %%e in (!mm!) do set "mm_=%%e"
set "mm_=!mm_::= !"
md "f:\!date_!\!mm_!" 2>nul
Xcopy !folder_! "f:\!date_!\!mm_!" /e /y
)
pause
>>f:\!date_!\dirlist.txt echo !folder!
goto :eof
:TXT
for /f "delims=" %%a in (dirlist.txt) do (
call :task
set "folder=%%a"
set "mm=!folder:\=,!"
set mm=!mm: =:!
for %%e in (!mm!) do set "mm_=%%e"
set "mm_=!mm_::= !
md "f:\!date_!\!mm_!"
Xcopy "%%a" "f:\!date_!\!mm_!" /e /y
)
pause
copy /y dirlist.txt "f:\!date_!" >nul
goto :eof
:task
for /f "delims= " %%i in ('echo %date%') do set "date_=%%i"
set "date_=%date_:-=%"
if not exist "f:\%date_%" md "f:\%date_%"
goto :eof