Можно ли управлять настройками левой руки через GPO? (или сценарий, который можно отправить с помощью GPO :)
У меня Windows 7 / Windows Server 2008.
Большое спасибо за ваш совет.
Тост
Да, это может быть сделано.
Групповые политики -> Конфигурация пользователя -> Настройки -> Настройка Windows
Перейдите в настройку «Реестр».
Добавьте новый параметр реестра.
[HKEY_CURRENT_USER\Control Panel\Mouse]
SwapMouseButtons (RegSZ) = 1
Я понимаю, что вы уже приняли ответ, но вот его версия для VBS (потому что я знаю, что вы как бы искали это):
Const HKEY_CURRENT_USER = &H80000001
strComputer = "."
Set Shell = CreateObject("WScript.Shell")
Set objRegistry = GetObject ("winmgmts:\\" & strComputer & "\root\default:StdRegProv")
strKeyPath = "Control Panel\Mouse"
strValueName = "SwapMouseButtons"
strValue = "1"
objRegistry.SetStringValue HKEY_CURRENT_USER, strKeyPath, strValueName, strValue
Просто имейте в виду, что эти настройки не вступят в силу до тех пор, пока пользователь не войдет в систему в следующий раз (после того, как они были применены), а также имейте в виду, что такие вещи, как MouseWare и SetPoint от Logitech, часто просто переключают этот параметр реестра обратно (пока вы не установите его. в их программном обеспечении для мыши), как только они загружаются после входа в систему.
Это ответ, поскольку он переключается на левую, затем снова щелкает, и он переключается обратно. SwapMouseButtons подходит только для левшей, но не обратно.
Переключение между левой и правой рукой и обратно с помощью одного сценария - щелкните, когда он изменится, затем щелкните еще раз, и он вернет его обратно по RUNDLL32.EXE USER32.DLL,SwapMouseButton
который переключается только на левую руку, но не обратно.
Примечание: если вы хотите отправить этот файл по электронной почте после его создания в MouseHandSwitch.vbs
скопируйте следующий скрипт и сохраните его как .vbs
файл на рабочем столе, и теперь вы его получили.
'> Mouse change Left to Right handed.
'> and repeat to set Left to Right handed again.
'> By William Anderson July 17, 2015
Sub DoAction(str, ms)
'> Check status until ready
status = (WshShell.AppActivate)(cPanel.ProcessID)
Do Until status = true
WScript.Sleep 100
status = (WshShell.AppActivate)(cPanel.ProcessID)
WScript.Sleep 100
Loop
if status = true then
WshShell.SendKeys str
WScript.Sleep ms
End if
End Sub
'> Set windows for best performance
Set WshShell = CreateObject("WScript.Shell")
Set cPanel = WshShell.Exec("rundll32.exe shell32.dll,Control_RunDLL main.cpl")
status = (WshShell.AppActivate)(cPanel.ProcessID)
Do Until status = true
WScript.Sleep 100
status = (WshShell.AppActivate)(cPanel.ProcessID)
WScript.Sleep 100
Loop
if status = true then
'> Send alt S to mouse panel
DoAction "%S", 20
DoAction "{ENTER}", 20
End if