Применение темы через BAT\CMD
 

Есть такой вот скрипт, подсказанный Smarty (источник), который должен применять тему:
но он у меня не работает. Выскакивает сообщение "Невозможно применить эту тему к рабочему столу. Попробуйте выбрать другую тему". Что может быть не так???

Pozia, сомнительно, что это относится к оформлению системы, но всё же...
Мы с автором данной информации разговаривали по этому поводу, но, видимо, он забыл исправить источник.

Дело в том, что команда
не дает времени для применения темы, значит надо "прикрутить" паузу
где 10 - время паузы в секундах.
И ещё...
Путь к файлу темы лучше указать в кавычках (из-за возможных пробелов в пути).

Вот рабочий скрипт:

Smarty, вот здесь есть более элегантное решение моего вопроса.

Smarty, по указанной мною ссылке предложили автоит скрипт применения темы без перезагрузки эксплорера. Очень удобно

Pozia, отлично!

Теперь делаем так.
Выкладываю утилиту для компиляции скрипта *.au3 в файл *.exe.
В папке с утилитой лежит файл Theme Apply.au3 с содержанием из поста Bodya.N:
Чтобы модифицировать для применения конкретной темы, откройте скрипт в Блокноте
и измените в первой строке Aero (выделено синим) на название нужной темы и сохраните.
Затем запустите утилиту, укажите этот скрипт и скомпилируйте исполняемый файл.

Ребят на мой взгляд вот так было бы гораздо удобнее:
Теперь скомпилированный екзешник запускаем из командной строки с параметром "Название темы".Например
По сути этот скрипт ничто иное как SetTheme.exe из "ResPatch",только теперь окно "Персонализации" закрывается.

Тогда этот вариант.

Во вложении скомпилированный Theme_Apply.exe и пример скрипта Theme_Apply.cmd:

Господа, перечитал и попробовал все варианты, но не желает тема применятся.
Окно тоже не закрывается. А этот вариант мне очень нужен.
Подскажите в чем проблема...

PS: Только у меня XP

Все разобрался...


$theme = "*****"
$title = "Свойства: Экран"

If FileExists (@WindowsDir & "\Resources\Themes\" & $theme & ".theme") Then
ShellExecute (@WindowsDir & "\Resources\Themes\" & $theme & ".theme")
WinWait ($title,"",10)
If WinExists ($title) Then ControlClick ($title,"",1)
Else
MsgBox (16,'Ошибка применения Темы','Тема "' & $theme & '" не обнаружена! ')
EndIf


Теперь заработало!!! :yahoo: Всем спасибо.

У меня ошибка при запуске скрипта:

«autoitscreen» на Яндекс.Фотках
Я думаю проблема в указании имени файла или пути. Подскажите, что я делаю не правильно?


Пример скрипта:

#NoTrayIcon
$theme = "Sexy girl.theme"
$title = "Персонализация"

If FileExists(@WindowsDir & "\Resources\Themes\" &theme & ".Sexy girl.theme") Then
ShellExecute(@WindowsDir & "\Resources\Themes\" &theme & ".Sexy girl.theme")
WinWait($title, "", 10)
If WinExists($title) Then ControlClick($title, "", 1)
Sleep(5000)
WinClose($title)
Else
MsgBox(16, 'Ошибка применения Темы', 'Тема "' & $theme & '" не обнаружена! ')
EndIf

Angelofdeath, наверно ошибка в точке перед именем темы (хотя в АвтоИт не силен).
Ошибка в этих строках:
У вас прописана переменная
зачем вы ещё имя темы и в эти строчки прописали, да ещё с точкой перед именем?

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

Angelofdeath, здесь я вам всё уже выложил!
Откройте в Блокноте файл Theme_Apply.cmd и посмотрите где и как прописано название вашей темы.

Ошибка:

«screenautoit» на Яндекс.Фотках

Angelofdeath, это вопрос к Bodya.N, автору скомпилированного скрипта.
Напишите ему в ПМ, так как вряд ли он сюда уже заглядывает...

Angelofdeath , запускать нужно "Theme_Apply.cmd" (из вложения Smarty).Именно этот файл запускает "Theme_Apply.exe" с параметрами "название Вашей темы" и редактируется (если нужно применить другую тему) в "Блокноте" (Notepad.exe).