#NoEnv ; Recommended for performance and compatibility with future AutoHotkey releases. ; #Warn ; Enable warnings to assist with detecting common errors. SendMode Input ; Recommended for new scripts due to its superior speed and reliability. SetWorkingDir %A_ScriptDir% ; Ensures a consistent starting directory. global Lookup = {} Lookup["ssfALTSTARTUP"] := 0x1d Lookup["ssfAPPDATA"] := 0x1a Lookup["ssfBITBUCKET"] := 0x0a Lookup["ssfCOMMONALTSTARTUP"] := 0x1e Lookup["ssfCOMMONAPPDATA"] := 0x23 Lookup["ssfCOMMONDESKTOPDIR"] := 0x19 Lookup["ssfCOMMONFAVORITES"] := 0x1f Lookup["ssfCOMMONPROGRAMS"] := 0x17 Lookup["ssfCOMMONSTARTMENU"] := 0x16 Lookup["ssfCOMMONSTARTUP"] := 0x18 Lookup["ssfCONTROLS"] := 0x03 Lookup["ssfCOOKIES"] := 0x21 Lookup["ssfDESKTOP"] := 0x00 Lookup["ssfDESKTOPDIRECTORY"] := 0x10 Lookup["ssfDRIVES"] := 0x11 Lookup["ssfFAVORITES"] := 0x06 Lookup["ssfFONTS"] := 0x14 Lookup["ssfHISTORY"] := 0x22 Lookup["ssfINTERNETCACHE"] := 0x20 Lookup["ssfLOCALAPPDATA"] := 0x1c Lookup["ssfMYPICTURES"] := 0x27 Lookup["ssfNETHOOD"] := 0x13 Lookup["ssfNETWORK"] := 0x12 Lookup["ssfPERSONAL"] := 0x05 Lookup["ssfPRINTERS"] := 0x04 Lookup["ssfPRINTHOOD"] := 0x1b Lookup["ssfPROFILE"] := 0x28 Lookup["ssfPROGRAMFILES"] := 0x26 Lookup["ssfPROGRAMFILESx86"] := 0x30 Lookup["ssfPROGRAMS"] := 0x02 Lookup["ssfRECENT"] := 0x08 Lookup["ssfSENDTO"] := 0x09 Lookup["ssfSTARTMENU"] := 0x0b Lookup["ssfSTARTUP"] := 0x07 Lookup["ssfSYSTEM"] := 0x25 Lookup["ssfSYSTEMx86"] := 0x29 Lookup["ssfTEMPLATES"] := 0x15 Lookup["ssfWINDOWS"] := 0x24 global oShell := ComObjCreate("shell.application") Gui, Add, DropDownList, w140 vDropDown Gui, Add, Button, ys w140, Explore Gui, Add, Button, ys w140, Open Gui, Add, Edit, xs w140 vPath Section Gui, Add, Button, ys w140 gExplore2, Explore Gui, Add, Button, ys w140 gOpen2, Open Gui, Add, Button, xs w140 Section, CascadeWindows Gui, Add, Button, ys w140, MinimizeAll Gui, Add, Button, ys w140, UndoMinimizeAll Gui, Add, Button, xs w140 Section, FindComputer Gui, Add, Button, ys w140, FindFiles Gui, Add, Button, ys w140, FileRun Gui, Add, Button, xs w140 Section, TrayProperties Gui, Add, Button, ys w140, SetTime Gui, Add, Button, ys w140, RefreshMenu Gui, Add, Button, xs w140 Section, Help Gui, Add, Button, ys w140, EjectPC Gui, Add, Button, ys w140, ShutdownWindows Gui, Add, Button, xs w140 Section, Suspend Gui, Add, Button, ys w140, TileHorizontally Gui, Add, Button, ys w140, TileVertically Gui, Show, w460, CLSID_Shell IID_IShellDispatch4 for key, value in Lookup GuiControl,, DropDown, %key% GuiControl Choose, DropDown, 1 Return GuiClose: ExitApp ButtonExplore: GuiControlGet DropDown oShell.Explore(Lookup[DropDown]) return ButtonOpen: GuiControlGet DropDown oShell.Open(Lookup[DropDown]) return Explore2: GuiControlGet Path oShell.Explore(Path) return Open2: GuiControlGet Path oShell.Open(Path) return ButtonCascade: oShell.CascadeWindows() return ButtonMinimizeAll: oShell.MinimizeAll() return ButtonUndoMinimizeAll: oShell.UndoMinimizeAll() return ButtonEject: oShell.EjectPC() return ButtonRun: oShell.FileRun() return ButtonFindPC: oShell.FindComputer() return ButtonFindFiles: oShell.FindFiles() return ButtonHelp: oShell.Help() return ButtonTrayProperties: oShell.TrayProperties() return ButtonSetTime: oShell.SetTime() return ButtonRefreshMenu: oShell.RefreshMenu() return ButtonShutdownWindows: oShell.ShutdownWindows() return ButtonSuspend: oShell.Suspend() return ButtonTileHorizontally: oShell.TileHorizontally() return ButtonTileVertically: oShell.TileVertically() return