Если дома, то можно через /sageset:n и /sagerun:n, а вот на работе косяки получаются - постоянно приходится проверять, что у кого поменялось.

run cleanmgr.exe /d X: /sageset:n

И он сохраняет настройки для нужного тебе диска (в sagerun диск указывать не надо поэтому и пишут, что Ключ /d не совместим с ключом /sagerun:./d ).

Пробовал на системном диске, не заметил, тогда не вариант.

Да можно написать, но придётся создавать много профилей для ключа /sagerun, а для одного компа достаточно использовать этот ключ.

Служба поддержки Майкрософт (cleanmgr.exe)

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

Если один раз запустить:

run cleanmgr.exe /sageset: 1

Поставить нужные отметки, нажать ок для сохранения настроек в реестр под номером 1.

И далее просто запускать с сохранёнными настройками:

run cleanmgr.exe /d C: /sagerun: 1

SetTitleMatchMode 2
run %windir%\system32\cleanmgr.exe /d %Disc%:

или

SetTitleMatchMode 2
run %windir%\SysWOW64\cleanmgr.exe /d %Disc%:

Но после компиляции поможет ли это - я не уверен, надо проверить.

P.S. Проверил - не помогает, запускает 32-х разрядную версию, если файл 32-x разрядный.
Ладно сделаем 3 файла, это не принципиально, а админка тут не причём, запускал с разных профилей... хотя боюсь что упустил, что на всех компах это профиль админский.

P.S. Надо в скрипт вставить проверку OS на разрядность...

Она есть в скрипте A_IsUnicode, но проверяло админку.

Ёкарный-бабай!!!
У меня OS Windows 7 x64 - откомпилировал используя Unicode 64-bit.bin и всё заработало... да Windows это нечто. lol

P.S. Надо в скрипт вставить проверку OS на разрядность... вроде в AHK есть такая переменная + батник и два ЕХЕ-файла, т.е. не батник, а один стартовый, который запускает или x32 или x64 от типа разрядности OS.

Check := "1|3"
Disc := "C"

ShellExecute := A_IsUnicode ? "shell32\ShellExecute":"shell32\ShellExecuteA"  
if not A_IsAdmin
{
      If A_IsCompiled
         DllCall(ShellExecute, uint, 0, str, "RunAs", str, A_ScriptFullPath, str, params , str, A_WorkingDir, int, 1)
      Else
         DllCall(ShellExecute, uint, 0, str, "RunAs", str, A_AhkPath, str, """" . A_ScriptFullPath . """" . A_Space . params, str, A_WorkingDir, int, 1)
      ExitApp
}

SetTitleMatchMode 2
run %windir%\system32\cleanmgr.exe /d %Disc%:
WinWait % " (" Disc ":" ") ahk_exe cleanmgr.exe"
hwnd := WinExist(" (" Disc ":" ") ahk_exe cleanmgr.exe")
ControlGet hwndctrl, Hwnd , ,SysListView321, % "ahk_id " hwnd
ControlGet, LVItems, List, ,,ahk_id %hwndctrl%
ControlSend,, {Down}, ahk_id %hwndctrl%
Loop, parse,LVItems,`n
    {
    SendMessage, 0x102C, A_Index - 1, 0x2000,, ahk_id %hwndctrl% ; LVM_GETITEMSTATE
    if ErrorLevel
        ControlSend,, {Space}, ahk_id %hwndctrl%
    if (A_Index ~= "^(" Check ")$") or !Check
        ControlSend,, {Space}, ahk_id %hwndctrl%
    ControlSend,, {Down}, ahk_id %hwndctrl%
    }
    
ControlSend,, {Enter}, ahk_id %hwnd%
sleep 100
Send {Enter}

Вот запуск с админкой + косяки с галочками исправил.

При обычной очистке - 12 пунктов.
При программной всего 5 пунктов.

Может нужен "Запуск от имени администратора"?

UPD

Перепробовал всё... не помогает.

Блин, забыл - Запуск из ком.процессора, это последнее что я не проверил.

Всё - не понимаю что не так, т.е. скрыты пункты которые можно очистить.

bat-файл выдаёт тоже самое, т.е. скрывает пункты, только запуск CMD.exe -> cleanmgr.exe /d c: показывает все пункты.

Check := "1|2"
Disc := "E"

SetTitleMatchMode 2
run %windir%\system32\cleanmgr.exe /d %Disc%:
WinWait % " (" Disc ":" ") ahk_exe cleanmgr.exe"
hwnd := WinExist(" (" Disc ":" ") ahk_exe cleanmgr.exe")
ControlGet hwndctrl, Hwnd , ,SysListView321, % "ahk_id " hwnd
ControlGet, LVItems, List, ,,ahk_id %hwndctrl%
ControlSend,, {Down}, ahk_id %hwndctrl%
Loop, parse,LVItems,`n
    {
    SendMessage, 0x102C, A_Index - 1, 0x2000,, ahk_id %hwndctrl% ; LVM_GETITEMSTATE
    if ErrorLevel
        ControlSend,, {Space}, ahk_id %hwndctrl%
    if (A_Index ~= "^" Check "$") or !Check
        ControlSend,, {Space}, ahk_id %hwndctrl%
    ControlSend,, {Down}, ahk_id %hwndctrl%
    }

ControlSend,, {Enter}, ahk_id %hwnd%
sleep 100
Send {Enter}

Написал.

Check := "1|4|5"

SetTitleMatchMode 2
run %windir%\system32\cleanmgr.exe /d C:
WinWait Очистка диска  (C:) ahk_exe cleanmgr.exe

Выбрались все пункты, что ты не учёл... пытаюсь разобраться.

И концовка не срабатывает, т.е. не нажатия на ОК.

ControlSend,, {Enter}, ahk_id %hwnd%
sleep 100
Send {Enter}