[megaloman]

Код:

@Echo Off
cls

Set Where=F:\Директория
Set What=.exe .doc .xls .js .tif .ююю

Set W=%What:.=*.%

SetLocal EnableExtensions
SetLocal EnableDelayedExpansion

cd /D "%Where%"
Set First=Папка указана неверно
Set Second=%First%
 
IF %ERRORLEVEL%==0 (
   Echo %Where%
   FOR %%e IN (%What%) DO (
       FOR /F "usebackq tokens=*" %%m IN (`dir *%%e /s`) DO Set First=!Second! & Set Second=%%m
       Set M=!First:байт=!
       If Not "!M!"=="!First!" Echo *%%e  !First!
   )
   FOR /F "usebackq tokens=*" %%s IN (`dir %W% /s`) DO Set First=!Second! & Set Second=%%s
   Set M=!First:байт=!
   If Not "!M!"=="!First!" Echo %W%  !First!
)

If "%Second%"=="Папка указана неверно" Echo %Second%  %Where%
Pause

[ilyadud]

Спасибо, конечно же за ответ. Но почему-то у меня данный скрипт не работает: просто не находит файлы. Пробовал указывать директорию, в которой, например, есть log-файлы, причем в переменную ставил .log

Просто выдает "Для продолжения нажмите на любую клавишу".

[sov44]

ilyadud, попробуйте так

Код:

@Echo Off
SetLocal enabledelayedexpansion
set iSumL=0
set Rash=*.log;*.old;*.bak;*.temp;*.tmp;*.---;*._mp;*.syd;
  For /F "Delims=" %%I In ('Dir c:\%Rash% /B/S/A:-D-H 2^>nul') Do (
      2>&1 del /q "%%I" | 1>nul findstr "."
      if errorlevel 1 (set /a iSumL +=%%~zI)
)
Echo !iSumL!
pause

У меня встречный вопрос к знатокам. Переменная %Rash% не переходит к следующему значению. В чём ошибка?

Код:

@echo off
SetLocal enabledelayedexpansion
set iSumG=0
set DRG="%USERPROFILE%\Local Settings\Application Data\Google\Chrome\User Data\Default"
set Rash="Current Session";"History";"History Index *-*";"Last Session";"Visited Links";"Archived History";
  For /F "Delims=" %%I In ('Dir %DRG%\%Rash% /S/B/A:-D 2^>nul') Do (
       set /a iSumG +=%%~zI      
       del /q "%%I" 2>nul
      )
Set /A Cnt +=!iSumG!
echo %Cnt%
pause

[Anonymоus]

sov44, у вас путь в dir раскрывается примерно таким образом:

Код:

Dir "%USERPROFILE%\Local Settings\Application Data\Google\Chrome\User Data\Default"\"Current Session";"History";"History Index *-*";"Last Session";"Visited Links";"Archived History"; /S/B/A:-D 2>nul

И получается, что остальные директории кроме самой первой в %Rash%, отделённые ";" вы ищете в текущей, рабочей директории - где их естественно, нету. Для правильного разбора и подстановки попробуйте использовать этот фрагмент - по сути, это эмуляция For %%A In (xxx), только с заданием произвольного разделителя.

Код:

@Echo Off
SetLocal EnableDelayedExpansion
set DRG="%USERPROFILE%\Local Settings\Application Data\Google\Chrome\User Data\Default"
set Rash="Current Session";"History";"History Index *-*";"Last Session";"Visited Links";"Archived History";
:Jmp
For /F "tokens=1,* delims=;" %%A In ("!Rash!") Do (
	If Not "%%A"=="" (
		For /F "Delims=" %%I In ('Dir %DRG%\%%A /S/B/A:-D 2^>nul') Do (
			Echo %%I
		)
		Set Rash=%%B&GoTo Jmp
	)
)
Pause>Nul

[megaloman]

sov44, ИМХО, Ваш способ суммирования в бат-файле опасен - при больших значениях (точно сейчас не упомню каких) батник суммировать не будет, именно поэтому я пытаюсь пользоваться результатами команды Dir (кстати, ИМХО, это быстрее получится, хотя и в ущерб универсальности для рус-англ систем)

Переменная %Rash% не переходит к следующему значению.

- я это решил посредством смены текущей папки с помощью cd /D для нужной папки. Далее в Dir работаю в текущей папке.

ilyadud, я подправил последнюю строку скрипта для информативности.
1. Возможно Вы неверно задали папку. Попробуйте, например, C:\
2. Возможно, батник набран не в 866 кодировке - проверьте, это существенно, так как анализируется наличие слова байт
3. Возможно, у Вас вовсе не русифицированное сообщение команды dir - сделайте, например, Dir c:\ >C:\aaa
Содержимое файла ааа хотелось бы увидеть. Придётся заменить слово байт на англ аналог.

У меня сделан только подсчет размеров, удаление надо произвести после этого.

[ilyadud]

Всем спасибо!

[sov44]

megaloman, к сожалению не понял Вашего кода и не смог применить к своему коду (первый код поста 4). Если не затруднит, добавьте пояснения в свой код. Интересно попробовать и сравнить быстродействие кодов

[Anonymоus]

sov44, возможно, коллега megaloman имеет в виду вот это:

Код:

C:\>Set /A 3992768760+1
-302198535

C:\>Set /A 9992768760+1
Неверное число. Числа ограничены 32 битами точности.

При определённых, слишком больших значениях - происходит переполнение переменной и результат уходит в минус, либо выдается сообщение о ошибке.

[sov44]

При определённых, слишком больших значениях - происходит переполнение переменной и результат уходит в минус, »

Логов и темпов набрать на два гига, это надо постараться (2^30 - 1 = 2147483647 "2048 Mb." ) Скрипт очистки будет запускаться как минимум раз в месяц, столько не насобирается. Но это всё детали. Интересен сам факт возможного увеличения быстродействия.