copyleft Posted April 23, 2013 Share Posted April 23, 2013 (edited) All fuinctions are performed property but AutoIt won't exit from this script cleanly, except when the exit button is pressed. Pressing any other button completes the RUN function but leaves Autoit icon in system tray after task is executed. expandcollapse popup#include <ButtonConstants.au3> #include <GUIConstantsEx.au3> #include <StaticConstants.au3> #include <WindowsConstants.au3> #Region ### START Koda GUI section ### Form= $Form1 = GUICreate("Open Docs", 468, 231, 262, 194) GUISetIcon("C:\Doc.ico", -1) GUISetBkColor(0xC0DCC0) GUICtrlSetFont(-1, 11, 800, 0, "MS Sans Serif") $Label1 = GUICtrlCreateLabel("Choose Document Function", 125, 24, 244, 28) GUICtrlSetFont(-1, 12, 800, 0, "MS Sans Serif") GUICtrlSetColor(-1, 0x0000FF) $Cre8ID = GUICtrlCreateButton("Create Doc", 18, 76, 75, 25) GUICtrlSetOnEvent($Cre8ID, "OnCre8") $SHAREDID = GUICtrlCreateButton("Shared", 105, 76, 75, 25) GUICtrlSetOnEvent($SHAREDID, "OnSHARE") $SCANID = GUICtrlCreateButton("Scanned", 192, 76, 75, 25) GUICtrlSetOnEvent($SCANID, "OnSCAN") $PDFID = GUICtrlCreateButton("PDF", 284, 76, 75, 25) GUICtrlSetOnEvent($PDFID, "OnPDF") $DOCSID = GUICtrlCreateButton("My Docs", 374, 76, 75, 25) GUICtrlSetOnEvent($DOCSID, "OnDOCS") $SEARCHID = GUICtrlCreateButton("Search Docs", 150, 127, 177, 33) GUICtrlSetOnEvent($SEARCHID, "OnSearch") $ExitID = GUICtrlCreateButton("Exit", 190, 180, 91, 33) GUISetState(@SW_SHOW) While 1 $nMsg = GUIGetMsg() Switch $nMsg Case $GUI_EVENT_CLOSE Exit Case $Cre8ID OnCre8() GUIDelete($Form1) Exit Case $SCANID OnSCAN() GUIDelete($Form1) Case $PDFID OnPDF() GUIDelete($Form1) Case $DOCSID OnDOCS() GUIDelete($Form1) Case $SEARCHID OnSearch() GUIDelete($Form1) Case $SHAREDID OnSHARE() GUIDelete($Form1) Exit Case $ExitID Exit EndSwitch WEnd Func OnCre8() Run("X:\OFFICE11\WINWORD.EXE") EndFunc ;==>OnCr8 Func OnSHARE() Run("C:\Windows\explorer.exe \\NAS\Docs") EndFunc ;==>OnSHARE Func OnSCAN() Run("C:\Windows\explorer.exe \\NAS\Scan") EndFunc ;==>OnSCAN Func OnPDF() Run("C:\Windows\explorer.exe X:\PDF") EndFunc ;==>OnPDF Func OnDOCS() Run("C:\Windows\explorer.exe X:\LocalDocs") EndFunc ;==>OnDOCS Func OnSearch() run("X:\Find\docfind.cmd") EndFunc ;==>OnSearch Exit Edited April 23, 2013 by Melba23 Fixed tags Link to comment Share on other sites More sharing options...
water Posted April 23, 2013 Share Posted April 23, 2013 When you post code can you please wrap it in [autoit][/autoit] tags? Makes the code easier to read. My UDFs and Tutorials: Spoiler UDFs:Active Directory (NEW 2022-02-19 - Version 1.6.1.0) - Download - General Help & Support - Example Scripts - WikiExcelChart (2017-07-21 - Version 0.4.0.1) - Download - General Help & Support - Example ScriptsOutlookEX (2021-11-16 - Version 1.7.0.0) - Download - General Help & Support - Example Scripts - WikiOutlookEX_GUI (2021-04-13 - Version 1.4.0.0) - DownloadOutlook Tools (2019-07-22 - Version 0.6.0.0) - Download - General Help & Support - WikiPowerPoint (2021-08-31 - Version 1.5.0.0) - Download - General Help & Support - Example Scripts - WikiTask Scheduler (NEW 2022-07-28 - Version 1.6.0.1) - Download - General Help & Support - Wiki Standard UDFs:Excel - Example Scripts - WikiWord - Wiki Tutorials:ADO - WikiWebDriver - Wiki Link to comment Share on other sites More sharing options...
MouseSpotter Posted April 23, 2013 Share Posted April 23, 2013 Have a look at you code - you do not always exit the run when you "GUIDelete($Form1)" ... so autoit continues to run ... waiting for you to exit the form (which now no longer exists). Link to comment Share on other sites More sharing options...
guinness Posted April 24, 2013 Share Posted April 24, 2013 Look at ExitLoop and then GUIDelete. UDF List: _AdapterConnections() • _AlwaysRun() • _AppMon() • _AppMonEx() • _ArrayFilter/_ArrayReduce • _BinaryBin() • _CheckMsgBox() • _CmdLineRaw() • _ContextMenu() • _ConvertLHWebColor()/_ConvertSHWebColor() • _DesktopDimensions() • _DisplayPassword() • _DotNet_Load()/_DotNet_Unload() • _Fibonacci() • _FileCompare() • _FileCompareContents() • _FileNameByHandle() • _FilePrefix/SRE() • _FindInFile() • _GetBackgroundColor()/_SetBackgroundColor() • _GetConrolID() • _GetCtrlClass() • _GetDirectoryFormat() • _GetDriveMediaType() • _GetFilename()/_GetFilenameExt() • _GetHardwareID() • _GetIP() • _GetIP_Country() • _GetOSLanguage() • _GetSavedSource() • _GetStringSize() • _GetSystemPaths() • _GetURLImage() • _GIFImage() • _GoogleWeather() • _GUICtrlCreateGroup() • _GUICtrlListBox_CreateArray() • _GUICtrlListView_CreateArray() • _GUICtrlListView_SaveCSV() • _GUICtrlListView_SaveHTML() • _GUICtrlListView_SaveTxt() • _GUICtrlListView_SaveXML() • _GUICtrlMenu_Recent() • _GUICtrlMenu_SetItemImage() • _GUICtrlTreeView_CreateArray() • _GUIDisable() • _GUIImageList_SetIconFromHandle() • _GUIRegisterMsg() • _GUISetIcon() • _Icon_Clear()/_Icon_Set() • _IdleTime() • _InetGet() • _InetGetGUI() • _InetGetProgress() • _IPDetails() • _IsFileOlder() • _IsGUID() • _IsHex() • _IsPalindrome() • _IsRegKey() • _IsStringRegExp() • _IsSystemDrive() • _IsUPX() • _IsValidType() • _IsWebColor() • _Language() • _Log() • _MicrosoftInternetConnectivity() • _MSDNDataType() • _PathFull/GetRelative/Split() • _PathSplitEx() • _PrintFromArray() • _ProgressSetMarquee() • _ReDim() • _RockPaperScissors()/_RockPaperScissorsLizardSpock() • _ScrollingCredits • _SelfDelete() • _SelfRename() • _SelfUpdate() • _SendTo() • _ShellAll() • _ShellFile() • _ShellFolder() • _SingletonHWID() • _SingletonPID() • _Startup() • _StringCompact() • _StringIsValid() • _StringRegExpMetaCharacters() • _StringReplaceWholeWord() • _StringStripChars() • _Temperature() • _TrialPeriod() • _UKToUSDate()/_USToUKDate() • _WinAPI_Create_CTL_CODE() • _WinAPI_CreateGUID() • _WMIDateStringToDate()/_DateToWMIDateString() • Au3 script parsing • AutoIt Search • AutoIt3 Portable • AutoIt3WrapperToPragma • AutoItWinGetTitle()/AutoItWinSetTitle() • Coding • DirToHTML5 • FileInstallr • FileReadLastChars() • GeoIP database • GUI - Only Close Button • GUI Examples • GUICtrlDeleteImage() • GUICtrlGetBkColor() • GUICtrlGetStyle() • GUIEvents • GUIGetBkColor() • Int_Parse() & Int_TryParse() • IsISBN() • LockFile() • Mapping CtrlIDs • OOP in AutoIt • ParseHeadersToSciTE() • PasswordValid • PasteBin • Posts Per Day • PreExpand • Protect Globals • Queue() • Resource Update • ResourcesEx • SciTE Jump • Settings INI • SHELLHOOK • Shunting-Yard • Signature Creator • Stack() • Stopwatch() • StringAddLF()/StringStripLF() • StringEOLToCRLF() • VSCROLL • WM_COPYDATA • More Examples... Updated: 22/04/2018 Link to comment Share on other sites More sharing options...
Recommended Posts
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 accountSign in
Already have an account? Sign in here.
Sign In Now