PDA

Показать полную графическую версию : FreeSize + Очестка мусора(Temp) + clean_date.log


Nrg_Life
16-03-2012, 14:02
Не хотелось создавать новую тему но выбора нет.
Хочу написать батник:

1. Создаст clean_%now%.log
2. Поставит время начало батника в лог.
3. Проверит свободное место на диске в Гб (батник выводит с байтах) >>clean_%now%.log
4. Применит очистку системы
5. Поставит время завершения clean_%nov%.log
6. Проверит свободное место на диске в Гб >>clean_%now%.log
7. Напишет сколько освободил памяти.


::получает в переменную %now% время в формате yyyy.MM.dd_HH:mm
set tow=%TIME:~0,-3%
set now=%now::=.%
set now=%now: =0%
set now=%DATE:~-4%.%DATE:~3,2%.%DATE:~0,2%_%now%

::Очистка системы
SetLocal EnableExtensions

For /F "Tokens=2*" %%I In ('Reg Query "HKLM\SOFTWARE\Microsoft\Windows NT\CurrentVersion\ProfileList" /V ProfilesDirectory') Do Set Profiles=%%J
Call Set Profiles=%Profiles%

For /F "Delims=" %%I In ('Dir /B /AD-S-H "%Profiles%" ^| FindStr /V /B /I /C:"All Users"') Do (
RD /S /Q "%Profiles%\%%I\Local Settings\Temp"
MD "%Profiles%\%%I\Local Settings\Temp"

RD /S /Q "%Profiles%\%%I\Local Settings\Temporary Internet Files"
MD "%Profiles%\%%I\Local Settings\Temporary Internet Files"

RD /S /Q "%Profiles%\%%I\Local Settings\\Application Data\Mozilla\Firefox\Profiles"
MD "%Profiles%\%%I\Local Settings\\Application Data\Mozilla\Firefox\Profiles"

RD /S /Q "%Profiles%\%%I\Application Data\Sun\Java\Deployment\cache"
MD "%Profiles%\%%I\Application Data\Sun\Java\Deployment\cache"

RD /S /Q "%Profiles%\%%I\AppData\Local\Temp"
MD "%Profiles%\%%I\AppData\Local\Microsoft\Windows\Temporary Internet Files"
)

RD /S /Q %windir%\Temp
MD /S /Q %windir%\Temp ::Свободное место(выводися в байтах, поэтому потребуется разделить на 1073741824)
setlocal enableextensions enabledelayedexpansion

for /f "usebackq tokens=2 delims==" %%i in (`wmic.exe LogicalDisk where "Name='c:'" get FreeSpace /value`) do set sFreeSize=%%i

if defined sFreeSize echo [%sFreeSize%]

endlocal
exit /b 0

Помогите собрать все в единый батник. и подскажите как делаются математические вычисления.




© OSzone.net 2001-2012