@ECHO OFF
COLOR 1E
:loop
CLS  
@echo                    ╔═════════════════════════════════════════════════╗
@echo                    ║ УСТАНОВИТЕ USB НОСИТЕЛЬ В РАЗЪЕМ НА КЛАВИАТУРЕ!                   ║
@echo                    ╚═════════════════════════════════════════════════╝
@QWERTY.vbs
set /P flash=<"./l" || ping -n  4  localhost  1 >nul && goto:loop
if exist /P flash=<"./l" ( 
@echo                    ╔═════════════════════════════════════════════════╗
@echo                    ║                 КОПИРОВАНИЕ...                                                                  ║
@echo                    ╚═════════════════════════════════════════════════╝
set datetemp=%date:~- 10 %
xcopy "c:\2011" "%flash%:\%datetemp%\" /H /E /G /q /R /Y || ping -n  4  localhost  1 >nul && goto:loop
@echo                  ╔═════════════════════════════════════════════════════╗
@echo                  ║"***************" СКОПИРОВАНО УСПЕШНО!           ║ 
@echo                  ║"***************" СКОПИРОВАНО УСПЕШНО!      ║ 
@echo                  ║"***************" СКОПИРОВАНО УСПЕШНО!║ 
@echo                  ║"***************" СКОПИРОВАНО УСПЕШНО!                         ║
@echo                  ╚═════════════════════════════════════════════════════╝
@del "./l"
set Timer= 5 
ping -n %Timer%  127 . 0 . 0 . 1 >nul 
@echo                    ╔═════════════════════════════════════════════════╗
@echo                    ║             ИЗВЛЕКИТЕ USB НОСИТЕЛЬ              ║
@echo                    ╚═════════════════════════════════════════════════╝
set Timer= 15 
ping -n %Timer%  127 . 0 . 0 . 1 >nul 

flash = ""
'Set fs = CreateObject("Scripting.FileSystemObject") 
Set fso = CreateObject("Scripting.FileSystemObject")
Set Drives = FSO.Drives 
For Each Drive In Drives
	if ((Drive.DriveType = 1) and (Drive.DriveLetter <> "A") and (Drive.DriveLetter <> "B") and Drive.IsReady) then 
		flash =  Drive.DriveLetter
		exit for
	end if
Next

'e:

Set f1 = fso.CreateTextFile("l", True)
f1.WriteLine flash
f1.Close