Change to Best Performance

[GrinReaper]

Hello!

I ran across this code on the forum by JLogan3o13 (older post, didn't want to resurrect) as well as on a blog. I am trying to do the same thing, change my windows properties to Best Performance, but in Windows 7. I believe this code works best for XP. When I test the code it will bring up the System Properties Dialog box on the correct tab, but it won't click on the "Settings..." button.

I don't want to change registry values manually. In this case I want to go through the system properties box.

Am I correct in thinking that Windows 7 handles it a bit differently and that is why it won't select the "Settings..." button?

Thanks!

GR

 

Opt("WinTitleMatchMode", 4)

Run("control sysdm.cpl,,3")

WinWaitActive("classname=#32770")
$handle = WinGetHandle("active")
ControlClick("","","Button2")

WinWaitActive("classname=#32770")
ControlClick("","","Button3")

ControlClick("","","Button5")

WinWaitActive("handle="&$handle)
ControlClick("","","Button9")

[JLogan3o13]

Hi, GrinReaper. For Win7, you need to add #RequireAdmin at the top of the script.

[GrinReaper]

Great! I should have picked up on that in so many other posts I've read.

To follow up. My UAC pops up asking for permission. I know I can turn it off, but is there a way around the verification?

Thanks!

Greg