Переключайтесь между левой и правой рукой и обратно одним скриптом - щелкните один раз, когда он изменится, затем щелкните еще раз, и он изменит его обратно на 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 1715
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