alexrus |
18-12-2007 21:20 699563 |
Схемы управления питанием и не только, их настройка через реестр
Часто нужно менять схему управления питанием. Т. к. через интерфейс ОС делать это хоть и удобно, но все же медленно. Поэтому хотелось бы создать, например, reg-файлы и ими менять профили. Никто не подскажет, где эти настройки кроются? Вдогонку хотелось бы узнать те же реестровые настройки заставки. Приму с благодарностью ссылку на источники на англ. и русском языках.
Спасибо.
|
Petya V4sechkin |
18-12-2007 21:48 699578 |
alexrus, Cmd-скриптом, с помощью команды Powercfg (параметр /setactive - выбор схемы).
|
alexrus |
18-12-2007 21:59 699583 |
Petya V4sechkin, спасибо, то, что нужно. Остается открытым вопрос про отключение заставки.
|
Petya V4sechkin |
18-12-2007 22:03 699585 |
alexrus, параметр ScreenSaveActive раздела реестра HKEY_CURRENT_USER\Control Panel\Desktop.
Можно проверить, будет ли действовать изменение реестра без перезагрузки.
|
alexrus |
18-12-2007 22:44 699606 |
Petya V4sechkin, не будет, но все же спасибо. Буду думать, как извратиться.
|
alexrus, а если для вступления в силу требуется не перезагрузка, а лишь завершение сеанса? Тогда будет достаточно перезапуска оболочки (explorer.exe)
И параметр другой попробуйте. Можно в vbs это все запихнуть. Он и параметр пропишет и explorer перезапустит, пример:
Код:
Message = Message & "Будет перезапущена оболочка (Windows Explorer shell)." & vbCR
Message = Message & "Продолжить?"
X = MsgBox(Message, vbYesNo, "Notice")
If X = 6 Then
On Error Resume Next
Set WshShell = WScript.CreateObject("WScript.Shell")
WshShell.RegWrite "HKCU\Software\Policies\Microsoft\Windows\Control Panel\Desktop\ScreenSaveActive", "0"
Set WshShell = Nothing
On Error GoTo 0
For Each Process in GetObject("winmgmts:"). _
ExecQuery ("select * from Win32_Process where name='explorer.exe'")
Process.terminate(0)
Next
MsgBox "Изменения внесены успешно." & vbcr, 4096, "Завершено"
Else
MsgBox "Изменения не внесены." & vbcr & vbcr, 4096, "Отменено пользователем"
End If
|
alexrus |
07-01-2008 02:48 710785 |
Blast, спасибо, то, что нужно. Осталось проверить, будет ли еще и на Vista работать.
|
alexrus, скрипт работать будет, а вот приведет ли к ожидаемому результату.. проверить надо :)
|
Время: 02:29.
© OSzone.net 2001-