Языки программирования > Windows Script Host (WSH)

Скрипт для установки раскладки клавиатуры "CTRL+Shift" и английский по умолч.

(1/1)

vip78:
Скрипт для установки раскладки клавиатуры "CTRL+Shift" и по английский язык по умолчанию.
Это бывает полезно когда перед входом в Windows установлена русская раскладка по умолчанию и приходится каждый раз переключаться на английский язык.
Создайте файл: "keyboard.vbs" и поместите в него следующий текст:

Set Sh = CreateObject("WScript.Shell")
key =  "HKEY_CURRENT_USER\Keyboard Layout\Preload\"
Sh.RegWrite key & "1", "00000409", "REG_SZ"
Sh.RegWrite key & "2", "00000419", "REG_SZ"
Set Sh = Nothing

Set Sh = CreateObject("WScript.Shell")
key =  "HKEY_CURRENT_USER\Keyboard Layout\Toggle\"
Sh.RegWrite key & "Hotkey", "2", "REG_SZ"
Sh.RegWrite key & "Language Hotkey", "2", "REG_SZ"
Sh.RegWrite key & "Layout Hotkey", "1", "REG_SZ"
Set Sh = Nothing

Set Sh = CreateObject("WScript.Shell")
key =  "HKEY_USERS\.DEFAULT\Keyboard Layout\Preload\"
Sh.RegWrite key & "1", "00000409", "REG_SZ"
Sh.RegWrite key & "2", "00000419", "REG_SZ"
Set Sh = Nothing

Set Sh = CreateObject("WScript.Shell")
key =  "HKEY_USERS\.DEFAULT\Keyboard Layout\Toggle\"
Sh.RegWrite key & "Hotkey", "2", "REG_SZ"
Sh.RegWrite key & "Language Hotkey", "2", "REG_SZ"
Sh.RegWrite key & "Layout Hotkey", "1", "REG_SZ"
Set Sh = Nothing

Навигация

[0] Главная страница сообщений