Skip to content

Instantly share code, notes, and snippets.

@MrChrisWeinert
Created August 12, 2022 15:24
Show Gist options
  • Save MrChrisWeinert/e21f4b64e04772d2fff1c7b9aa51f653 to your computer and use it in GitHub Desktop.
Save MrChrisWeinert/e21f4b64e04772d2fff1c7b9aa51f653 to your computer and use it in GitHub Desktop.
'Emergency script created for a friend to toggle HDR
Set oShell = CreateObject("WScript.Shell")
oShell.Run("""ms-settings:display""")
WScript.Sleep 2000
oShell.AppActivate "settings"
WScript.Sleep 100
oShell.SendKeys "{TAB}"
WScript.Sleep 100
oShell.SendKeys "{TAB}"
WScript.Sleep 100
oShell.SendKeys "{TAB}"
WScript.Sleep 100
oShell.SendKeys "{TAB}"
WScript.Sleep 100
oShell.SendKeys "{TAB}"
WScript.Sleep 100
oShell.SendKeys "{TAB}"
WScript.Sleep 100
oShell.SendKeys " "
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment