Alterar / Forçar configurações do mouse canhoto via GPO ou outras formas

Question

É possível controlar as configurações do mouse canhoto via GPO? (ou um script que pode ser enviado usando o GPO:)

Eu tenho o Windows 7 / Windows Server 2008.

Muito obrigado pelo seu conselho.

Toast

    

Answer 1

Sei que você já aceitou uma resposta, mas aqui está uma versão da VBS para você também (porque sei que você estava procurando por isso):

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

Esteja ciente de que essas configurações não terão efeito até a próxima vez que o usuário fizer login (depois de ter sido aplicado), e também esteja ciente de que coisas como MouseWare e SetPoint da Logitech frequentemente mudam essa configuração do registro (até você o define no software específico do mouse) depois de carregar após o logon.

    

Answer 2

Sim, isso pode ser feito.

Políticas de grupo - > Configuração do usuário - > Preferências - > Configuração do Windows

Vá para a configuração "Registro".

Adicione uma nova configuração do Registro.

[HKEY_CURRENT_USER\Control Panel\Mouse]
SwapMouseButtons (RegSZ) = 1

    

Answer 3

Esta é a resposta, pois troca para canhoto, em seguida, clique novamente e troque de volta. O SwapMouseButtons só vai para canhoto mas não para trás.

Mude entre esquerda e direita e volte com um script - clique uma vez que mudar, depois clique novamente e altere de volta em relação ao RUNDLL32.EXE USER32.DLL,SwapMouseButton , que só troca para a esquerda, mas não para trás.

Nota: se você quiser enviar este arquivo por e-mail depois de criá-lo em MouseHandSwitch.vbs , copie o seguinte script e salve-o como um arquivo .vbs na área de trabalho e agora você o obtém.

'> 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