Автор Тема: Скрипт для установки раскладки клавиатуры "CTRL+Shift" и английский по умолч.  (Прочитано 5367 раз)

0 Пользователей и 1 Гость просматривают эту тему.

vip78

  • Newbie
  • *
  • Сообщений: 29
    • Просмотр профиля
Скрипт для установки раскладки клавиатуры "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