Toggle Between Release and Beta

[Ejoc]

If you have both The release and beta versions of autoit installed, this little script will toggle between the 2 so when you double click or compile the script it will use the beta.

#cs
vi:ts=4 sw=4:
DefaultAutoItToggle.au3
Ejoc
#ce
Opt("MustDeclareVars",1)
Local $InstallDir = RegRead("HKLM\Software\AutoIt v3\AutoIt","InstallDir")

If StringInStr(RegRead("HKLM\Software\Classes\AutoIt3Script\Shell\Run\Command",""),"beta") Then; already using beta switch back
    RegWrite("HKLM\Software\Classes\AutoIt3Script\Shell\Compile\Command","",_
            "REG_SZ",_
            $InstallDir & '\Aut2Exe\Aut2Exe.exe /in "%l"')
    RegWrite("HKLM\Software\Classes\AutoIt3Script\Shell\Run\Command","",_
            "REG_SZ",_
            $InstallDir & '\AutoIt3.exe "%1" %*')
    MsgBox(0,"Using","Using Release Version of AutoIt",2)
Else; change to beta
    RegWrite("HKLM\Software\Classes\AutoIt3Script\Shell\Compile\Command","",_
            "REG_SZ",_
            $InstallDir & '\beta\Aut2Exe\Aut2Exe.exe /in "%l"')
    RegWrite("HKLM\Software\Classes\AutoIt3Script\Shell\Run\Command","",_
            "REG_SZ",_
            $InstallDir & '\beta\AutoIt3.exe "%1" %*')
    MsgBox(0,"Using","Using beta Version of AutoIt",2)
EndIf

[jpm]

If you have both The release and beta versions of autoit installed, this little script will toggle between the 2 so when you double click or compile the script it will use the beta.

#cs
vi:ts=4 sw=4:
DefaultAutoItToggle.au3
Ejoc
#ce
Opt("MustDeclareVars",1)
Local $InstallDir = RegRead("HKLM\Software\AutoIt v3\AutoIt","InstallDir")

If StringInStr(RegRead("HKLM\Software\Classes\AutoIt3Script\Shell\Run\Command",""),"beta") Then; already using beta switch back
    RegWrite("HKLM\Software\Classes\AutoIt3Script\Shell\Compile\Command","",_
            "REG_SZ",_
            $InstallDir & '\Aut2Exe\Aut2Exe.exe /in "%l"')
    RegWrite("HKLM\Software\Classes\AutoIt3Script\Shell\Run\Command","",_
            "REG_SZ",_
            $InstallDir & '\AutoIt3.exe "%1" %*')
    MsgBox(0,"Using","Using Release Version of AutoIt",2)
Else; change to beta
    RegWrite("HKLM\Software\Classes\AutoIt3Script\Shell\Compile\Command","",_
            "REG_SZ",_
            $InstallDir & '\beta\Aut2Exe\Aut2Exe.exe /in "%l"')
    RegWrite("HKLM\Software\Classes\AutoIt3Script\Shell\Run\Command","",_
            "REG_SZ",_
            $InstallDir & '\beta\AutoIt3.exe "%1" %*')
    MsgBox(0,"Using","Using beta Version of AutoIt",2)
EndIf

<{POST_SNAPBACK}>

You could have renamed the keys themselves Compile -> Compile (Beta) ...