Jump to content

Toggle Between Release and Beta


Recommended Posts

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
Start -> Programs -> AutoIt v3 -> AutoIt Help File -> Index -> (The Function you are asking about)----- Links -----DllStruct UDFsRSA Crypto UDFs
Link to post
Share on other sites

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) ...
Link to post
Share on other sites

Create an account or sign in to comment

You need to be a member in order to leave a comment

Create an account

Sign up for a new account in our community. It's easy!

Register a new account

Sign in

Already have an account? Sign in here.

Sign In Now
  • Recently Browsing   0 members

    No registered users viewing this page.

×
×
  • Create New...