Имя пользователя:
Пароль:  
Помощь | Регистрация | Забыли пароль?  

Показать сообщение отдельно

Пользователь


Сообщения: 54
Благодарности: 1

Профиль | Отправить PM | Цитировать


Изображения
Тип файла: jpg Без имени-1.jpg
(101.1 Kb, 4 просмотров)

Цитата megaloman:
уберите Вы мой for co всеми del и вставьте свой кусок из самого первого поста »


Код: Выделить весь код
@Echo Off
cls
	Set "NetPath=\\ts7\c$\users"
	Pushd "%NetPath%" || (
		Echo Wrong path "%NetPath%"
		Pause
		GoTo :Eof
	)
	FOR /F "usebackq delims=\" %%n IN (`cd`) DO Set "Drive=%%n"

	FOR /F "usebackq tokens=1,2 delims= " %%i IN (`"wmic logicaldisk where caption="%Drive%" Get FreeSpace,Size,VolumeName"`) DO If Not "%%j"=="" (Set "FreeSpace=%%i" &Set "Size=%%j")
	Set "Size1=%Size%" &	Set "FreeSpace1=%FreeSpace%"

	for /f "delims=" %%i in ('dir "\\ts7\c$\users\*" /a:d /b') do (
rem pushd "\\ts7\C$\Users\%%i\AppData\Local\Google\Chrome\User Data\Default\Cache"
rem rmdir /s /q "\\ts7\C$\Users\%%i\AppData\Local\Google\Chrome\User Data\Default\Cache"
del /s /q "\\ts7\C$\Users\%%i\AppData\Local\Google\Chrome\User Data\Default\Cache\*"
del /s /q "\\ts7\c$\Users\%%i\AppData\Local\Microsoft\Windows\Temporary Internet Files\Content.MSO\*"
del /s /q "\\ts7\C$\Users\%%i\AppData\Local\Microsoft\Windows\Temporary Internet Files\Content.Outlook\*"
del /s /q "\\ts7\c$\Users\%%i\AppData\Local\Microsoft\Windows\WER\*"
del /s /q "\\ts7\c$\Users\%%i\AppData\Local\Microsoft\Windows\Explorer\*"
del /s /q "\\ts7\c$\Users\%%i\AppData\Local\Temp\*"
del /s /q "\\ts7\c$\Users\%%i\Downloads\*"
)

	FOR /F "usebackq tokens=1,2 delims= " %%i IN (`"wmic logicaldisk where caption="%Drive%" Get FreeSpace,Size,VolumeName"`) DO If Not "%%j"=="" (Set "FreeSpace=%%i" &Set "Size=%%j")
	Set "Size2=%Size%" &Set "FreeSpace2=%FreeSpace%"

	Popd
	
	Echo Size2=%Size2%   FreeSpace2=%FreeSpace2%
	Echo Size1=%Size1%   FreeSpace1=%FreeSpace1%
	
	Set "Size=%Size1:~0,-6%" &If "%Size%"=="" Set /A Size=0
	Set "FreeSpace2=%FreeSpace2:~0,-6%" &If "%FreeSpace2%"=="" Set /A FreeSpace2=0
	Set "FreeSpace1=%FreeSpace1:~0,-6%" &If "%FreeSpace1%"=="" Set /A FreeSpace1=0

	Set /A Delta=%FreeSpace2%-%FreeSpace1%
	Echo Size=%Size%  Released=%FreeSpace2%-%FreeSpace1%=%Delta%
Pause
GoTo :Eof

Последний раз редактировалось palexa, 25-11-2018 в 12:39.


Отправлено: 12:34, 25-11-2018 | #27